Select Code to Download

my %hash : shared;
my @array : shared;
...

$hash{ array } = \@array;
$hash{ hash  } = \%hash;

#! perl -slw
use strict;
...
wilma
bam bam
flintstone