9 my $configfile=configfile();
10 my $intranetdir=$configfile->{'intranetdir'};
13 my ($loggedinuser, $cookie, $sessionID) = checkauth($query);
15 print $query->header(-cookie => $cookie);
18 print startmenu('report');
20 print "<p align=left>Logged in as: $loggedinuser [<a href=/cgi-bin/koha/logout.pl>Log Out</a>]</p>\n";
22 open H, "$intranetdir/htdocs/reports/index.html";
30 print endmenu('report');