#!/usr/bin/perl
#↑perlのパスを自分の環境に合わせて書き直します。
require 'pl/jcode.pl';

$logfile = "log/total_url.log";

print "Content-type: text/plain\n\n";
print "<!--\n";


open(IN,"$logfile");
$i=0;
while(<IN>){
($Num) = split(/<>/);
print "document.write(\"<font size=2>【総登録数 $Numサイト】</font>\")\;\n";
}
close(IN);


print "//-->\n";
exit;