#!/usr/bin/perl -w
use strict;
package two;
require Exporter;
our @ISA = ("Exporter");
our @EXPORT = qw(foo);
sub foo {
    print "Salut toi! Ca va?\n";
}