- or download this
my $hostfile = '/tmp/jn/hosts';
open my $hostFH, '<', $hostfile
or die "open: < $hostfile: $!\n";
- or download this
$ perl -le '
> @IPs = qw{ 22.32.87.12 56.67.38.61 101.12.34.54 };
...
22.32.87.12
56.67.38.61
$
- or download this
use strict;
use warnings;
...
10.23.212.6 hostc
192.168.100.254 fw1
192.168.1.21 hostbdup
- or download this
10.23.212.6
10.31.17.65
192.168.1.21
192.168.1.78
192.168.100.254