package one; use base Exporter; our @EXPORT = qw (one two); our @EXPORT_OK = qw (three four five); sub one { 1.1; } sub two { 1.2; } sub three { 1.3; } sub four { 1.4; } sub five { 1.5; }