Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
open(SCRIPT, "<", "a.pl");
<SCRIPT>;
print $., "\n";

Select or download this
```
2
3
```
Select or download this
```
2
1
```