var rsFollow = Server.CreateObject('ADODB.Recordset');
/* snip */
	while (!rsFollow.EOF)
	{
		Response.Write('   <tr>\n');

		Response.Write('    <td>' + rsFollow("Book Title") + '</td>\n');

		rsFollow.MoveNext();
	}

##</code><code>##

my $rsFollow = Win32::OLE->new('ADODB.Recordset');
# snip
	while( !$rsFollow->{EOF} )
	{
		print( "   <tr>\n" );

		print( "    <td> $rsFollow->{'Book Title'} + </td>\n");
		print( "   </tr>\n" );

		$rsFollow->MoveNext();
	}