use Data::Dumper;
@arg2 = [{a => 1, b =>2}], [qw($balloon)];
Data::Dumper->Dump(@arg2)

##</code><code>##

'$balloon = {
             \'a\' => 1,
             \'b\' => 2
           };

##</code><code>##

use YAML::XS;
@arg2 = ([{a => 1, b =>2}], [qw($balloon)]);
Dump(@arg2)

##</code><code>##

 '---
- a: 1
  b: 2
---
- $balloon
'

##</code><code>##

0  ARRAY(0x89889e8)
   0  HASH(0x8994130)
      'a' => 1
      'b' => 2
1  ARRAY(0x8ef27c8)
   0  '$balloon'