DB2DIR=/opt/ibm/db2/V9.1 DB2INSTANCE=db2inst1 INSTHOME=/home/db2inst1
$ perl use strict; use warnings; use DBI; use DBD::DB2; use Data::Dumper; my $dbh = DBI->connect ('DBI:DB2:sample', 'db2inst1', '.....') or die "connect failed"; my $sth = $dbh->prepare("select * from dept") or die "prepare failed"; my $rv = $sth->execute(); if ($rv) { while(my $hr = $sth->fetchrow_hashref()) { print Dumper($hr); } } $sth->finish() or die "finish failed"; $dbh->disconnect() or die "disconnect failed"; __END__ $VAR1 = { 'LOCATION' => undef, 'DEPTNO' => 'A00', 'MGRNO' => '000010', 'ADMRDEPT' => 'A00', 'DEPTNAME' => 'SPIFFY COMPUTER SERVICE DIV.' };
In reply to Re: OT: Setting up environment for DB2 on Solaris
by andreas1234567
in thread OT: Setting up environment for DB2 on Solaris
by talexb
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |