How can I slurp STDIN in Perl?

Question

I piping the output of several scripts. One of these scripts outputs an entire HTML page that gets processed by my perl script. I want to be able to pull the whole 58K of text

Answer 1

my @lines = ;

or

my $str = do { local $/;  };