Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: When should you not use strict and warnings?

by Arunbear (Parson)
on Dec 27, 2012 at 17:06 UTC ( #1010551=note: print w/replies, xml ) Need Help??


in reply to When should you not use strict and warnings?

When the entire script fits on one line? ;)
% cat nums 1 2 3 4 % perl -nE '$sum += $_; END { say $sum }' nums 10

Replies are listed 'Best First'.
Re^2: When should you not use strict and warnings?
by Athanasius (Chancellor) on Dec 28, 2012 at 16:15 UTC

    Well, adding -Mstrict and qualifying every variable with my may be a little much for a one-liner. But adding a single -w? Consider:

    2:05 >type nums.txt 1 2 3 4 2:05 >perl -nE "$sum += $_; END { say $sum }" nums.txt 10 2:06 >perl -nwE "$sum += $_; END { say $sum }" nums.txt 10 2:06 >perl -nE "$sum += $_; END { say $sun }" nums.txt 2:06 >perl -nwE "$sum += $_; END { say $sun }" nums.txt Name "main::sum" used only once: possible typo at -e line 1. Name "main::sun" used only once: possible typo at -e line 1. Use of uninitialized value $sun in say at -e line 1, <> line 4. 2:06 >

    That’s a lot of potential help for the cost of just one extra character on the command line. :-)

    Athanasius <°(((><contra mundum Iustus alius egestas vitae, eros Piratica,

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1010551]
help
Chatterbox?
[Corion]: Nicholas Clark++ # read for a multichar block-delimiter by scanning for the last char, and only then check whether the whole delimiter was read.
[Corion]: At least if you're appending the data read to a larger buffer, this means you avoid the situation of "a delimiter was found but the other half has not been read yet"
choroba misses the context
[Corion]: choroba: Optimizing how Perl reads source code on startup (and then processes it line-by-line)
[Corion]: But in general, it seems to be an interesting approach I should think about - whenever I'm searching for something, to consider if I could search for the end of the token instead of the start of the token

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (11)
As of 2016-12-06 15:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (107 votes). Check out past polls.