my ($ref) = qwa[ a better camel ];
    print @$ref,"\n";