use DBI;
	$dbh = DBI->connect("DBI:mysql:gds:localhost", "tools", "meep") or die  ("No love for the DBI connect");
	$sql = qq{ SELECT uname, fname, fgroup, dmod, accts FROM noctracker WHERE uname = 'gwalker'} ;
	$sth = $dbh->do( $sql ) or die ("Could not select");

	my( $uname, $fname, $fgroup, $dmod, $accts );
	$sth->bind_columns( undef, \$uname, \$fname, \$fgroup, \$dmod, \$accts );  # this is line 95