package Mod2;

use strict;
use warnings;
use Mod1;

@Mod2::ISA=qw(Exporter);
@Mod2::EXPORT=qw(One);

sub One {
    return "Mod1::One";
     };
    1;