Help for this page
DB<1> print $results HASH(0x8421888) ... DB<4>print $results->{string}[0] # This part left as an exercise for the reader.