Help for this page

Select Code to Download

Select or download this

 for my $key ( keys %hash ) {
 while ($file2){
   if (
...
      { do something...}
  else {next}
}