while ( <FILE1> ) {
    #chomp $_;
    s/\s*$//;