switches |
Subversion Repositories: |
Rev 1 | Rev 2 | |
---|---|---|
Line 24... | Line 24... | |
], |
], | |
"NetGear" => [[1,2,3,4,5,6,7,8,9,10,11,12], |
"NetGear" => [[1,2,3,4,5,6,7,8,9,10,11,12], | |
], |
], | |
"SignaMax_065-7851"=> [[1,3,5,7,9,11,13,15,17,19,21,23], |
"SignaMax_065-7851"=> [[1,3,5,7,9,11,13,15,17,19,21,23], | |
[2,4,6,8,10,12,14,16,18,20,22,24], |
[2,4,6,8,10,12,14,16,18,20,22,24], | |
], | ||
"AL11FIDU" => [[14,15,0,0], | ||
[6,7,10,11], | ||
], |
], | |
); |
); | |
|
| |
my @ports = (); |
my @ports = (); | |
my @sw = (); |
my @sw = (); | |
Line 39... | Line 42... | |
my ($fnc,$mac,$if,$bin,$geom,$desc); |
my ($fnc,$mac,$if,$bin,$geom,$desc); | |
|
| |
print "Content-type: text/html\n\n"; |
print "Content-type: text/html\n\n"; | |
|
| |
print "<HTML><HEAD>\n<META HTTP-EQUIV=Pragma CONTENT=no-cache>\n<style type=\"text/css\" media=\"screen\"> \@import \"../style.css\" ;</style>\n"; |
print "<HTML><HEAD>\n<META HTTP-EQUIV=Pragma CONTENT=no-cache>\n<style type=\"text/css\" media=\"screen\"> \@import \"../style.css\" ;</style>\n"; | |
print "<META http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-2\">\n"; |
print "<META http-equiv=\"Content-Type\" content=\"text/html; charset=UTF8\">\n"; | |
#print "<script type=\"text/javascript\" src=\"overlib.js\"><!-- overLIB (c) Erik Bosrup --></script>\n"; |
#print "<script type=\"text/javascript\" src=\"overlib.js\"><!-- overLIB (c) Erik Bosrup --></script>\n"; | |
print "</HEAD><BODY>\n"; |
print "</HEAD><BODY>\n"; | |
#nocache! |
#nocache! | |
|
| |
print "<div id=\"overDiv\" style=\"position:absolute; visibility:hidden; z-index:1000;\"></div>"; |
print "<div id=\"overDiv\" style=\"position:absolute; visibility:hidden; z-index:1000;\"></div>"; |