Beefy Boxes and Bandwidth Generously Provided by pair Networks BBQ
Syntactic Confectionery Delight
 
PerlMonks  

Re: Re: Re2 (-l): I don't use printf enough

by demerphq (Chancellor)
on Oct 23, 2003 at 17:12 UTC ( #301645=note: print w/ replies, xml ) Need Help??


in reply to Re: Re2 (-l): I don't use printf enough
in thread I don't use printf enough

every module that uses print in a hidden fashion, should use local $\;

No way. Anybody who sets $\ should set it in a localized block when they do so. -l is there for one liners not real code. I _refuse_ to try to work around other people setting $\ stupidly. And for that matter simply localizing $\ in the module will not work. You'd have to do it in every single subroutine. And that means that every single subroutine that uses print is going to do an unecessary piece of work just to workaround somebody setting $\ stupidly. In essence I refuse to pay the price for somebody elses foolishness. And I dont see it as being reasonable to expect people to do so. Going down that road means that eventually somebody is going to argue that every single subroutine should localize all the global variables because of similar reasons.

Blech.


---
demerphq

    First they ignore you, then they laugh at you, then they fight you, then you win.
    -- Gandhi



Comment on Re: Re: Re2 (-l): I don't use printf enough
Select or Download Code
Re5 (-l): I don't use printf enough
by dragonchild (Archbishop) on Oct 25, 2003 at 02:42 UTC
    Going down that road means that eventually somebody is going to argue that every single subroutine should localize all the global variables because of similar reasons.

    Personally, I think there should be a switch, similar to strict, that will do this for you within a scope. Most modules shouldn't be depending on the globals anyway. It just causes craziness. Is there a use localize_globals; or some such? Ideally, one would add a use line at the top of the module and that would be it. Could this work? (Untested)

    package Filter::LocalizeGlobals; use Filter::Simple; # Add things to be localized here. my $locals = 'local (' . join ',', qw( $_ $\ $/ ); FILTER_ONLY code => sub { s/(\bsub\b\s*\w+{)/$1 $locals /g; }; 1;

    ------
    We are the carpenters and bricklayers of the Information Age.

    The idea is a little like C++ templates, except not quite so brain-meltingly complicated. -- TheDamian, Exegesis 6

    ... strings and arrays will suffice. As they are easily available as native data types in any sane language, ... - blokhead, speaking on evolutionary algorithms

    Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://301645]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (13)
As of 2014-04-25 08:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (585 votes), past polls