--- db/prgsrc/db.cgi 2003/04/20 12:27:29 1.111 +++ db/prgsrc/db.cgi 2003/04/20 12:45:30 1.112 @@ -11,6 +11,8 @@ use Getopt::Std; getopts('z'); open STDERR, ">/var/tmp/errors1"; my $newsurl='http://news.chgk.info/'; +my $reklama="../dimrub/db/reklama.html"; +$reklama="../reklama.html" if $opt_z; my $HTMLDIR="/znatoki/dimrub/db/baza/"; my $realHTMLDIR; if ($^O =~ /win/i) { @@ -1416,7 +1418,7 @@ sub Get12Random { sub Include_virtual { my ($fn, $output) = (@_, ''); - + return "" if ($opt_z); open F , $fn or return ""; #die "Can't open the file $fn: $!\n";