my $var = shift;
my @list = @{+shift};  
# you cannot use @{shift}, the + operator tricks perl
# into getting the value of shift first