saransk
03.10.2011 02:47
open(dd,"logs");
use constant{
tagname=>1,
paramname=>2,
parambody=>3,
cname=>4,
body=>5,
skiptag=>6,
skipbody=>7
};
$state=body;
$pos=0;
$name=0;
while(!eof(dd)){
$char=ord(getc(dd));
# print "".tell(dd).": ".chr($char)." = $state = $name = $pos\n";
if(tell(dd)>1200000){
die;
... more →