in reply to Re: MySQL gone Away
in thread MySQL gone Away

Why iterate, when you can get the whole file in one big slurp? 
{
    local $/ = undef;
    open(FILE,"<".$filename) || die ("Could not open: $!");
    $data = <FILE>;
    close(FILE);
}

[download]

/\/\averick
OmG! They killed tilly! You *bleep*!!

Replies are listed 'Best First'.
Re: Re: Re: MySQL gone Away
by bronto (Priest) on Oct 14, 2002 at 17:48 UTC

    Only for the sake of KISS, nothing more and nothing less.

    Ciao!
    --bronto

    # Another Perl edition of a song:
# The End, by The Beatles
END {
  $you->take($love) eq $you->make($love) ;
}

[reply]

In Section Seekers of Perl Wisdom