in reply to Swimsuits2004

Your code breaks on MS-Windows. But putting binmode(IN); after open( IN, ">$filename" ) or warn $!; fixes that. Btw, why do you use "IN" as a name for a handle you are actually writing to?

holli, regexed monk

Replies are listed 'Best First'.
Re^2: Swimsuits2004
by zentara (Cardinal) on Jan 21, 2005 at 10:06 UTC
    I use IN, because from my view, it's an "incoming file".
    I'm not really a human, but I play one on earth. flash japh
[reply]
Re^2: Swimsuits2004
by blazar (Canon) on Feb 03, 2005 at 12:45 UTC
    Or also 
    open my $in, '>:raw', $filename or warn $!;

    [download]
[reply]
[d/l]

In Section Cool Uses for Perl