[Perl-beginners] Re: multiple __DATA__ entries possible? -- use (a here document)

The closest you can get is to specify "a here document". That is:

------------------------------------------------------------------------------------


my @array=(<<"END_DATA" =~ m/^\s*(.+)/gm)
stuff in data
more stuff data
END_DATA
;

my @array1=(<<"END_DATA1" =~ m/^\s*(.+)/gm)
stuff in data1
more stuff data1
END_DATA1
;

print "\n This is DATA:\n@array\n\nThis is array1:\n@array1\n\n";


-----------------------------------------------------------------------------------


You can revise the REGEX to suit your purposes.


__________________

William Ampeh (x3939)
Federal Reserve Board