$line =~ s/\015?\012?\Z//m;