Select Code to Download

#!/usr/bin/perl
use strict;
...
$ perl test.pl
21120 foo 'clear bgp'
21121 bar 'clear ospf'