$line =~ s/\r//g; # removes windows CR characters 
    $line =~ s/\s+$//; # removes trailing white spaces