#!/usr/bin/perl
print "Content-type:text/html\n\n";   
$filename = "tracker.txt";
open(myfile,"$filename");
@getrec = <myfile>;
close(myfile);
print "<pre>";
foreach $r (@getrec) {
 print $r;
}
print "</pre>";