Help for this page
Select Code to Download
Select
or
download this
foreach my $line (<DATASOURCE>){
Select
or
download this
while(my $line = <DATASOURCE>) {