Well, you can pass the array contents:

use Data::Dumper;
$Data::Dumper::Indent = 0;
$Data::Dumper::Useqq = 1;
my @arr = [ 'abc', 2, 'def', [ 5 , 6 ], 4 ];
my $cmd = "echo '" . Dumper(\@arr) . "'";
print qx{$cmd};
[download]