since nobody answered....

by "eric williams" <eric_alt(at)hotmail.com>

 Date:  Mon, 03 Jul 2000 04:39:44 PDT
 To:  hwg-languages(at)hwg.org
  todo: View Thread, Original
guess I just have to keep asking...

There's something in this code which causes the output file to fill up with 
MB of invisible chars...I can't see it can you?


#open (LOG, $logpath )or &dienice( "Can't read data from $logpath \n");
#@data = <LOG>;
#close(LOG);

$url = "<tr><td align=\"right\"><a 
href=\"$ENV{'SCRIPT_NAME'}\">$ENV{'SCRIPT_NAME'}</a>:</td>";
$count = 0;
$pad = "%.$pad"."d";
#print a count for each page. In counter log file.


#open (LOG, ">$logpath")or &dienice("Can't write data to $logpath \n");
#	foreach $line(@data) {
#		if ($line =~ /$url/) {
#			$line =~ /<td>(.*)<\/td>/;
#			$count = $1;
#			$count++;
#			$count = sprintf($pad, $count);
#			print LOG "$url<td>$count<\/td><\/tr>\n";
#		}
#
#		elsif ($count == 0 && substr($line,0,8) eq "</table>") {
#			$count++;
#			$count = sprintf($pad, $count);
#			print LOG "$url<td>$count<\/td><\/tr>\n";
#			print LOG "$line";
#		}
#
#		else { print LOG "$line\n"; }
#	}
#close(LOG);

________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com

HWG: hwg-languages mailing list archives, maintained by Webmasters @ IWA