Select Code to Download

#! c:/perl/bin/perl.exe 
#
...
   }
}

Script: C:\Scripts\array3.pl
...
    CCC215 : 10.33.81.52

for my $Port (keys %{$Port_Channel_Details})
   {
...
           print "$Interface_Port\n";
       }
   }