sub foo($) {
  print "got @_\n";
}

my @args = qw/ more than one arg /;

## class method call
main->foo(@args);

## standard sub call
foo(@args);

__output__

got main more than one arg
got 4