Select Code to Download

use strict;
use warnings;
...
         4 => "Gi0/1",
         5 => "Gi0/0",
});

foreach my $hash (@hash) {
  no warnings 'uninitialized';
...
5 => Gi0/0
4 => Gi0/1
-