package Somename;
use Data::Dumper;
foo(1,2,3,4,5);
sub foo($;$$) { print Dumper(\@_) }

package main;
&Somename::foo(1,2,3,4,5);  # works