@@ -1,6 +1,7 @@

 0.1687

     - added EXPERIMENTAL type_rule method

     - added EXPERIMENTAL execute() type_rule_off option

+    - execute method can second argument as parameter

 0.1686

     - select() column option can receive array reference in array.

       This is EXPERIMENTAL

@@ -427,10 +427,15 @@ sub each_column {

 our %EXECUTE_ARGS = map { $_ => 1 } @COMMON_ARGS, 'param';

 sub execute {

-    my ($self, $query, %args)  = @_;

+    my $self = shift;

+    my $query = shift;

+    my $param;

+    $param = shift if @_ % 2;

+    my %args = @_;

     # Arguments

-    my $param  = delete $args{param} || {};

+    my $p = delete $args{param} || {};

+    $param ||= $p;

     my $tables = delete $args{table} || [];

     $tables = [$tables] unless ref $tables eq 'ARRAY';

     my $filter = delete $args{filter};

@@ -1977,7 +1982,7 @@ column name and column information.

     my $result = $dbi->execute(

         "select * from book where title = :title and author like :author",

-        param => {title => 'Perl', author => '%Ken%'}

+        {title => 'Perl', author => '%Ken%'}

     );

 Execute SQL, containing tags.

@@ -163,6 +163,12 @@ $result = $dbi->execute($query, param => {key1 => 1, key2 => 3, key3 => 4, key4

 $rows = $result->fetch_hash_all;

 is_deeply($rows, [{key1 => 1, key2 => 2, key3 => 3, key4 => 4, key5 => 5}], "basic tag1");

+$source = "select * from table1 where {= key1} and {<> key2} and {< key3} and {> key4} and {>= key5};";

+$query = $dbi->create_query($source);

+$result = $dbi->execute($query, {key1 => 1, key2 => 3, key3 => 4, key4 => 3, key5 => 5});

+$rows = $result->fetch_hash_all;

+is_deeply($rows, [{key1 => 1, key2 => 2, key3 => 3, key4 => 4, key5 => 5}], "basic tag1");

+

 $source = "select * from table1 where {<= key1} and {like key2};";

 $query = $dbi->create_query($source);

 $result = $dbi->execute($query, param => {key1 => 1, key2 => '%2%'});