chomp $line;
if(not($line eq "")) { ##### why does $line equal "" ?