use Exporter qw(import); # Perl >= 5.8
use base 'Exporter';     # Perl <= 5.6