Select Code to Download

my @IPMap = (
    [ "host_1", "192.168.1.1" ],
    [ "host_2", "192.168.1.2" ],
    [ "host_3", "192.168.1.3" ],
);

my %IPMap = (
    host_1 => "192.168.1.1",
    host_2 => "192.168.1.2",
    host_3 => "192.168.1.3",
);

use strict;
use warnings;
...

Dump $IPMapH;
Dump $IPMapAoA;

$HASH1 = {
           host_1 => '192.168.1.1',
...
              '192.168.1.3'
            ]
          ];