fork && exit;           ### making a daemon
open FILE, "ACCESS";
for (;;) {
 while (<FILE>){
   $lines++;
 }
print "$lines to somewhere, maybe to another file";
$lines=0;
sleep 3600;
}

##</code><code>##

-----------------------------------
--the good, the bad and the physi--
-----------------------------------