Help for this page
local $/ = ""; while (my @records = <$fh>) { foreach my $line (@records) {
local $/ = ""; while (my $paragraph = <$fh>) { ... print "<$line>\n"; } }
www.com | www.net | www.org
Yes No
Results (98 votes). Check out past polls.