Help for this page

Select Code to Download

Select or download this

$moo = "3";
my @recs;
...
bind_hash_query: @recs = bind_hash_query('SELECT MEH, MOOSE FROM BLEH 
+WHERE pissant = ?',$moo);

doUpdate:  @recs = doQuery('SELECT MEH, MOOSE FROM BLEH WHERE pissant 
+= ?',$moo);

Select or download this

sub bind_hash_query_arraydec {
my $table = shift;
...

return @recs;
}