Help for this page

Select Code to Download

Select or download this

while ($line = <MAIN_FILE1>){
  chomp $line;
...
}

close(MAIN_FILE1)