Select Code to Download

#!/usr/bin/perl

...
    First operational port is fc1/1
    1 port in total, 1 port up
    Ports:   fc1/1    [up] *

$Rec = {
         'port-channel 3' => {
...
                               'fc2/5' => 'up'
                             }
       };