#test code
my $i=0;		
for (my $count=1; $count<11; $count++)
{
$i++;

app_log($log,"Loading transac from \$file - $1");

print "cool<br>";
}