FAQ
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

Search Discussions

Related Discussions

Discussion Navigation
viewthread | post
Discussion Overview
groupbeginners @
categoriesperl
postedFeb 15, '02 at 8:33p
activeFeb 15, '02 at 8:33p
posts1
users1
websiteperl.org

1 user in discussion

William Ampeh: 1 post

People

Translate

site design / logo © 2022 Grokbase