package Orig;
use Exporter;
use vars qw( @ISA @EXPORT );
@EXPORT = qw( orig repl );
    
sub orig { print "&Orig::orig runs\n" }
sub repl { print "&Orig::repl runs (O No!)\n" }
1;