diff options
| author | Kristian Lyngstol <kristian@bohemians.org> | 2016-02-26 10:59:08 +0100 |
|---|---|---|
| committer | Kristian Lyngstol <kristian@bohemians.org> | 2016-02-26 10:59:08 +0100 |
| commit | 9da864a8da29082369cdd2dd91a735b03577a117 (patch) | |
| tree | 543d881f3746ddd4805dd0da449783eb42a8a92c /mbd/generate-helper-list.pl | |
| parent | 9ecc4690b2546ac117204207bec21ee1f6d585cf (diff) | |
Archive old/unused things
Diffstat (limited to 'mbd/generate-helper-list.pl')
| -rwxr-xr-x | mbd/generate-helper-list.pl | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/mbd/generate-helper-list.pl b/mbd/generate-helper-list.pl deleted file mode 100755 index fd89475..0000000 --- a/mbd/generate-helper-list.pl +++ /dev/null @@ -1,15 +0,0 @@ -#! /usr/bin/perl -use strict; -use warnings; -require './access_list.pl'; -require './nets.pl'; -require './mbd.pm'; - -my @ports = mbd::find_all_ports(); - -print "no ip forward-protocol udp 137\n"; -print "no ip forward-protocol udp 138\n"; - -for my $port (@ports) { - print "ip forward-protocol udp $port\n"; -} |