Select Code to Download

#! perl -slw
use strict;
...
              Chassis Serial Number abc123
              Interface Gi-0/0/31

C:\test>1170268.pl
{
...
                 Interface => "Gi-0/0/31",
               },
}