menu.pl


1
2
3
4
5
6
7
8
9
10

#!/usr/bin/perl
use strict;
use CGI qw(:standard);
use CGI::Carp 'fatalsToBrowser';
use local::menu;

print header;
my $menu= new local::menu(%ENV);
print $menu->start_html('nzbget status');
print $menu->end_html;