use strict; use warnings; use Data::Dumper; sub mysub { print Dumper(\@_); } mysub( { name => 'ddd111', quantity => 11, price => '11', colour => '11red', size => '11xxl', itemID => '1111tiem' },{ quantity => '2', name => '222gmailoknow', price => '228', itemID => '222item' } ); #### $VAR1 = [ { 'colour' => '11red', 'quantity' => 11, 'name' => 'ddd111', 'price' => '11', 'itemID' => '1111tiem', 'size' => '11xxl' }, { 'name' => '222gmailoknow', 'quantity' => '2', 'price' => '228', 'itemID' => '222item' } ];