if ($.=<>){
            print length "$line";
            }

##</code><code>##

use warnings;