package Foo;
use strict;

sub bar {}
sub zap {}

package main;

Foo::bar();
Foo::bar();
Foo::zap();
Foo::zap();