Help for this page

Select Code to Download

Select or download this

my $var;
while (...) {
   ++$var;
   ...
}

Select or download this

my $var;
while (...) {
...
      ...
   }
}