...
binmode $FILE;
...

__END__
Prints:
"Line\r\nLine2\r\nLine3\r\n"
"Line\r\nLine2\r\nLine3\r\n"
Yep.