$ perl -Mstrict -Mntheory=:all -wnE 'chomp; say length($_);' input.txt
33