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