Help for this page

Select Code to Download

Select or download this

interface GigabitEthernet6/10
 description TRUNK-KBV-SW001
 switchport trunk encapsulation dot1q
...
!
interface GigabitEthernet6/12
!

Select or download this

#!/usr/bin/perl
my @lines = <>;
my $config = join('', @lines);
...
foreach my $interface (@interfaces) {
  print $interface . "\n";
}