Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

injunjoel's scratchpad

by injunjoel (Priest)
on Jun 01, 2004 at 16:28 UTC ( #358188=scratchpad: print w/replies, xml ) Need Help??

A possible new idiom for deleting array elements?
my @arr = 1 .. 20; my @excludes = (1,3,5,7,9,11,13,15,17,19); @arr[@excludes] = (); @arr = grep $_, @arr; print join(" : ", @arr)."\n";
"Python is like Perl's tightly-wound, responsible, predictable cousin from out of town who has a funny foreign accent. ;)" -rudder
use DBI; #connect and stuff. create the DB handle my %hash = ( 'col1'=>$somevalue, 'col2'=>$someothervalue, 'col3'=>$yav); my $sql = qq~INSERT INTO table1(~ . join(',', sort keys %hash). qq~) VALUES(~. join(',',(('?') x scalar( keys %hash))). qq~)~; my $sth = $dbh->prepare($sql); $sth->execute(@hash{(sort keys %hash)});
Log In?

What's my password?
Create A New User
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (3)
As of 2016-10-23 23:57 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (302 votes). Check out past polls.