44 Other

$album = $$rowHandle{ album };

$artist = $$rowHandle{ artist };

$year = $$rowHandle{ year };

$rating = $$rowHandle{ rating };

print "";

print "$album$artist$year$rating";

print "\n";

}

} else {

print "Unable to execute query $query: $!\n";

}

$queryHandle >finish;

} else {

print "Unable to prepare query $query: $!\n";

}

$databaseHandle >disconnect;

} else {

print "Unable to connect to data souce $dataSource: $!\n";

}

print "\n";

print "\n";

print "\n";

The DBI interface is object oriented, and returns handles to various objects or arrays. In

Perl, queries must be  prepared  before they are executed. The fetchrow_hashref() method is

the equivalent of PHP's mysql_fetch_array() function. It returns a handle to an associative

array. You need to dereference the handle using double dollar signs.