A(nother) funny difference in attitude stroke me around December 2k6, as i was comparing some of the "dynamic languages" compilers for some problem.
Well, nevermind
that problem, let's see
this attitude thingie. :)
]$ python x.py
python: can't open file 'x.py': [Errno 2] No such file or directory
]$ ruby x.rb
ruby: No such file or directory -- x.rb (LoadError)
]$ perl x.pl
Can't open perl script "x.pl": No such file or directory
I think it's nice that Perl is humbler here, but enter "web2.0 hype bulls**t bingo" age: given the pejorative attitude towards this word ("script"/"scripting"/etc - already discussed a few times even here, at the monastery), wouldn't we be happier to remove references to it from the source and get over this ? :)
There
is a small note on the subject in the Perl documentation:
perldoc -q"Is it a Perl program or a Perl script?"
I'll just quote here its final phrase:
〈〈 Now that "script" and "scripting" are terms that have been seized by unscrupulous or unknowing marketeers for their own nefarious purposes, they have begun to take on strange and often pejorative meanings, like "non serious" or "not real programming". Consequently, some Perl programmers prefer to avoid them altogether. 〉〉
You do know this is true. :)
So, I thought to myself, let's take action, get past this denial phase. ( first with a small, "test-the-idea" patch )
Do you think p5p would ever accept a patch in this vein ? :)
@@ -3710,7 +3710,7 @@
if (PL_e_script)
Perl_croak(aTHX_ "Can't open "BIT_BUCKET": %s\n", Strerror
+(errno));
else
- Perl_croak(aTHX_ "Can't open perl script \"%s\": %s\n",
+ Perl_croak(aTHX_ "Can't open Perl source file \"%s\": %s\n
+",
CopFILE(PL_curcop), Strerror(errno));
}
return fdscript;
in perl.c.
( some may object that in its tradition, p5 would probably need this to go through a deprecation cycle, as there might be some code out there relying on this particular error message. hm, or maybe not.)
So, what do you think ? Should such a "bug" be submitted ? :)
PS: And ... well, yes, maybe the smart attitude would be to not care about this non-issue at all. But hey, wth, it's Friday. :)
PPS: Do take it as the half-joke it is. Which half you see, well that i'm interested in. :) Thanks.
--
perl -MLWP::Simple -e'print$_[rand(split(q|%%\n|,
get(q=http://cpan.org/misc/japh=)))]'