package Foo; 
sub import { 
    my $class  = shift;    # It's called as a class method.
    @Foo::urls = @_; 
}
1;