Help for this page

Select Code to Download

Select or download this
```
for (@existing_array)
{
```

Select or download this

my $file = 'ports.dat';
open(my $fh, '<', $file) or die "Cannot open '$file' for reading: $!";

while (<$fh>)
{