Help for this page

Select Code to Download


  1. or download this
    my @good_stuff = $stuff =~ /^START\n(.*?)^END$/gms;

# or alternatively with START and END around
my @good_stuff = $stuff =~ /(^START$.*?^END$)/gms;
  2. or download this
    $stuff = << EOF;
blah
START
...
END
lots of lots of lines
EOF
  3. or download this
    $stuff = << EOF;
blah
START
...
END
blah
EOF