1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
#!perl package helpers; use strict; use warnings; use Exporter; our @ISA = qw{Exporter}; our @EXPORT_OK = qw(e f); our @EXPORT = qw{e}; sub e { Pod::Simple::DumpAsXML->_duo(@_) }; sub f { Pod::Simple::DumpAsXML->_duo(@_) }; 1;