in reply to Re^3: Doubt in Eval
in thread Doubt in Eval

 perldoc common::sense
NAME
    common::sense - save a tree AND a kitten, use common::sense!

SYNOPSIS
     use common::sense;

     # supposed to be the same, with much lower memory usage, as:
     #
     # use utf8;
     # use strict qw(vars subs);
     # use feature qw(say state switch);
     # no warnings;
     # use warnings qw(FATAL closed threads internal debugging pack
     #                 portable prototype inplace io pipe unpack mallo
+c
     #                 deprecated glob digit printf layer
     #                 reserved taint closure semicolon);
     # no warnings qw(exec newline unopened);

[download]

Replies are listed 'Best First'.
Re^5: Doubt in Eval
by zwon (Abbot) on Feb 17, 2012 at 07:08 UTC
    I know what common::sense is, but I argue that one should use common sense (without double colon)
[reply]

      Yes, it can be made to work without the double colon. ;-)

      lib/common.pm:

      package common;
require common::sense;
*import = sub { $code = common::sense->can('import') and goto $code }

      [download]

      example.pl:

      use common sense;
print $foo;

      [download]

      Output:

      [tai@miranda (pts/0) ~]$ perl -Ilib example.pl
Global symbol "$foo" requires explicit package name at example.pl line
+ 2.
Execution of example.pl aborted due to compilation errors.

      [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom