improve checking variable in _execute: not only check ref but check a…

…rray ref.
nekokak · Aug 23, 2012 · 2a2d36b · 2a2d36b
1 parent 37cccb7
commit 2a2d36b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Teng.pm b/lib/Teng.pm
@@ -231,7 +231,7 @@ sub _execute {
         $sth = $self->dbh->prepare($sql);
         my $i = 1;
         for my $v ( @{ $binds || [] } ) {
-            $sth->bind_param( $i++, ref($v) ? @$v : $v );
+            $sth->bind_param( $i++, ref($v) eq 'ARRAY' ? @$v : $v );
         }
         $sth->execute();
     };