From 9da864a8da29082369cdd2dd91a735b03577a117 Mon Sep 17 00:00:00 2001 From: Kristian Lyngstol Date: Fri, 26 Feb 2016 10:59:08 +0100 Subject: Archive old/unused things --- mbd/generate-helper-list.pl | 15 --------------- 1 file changed, 15 deletions(-) delete mode 100755 mbd/generate-helper-list.pl (limited to 'mbd/generate-helper-list.pl') 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"; -} -- cgit v1.2.3