Help for this page
Select Code to Download
Select
or
download this
while (my $line = <>) { @chunks = split(/","/, $line); # other stuff }