Re^2: Usage of flags in scripts

Or you could-

#!/usr/bin/perl -l
[download]

-instead of-

use 5.010; # Just to use say()
[download]

To get print to act like say which is a bit more on point for the OP. :)

Comment on Re^2: Usage of flags in scripts Select or Download Code

Replies are listed 'Best First'.
Re^3: Usage of flags in scripts by McDarren (Abbot) on Jan 01, 2009 at 03:17 UTC
or even... `sub say { # Perl Hacks #86 print @_, "\n"; }` [download]	[reply] [d/l]
Re^4: Usage of flags in scripts by JadeNB (Chaplain) on Jan 01, 2009 at 18:25 UTC
Except that this doesn't handle `say`ing to filehandles properly: `$ perl -e 'sub say { print @_, "\n" } say STDOUT "Hi"' Can't locate object method "say" via package "IO::Handle" at -e line 1` [download]	[reply] [d/l] [select]
Re^3: Usage of flags in scripts by Lawliet (Curate) on Jan 01, 2009 at 02:21 UTC
Haha, that is neat. I need to reread perlrun more often ;) And you didn't even know bears could type.	[reply]