--- generate-overview.pl 2002/06/11 19:27:37 1.1 +++ generate-overview.pl 2002/07/11 08:33:48 1.4 @@ -37,7 +37,7 @@ $gBaseURL = "http://romul.pliva.hr/cgi-bin/cricket/grapher.cgi"; # change this to destination directory - $path = "/home/dpavlin/public_html"; + $path = "/data/mon/"; # this is basename of all html files $name = "overview"; } @@ -89,7 +89,7 @@ foreach my $filename (keys %html) { open(OUT,"> $filename") || die "can't open output html '$filename': $!"; - print OUT $html{$filename}; + print OUT $html{$filename},""; close(OUT); } @@ -146,6 +146,9 @@ my($dslist); my($filename)="$path/$name-$rangeLabel.html"; + if (! defined $html{$filename}) { + $html{$filename}="$rangeLabel"; + } my($dir) = dirname($filename); if (! -d $dir) { Info("Making directory $dir to hold file $filename."); @@ -169,7 +172,7 @@ my $desc = "view: "; if ($paraminst ne "") { $URL .= "&inst=$paraminst"; - $desc.="$paraminst $vname"; + $desc.="$paraminst $paramtarget $vname"; } else { $desc.="$paramtarget $vname"; }