Hello,
I'm having a new problem with Perl::DBI , and I hope that somebody can help me....

When I tried to read the data from my AS/400 database with Perl::DBI, I only recevie 'strange characters': '@@'.

Is that a translation problem or something?

This is my code:
##########
$dbh = DBI->connect("dbi:DB2:JUNO", "****", '****, {PrintError => 2, Rai
seError => 2});
$sth = $dbh->prepare('select * from QS36SPL."S.1.HAWB"');
$sth->execute;
while (@row = $sth->fetchrow)
{
print "$row[0]\n";
}
$sth->finish;
print "$row\n";
$dbh->disconnect;
############


And when I run this, it only outputs the following lines:

@@
@@
@@
@@
@@
@@


I hope somebody can help me.
Tnx in advance,

Bart