my @masterarray = qw(@aaa @bbb @ccc);
print $_ . "\n" for @masterarray;