Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- my $process_info = `ps $$ | tail -1`;
- my $is_oneliner
- = $process_info =~ m/perl.*?s+-[^P{IsLower}e]*e[^P{IsLower}e]*s+/m
- ;
- package MMN;
- use My::Module::Name '/./';
- use Exporter ();
- @ISA = 'Exporter';
- @EXPORT = @My::Module::Name::EXPORT_OK;
- 1;
- perl -MMy::Module::Name=/./ -e ...
Add Comment
Please, Sign In to add comment