#======================= [ open_dbi ] ======================= 
my $sql = "SELECT * FROM $course";
my $query=$dbh->prepare("$sql")
	or die "Couldn't prepare statement: " . $dbh->errstr;
if (defined($query)) {
	$query->execute();

###############################################################################

while (@row=$query->fetchrow_array()) {
		foreach  ($row[0]) {
		print "$course";		
		if ($row[0] eq $userid) {
		
		print "$userid you are registered for this course $course<BR>";		
	
		}elsif ($row[0])
			{print "$course";}
		
		}
}

###############################################################################
$dbh->disconnect;