Help for this page
$json->{data} = $dbh->selectall_arrayref('SELECT idnum, fname FROM dbu +ser', {Slice => {}} ); print $json ;
HASH(0x55e405886718)