Help for this page

Select Code to Download


  1. or download this
    use DBI;
use Data::Dumper;
...
 'select id,name from status',
 { Slice=>{} },
);
  2. or download this
    my $rslt = $dbh->selectall_arrayref('select name,id from status');

my %hash = map @$_, @$rslt;

print Dumper \%hash;
  3. or download this
    use DBI;
use HTML::Template;
...
<tmpl_loop things>
   <tmpl_var id>: <tmpl_var name>
</tmpl_loop>