Select Code to Download

use Class::Struct qw(struct);
struct S=>[a=>'$',b=>'@']; #"b" is an array
...

# Would also like to do 
my @x = $a->b; % Extract entire array