package Increment;
use base qw(Exporter);
@EXPORT = qw(increment);
sub increment {
    $_[0]++
}
# (...)