Help for this page

Select Code to Download

Select or download this
```
splice(@lines, 1, 1);
```

Select or download this

use strict;
use warnings;
...
print $#a, "\n";
delete $a[1];
print $#a, "\n";