package My::ProcessA; use strict; use ExportTo( [ qw( process_a ) ] ); sub process_a { "Do Stuff"; } 1;