>perl -pe"BEGIN{open STDOUT, '>:unix', 'unix_text.txt'}" win_text.txt