Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: Shorten one liners with Class::Autouse

by xdg (Monsignor)
on Mar 23, 2007 at 14:09 UTC ( [id://606245]=note: print w/replies, xml ) Need Help??


in reply to Shorten one liners with Class::Autouse

Interesting approach. Personally, I shorten one-liners by preloading common modules using a custom ToolSet. 

package XDG;
our $VERSION = "0.02";
use base 'ToolSet';
ToolSet->set_strict(1);
ToolSet->set_warnings(1);
ToolSet->export(
    'Carp' => 'carp croak confess',
    'Data::Dump::Streamer' => undef,
    'File::Spec' => undef,
    'Perl6::Say' => 'say',
    'Scalar::Util' => 'refaddr reftype blessed',
);
1; # true

[download]

Used like this:

perl -MXDG -e 'say "Loaded modules:" and Dump \%INC'

-xdg

Code written by xdg and posted on PerlMonks is public domain. It is provided as is with no warranties, express or implied, of any kind. Posted code may not have been tested. Use of posted code is at your own risk.

In Section Cool Uses for Perl

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://606245]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (5)
As of 2024-04-19 15:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found