I've been mucking around trying to get dump stuff from a database to a web page. This what I came up with (I'm a win32 user - forgive me brothers):
use CGI qw(-no_debug :standard);
use Win32::ODBC;
$db = new Win32::ODBC("LIB");
$stmt = "SELECT * FROM Library WHERE Number > 1800";
$rc = $db->Sql($stmt);
die qq(SQL failed "$stmt": ), $db->Error(), qq(\n) if $rc;
print header(), start_html("Test Library");
while($db->FetchRow())
{
@Data = $db->Data("Number","Title");
print "$Data[0] $Data[1]<br>\n";
}
print end_html();
$db->Close();
This works fine from the command line... no problems connecting to database or with sql statement, all html codes correct and accounted for. When I invoke it in a browser I get:
CGI Error...
Can't call method "Sql" on an undefined value at C:\InetPub\wwwroot\cgi-bin\library.pl line 7
Is this a Perl problem or an IIS (again, forgive me) problem? Any advice gratefully recieved.