package ModuleOne; use strict; use warnings; use ModuleTwo qw(FunctionTwo); sub FunctionOne($) { return shift } 1;