Help for this page
open(LINE, ">:encoding(UTF-8)", "line.txt") or die "\nCan't create fil +e: $!\n"; print LINE "text" . chr(13) . "more text";
$/ = LF; open(LINE, ">:encoding(UTF-8)", "line.txt") or die "\nCan't create fil +e: $!\n"; print LINE "text\nmore text";