Select Code to Download

$sth->execute($foo,$bar)
    or die "Couldn't execute query:" . $sth->errstr;

 LEVEL | EFFECT
--------------------------------------------
...
   2     L1 + method and params
   3     L2 + driver level (very detailed)
   4     An insane amount of information

    # The main Select
  $sth_main = $dbh->prepare(<<'__EOSQL__');
...
      (t.telephony_id = s.mobile_number)
ORDER BY t.account_no, t.telephony_id
__EOSQL__

# using an array ref instead
$rec = $sth_main->fetchrow_arrayref('NAME_lc')
...
$rec = $sth_main->fetchrow_hashref('NAME_lc');
$sth_imei->execute( $rec->{telephony_id}, $rec->{account_no})
    or die $sth_imei->errstr;