Mini Shell
Mini Shell
| Direktori : /home/opti/optisoftcom/.cpanm/work/1544535425.21555/Package-Stash-XS-0.28/t/lib/Package/ |
| Current File : /home/opti/optisoftcom/.cpanm/work/1544535425.21555/Package-Stash-XS-0.28/t/lib/Package/Stash.pm |
package # hide from PAUSE
Package::Stash;
use strict;
use warnings;
use Package::Stash::XS;
our $IMPLEMENTATION = 'XS';
BEGIN {
my $ps = Package::Stash::XS->new(__PACKAGE__);
my $ps_xs = Package::Stash::XS->new('Package::Stash::XS');
for my $method ($ps_xs->list_all_symbols('CODE')) {
my $sym = '&' . $method;
$ps->add_symbol($sym => $ps_xs->get_symbol($sym));
}
}
1;