http://www.perlmonks.org?node_id=205155


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); }

/\/\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) ;
    }