my $temp = shift;
# or
my ($temp) = @_;