tehnika/public_html/index.cgi

#!/usr/bin/perl -w

use lib '..';   # FIX
use CGI::Carp qw(fatalsToBrowser);      # FIX, remove in production?

use WebPac;
my $app = WebPac->new();
$app->run();
1	#!/usr/bin/perl -w
2
3	use lib '..'; # FIX
4	use CGI::Carp qw(fatalsToBrowser); # FIX, remove in production?
5
6	use WebPac;
7	my $app = WebPac->new();
8	$app->run();