#=======================LOADING THE .TXT TO THE DATABASE========================

my $replace = $dbh->prepare( "REPLACE INTO games (gamename, gamedesc, gamecounter) VALUES (?, ?, ?)" );

open (FILE, "<../data/games/descriptions.txt") or die $!;

while (<FILE>) {
    chomp;

    if (length) {
       $replace->execute( split(/\t/, $_, 2),  0 ) or print $dbh->errstr;
    }
}

close (FILE);

##</code><code>##

if( param() )
{
    $dbh->do( "UPDATE games SET gamecounter=gamecounter+1 WHERE gamename='$gamename'" );
    $dbh->do( "UPDATE guestlog SET passage='$gamename' WHERE host='$host'" );

    $sth = $dbh->prepare( "SELECT * FROM games WHERE gamename=?" );
    $sth->execute( $gamename );
    $row = $sth->fetchrow_hashref;

    print span( {class=>'lime'},    "Είσαι ο $row->{gamecounter} ος που κατεβάζει το $row->{gamename} !!" ),  br;
    print span( {class=>'yellow'},  "Ελπίζω να σου αρέσει και να σου φανεί χρήσιμο!" );

    print p( {-align=>'center'},  a( {href=>'index.pl'},  img {src=>'../data/images/back.gif'} ));
    print "<script language='Javascript'>location.href=/data/games/$gamename.rar</script>";
}

which is supposed to print a message when a user hits a game button to be download and show the user what he choosed to downlaoded and how many time it was in general downloaded but it doesnt.