my @shift = qw/a shifty array/;
sub foo {
    print @{shift};
    my @vars = @{+shift};
    print @{vars}
}
foo [qw/A mere example/];
__END__
##</code><code>##

ashiftyarrayAmereexample