Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
while ( warn("x"), ++$c<2 ) {
   my $dummy;
}

Select or download this
```
x at a.pl line 5.
x at a.pl line 6.
```