Select Code to Download

...
                      ]
                    ]
        };

my %args;
$args{'expr'} = ['booya' 'kada']; # no \ required here

my %args;
my @ary;
@ary = ('booya', 'kada'); # use () instead of []
$args{'expr'} = \@ary;

$VAR1 = {
          'expr' => [
...
                    ]
        };