my $sql = qq{ SELECT * FROM titles ORDER BY slID, countryID, languageID, title};
$qry = $dbh->prepare($sql);
$qry->execute();

while(@row = $qry->fetchrow_array){
    print $cgi->h2("Hello!!!");
    my $countryID = $row[0];
    my $languageID = $row[1];
    my $slID = $row[2];
    my $title = $row[3];

    my $countryname = &getCountryNameFromID($countryID);

    print $cgi->p("$slID");
    print $cgi->p("$countryname");
    print $cgi->p("$languageID");
    print $cgi->p("$title");
    print $cgi->p("");
}
$qry->finish();