From: Vincent Pit Date: Mon, 22 Sep 2008 17:20:59 +0000 (+0200) Subject: 'sub foo; print foo 1' compiles to 'print(foo(1))' X-Git-Tag: v0.04~5 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fsubs-auto.git;a=commitdiff_plain;h=630e6dba42a899a6fdb2bcc9f4dda685e6c70584 'sub foo; print foo 1' compiles to 'print(foo(1))' --- diff --git a/lib/subs/auto.pm b/lib/subs/auto.pm index 3a38497..64e9d57 100644 --- a/lib/subs/auto.pm +++ b/lib/subs/auto.pm @@ -35,7 +35,7 @@ our $VERSION = '0.03'; foo->meth; # "'foo'->meth" if you have use'd foo somewhere, # or "foo()->meth" otherwise print foo 'wut'; # print to the filehandle foo if it's actually one, - # or "foo()->print('wut')" otherwise + # or "print(foo('wut'))" otherwise } # ... but function calls will fail at run-time if you don't # actually define foo somewhere