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