Michom wrote:
> open (WRITE, ">rel.txt") || die "Can't find rel.txt\n";

Try:
open my $write_fh, '>:crlf', "rel.txt" or die "could not open rel.txt:
$!\n";

You will have to change WRITE to $write_fh in the rest of the code.


-- 
Just my 0.00000002 million dollars worth,
  Shawn

Programming is as much about organization and communication
as it is about coding.

I like Perl; it's the only language where you can bless your
thingy.

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to