Original parent post content:
Can someone please look into my below code and error and suggest what exactly is the error here and How should I move forward to get it right. Thanks in advance.And the error I am getting is:#!/u001/dev/edw/common/ul/bin/perl #Batch history: Developed by Saurav Rout use strict; use warnings; use DBI; use DBD::ODBC; my $host = "db.myhost.com"; # = "localhost", the server your are on. my $db = "u210502"; # your username (= login name = account nam +e ) my $user = $db; # your Database name is the same as your acc my $pwd = 'xxxxxx'; # Your account password # connect to the database. + print(__PACKAGE__ . ':' . __LINE__ . ":Connecting...\n"); $dbh = DBI->connect( "DBI:ODBC:$host", $user, $pwd) or die "Connecting + : $DBI::errstr\n "; print(__PACKAGE__ . ':' . __LINE__ . ":Connected.\n"); $sql = "SELECT * FROM D_EIW_W_DEVWORK_1.daily_batch_report"; # executi +ng the SQL statement. $sth = $dbh->prepare($sql) or die "preparing: ",$dbh->errstr; $sth->execute or die "executing: ", $dbh->errstr; print "content-type: text/html\n\n"; # one of the functions to retriev +e data from the table results # check perldoc DBI for more methods. while ($row = $sth->fetchrow_hashref) { foreach(sort(keys(%$row))) { print("$_:\[$row->{$_}\]\n"); } }
[edwdev2:u210502] /u001/dev/edw/common/ul/cgi-bin/eiw $ perl batch_his + +t Can't load '/u001/dev/edw/common/ul/perl5/lib/site_perl/5.8.0/aix +-64al +l/auto/DBD/ODBC/ODBC.so' for module DBD::ODBC: 0509-022 Cannot + loa +d module /u001/dev/edw/common/ul/perl5/lib/site_perl/5.8.0/aix- +64all/ +auto/DBD/ODBC/ODBC.so. 0509-150 Dependent module libodbc.a(od +bc.so) could not be lo +aded. 0509-022 Cannot load module libodbc.a(o +dbc.so). 0509-026 System error: A file or directory in the path name +do +es not exist. 0509-022 Cannot load module /u001/dev/edw/common/ul +/perl5/lib/ +site_perl/5.8.0/aix-64all/auto/DBD/ODBC/ODBC.so. 0509-15 +0 Dependent module /u001/dev/edw/common/ul/perl5/lib/ +site_perl/5.8. +0/aix-64all/auto/DBD/ODBC/ODBC.so could not be loaded. +at /u001/dev/ +edw/common/ul/perl5/lib/5.8.0/aix-64all/DynaLoader.pm li +ne 229. at +batch_hist line 8 Compilation failed in require at batch_hist line 8. + BEGIN failed--compilation aborted at batch_hist line 8.
In reply to Re: Perl ODBC error
by runrig
in thread Perl ODBC error
by sauravrout
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |