Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re^3: How to use __DATA__ efficiently, help!

by Anonyrnous Monk (Hermit)
on Feb 09, 2011 at 19:37 UTC ( [id://887260]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    # File Set1.pm
package Set1;
...
while (<Set1::DATA>) { print }
print "Set 2:\n";
while (<Set2::DATA>) { print }
  2. or download this
    Set 1:
foo1
...
bar1
bar2
bar3

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://887260]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (4)
As of 2025-03-15 21:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    When you first encountered Perl, which feature amazed you the most?










    Results (53 votes). Check out past polls.