in reply to DBI error Can't locate object method "fetchrow_array"

It appears the following line is the problem:

while (@row = sth->fetchrow_array)

Should be:

while (@row = $sth->fetchrow_array)

s;;5776?12321=10609$d=9409:12100$xx;;s;(\d*);push @_,$1;eg;map{print chr(sqrt($_))."\n"} @_;

In Section Seekers of Perl Wisdom