##
DB<3> x $sth
0 DBI::st=HASH(0x402426c0)
empty hash
####
DB<4> x tied %$sth
0 DBI::st=HASH(0x400221f0)
'Database' => DBI::db=HASH(0x4026e6fc)
empty hash
'Debug' => 0
'Err' => SCALAR(0x402326cc)
-> undef
'Errstr' => SCALAR(0x402326fc)
-> undef
'FetchHashKeyName' => 'NAME'
'Handlers' => ARRAY(0x40242684)
empty array
'ImplementorClass' => 'DBD::Oracle::st'
'State' => SCALAR(0x401c98d0)
-> undef
'Statement' => 'select * from my.foo_test'
DB<5>