X-Git-Url: https://git.sesse.net/?a=blobdiff_plain;f=web%2Fnettkart-text.pl;h=7255e581de5874a7af31ea7530be33a9b3041969;hb=f90ce5c244f98de95ac4ad05d95223398482bd0f;hp=6ac1d9f9667b7beb6a5812b8b0e64ad1e023e804;hpb=d6cfbb682b3492d24b6623fbf1345c5b2b95f230;p=nms diff --git a/web/nettkart-text.pl b/web/nettkart-text.pl index 6ac1d9f..7255e58 100755 --- a/web/nettkart-text.pl +++ b/web/nettkart-text.pl @@ -1,10 +1,11 @@ #! /usr/bin/perl use CGI; use DBI; +use lib '../include'; +use nms; my $cgi = CGI->new; -my $dbh = DBI->connect("dbi:Pg:dbname=snmpfetch;host=violet.tg05.gathering.org", "snmpfetch", "removed") - or die "Couldn't connect to database"; +my $dbh = nms::db_connect(); print $cgi->header(-type=>'text/html', -refresh=>'10; http://nms.tg05.gathering.org/nettkart-text.pl'); print <<"EOF";