{
   no strict 'refs';
   my $row = $sth->fetchrow_arrayref;
   $row->[0] =~ s/\$(\w+)/$$1/eg;
}