$sport = 'basket ball' $sth5 = $dbh->prepare("SELECT round, teamname, score from trees where sport =\'$sport\' AND year = \'$year\', ORDER BY round DESC") || die "Can't prepare SQL get data statement"; $sth5->execute || die "can't execute sql statement"; ##

##

$rowcount = 0;
while (@row = $sth5->fetchrow_array()) {
  $round = $row[0];
  $teamname = $row[1];          
  $Score    = $row[2];          

push @ list_of_teamdata, qw("$round $teamname $score");
  $rowcount++;

}


##

##


round 1  team 1 score 1
round 2  team 2 score 2
round 3  team 3 score 3
round 4  team 4 score 4


##

##


$compsize = $#list1+1;

  if ($compSize == 7){


    print "\n";
    print " \n";
    print " \n";
    print "image3\n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print "\n";
    print "\n";
  print "\n";
  print "\n";
print "\n";
print "\n";
  print "\n";
print "\n";
print "\n";
print "\n";
print "image3\n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print "\n";
    print "\n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print "\n";
    print "\n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print " \n";
    print "\n";
    print "\n";

    print "\n";

    print "\n";
    }