Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: Style, style, style

by Aristotle (Chancellor)
on Sep 08, 2002 at 05:10 UTC ( #195981=note: print w/replies, xml ) Need Help??


in reply to Style, style, style

  1. while (<>) { ... } or while (my $line = <>) { ... }
    I keep my loops as short as I can, so the former. I usually feel the need for the latter if I already use $_ elsewhere but that's often a sign that I need to simplify.
  2. -w or use warnings;
    The former. I used the latter when it first became available but got bitten by having to run stuff with an older Perl..
  3. sub CONSTANT () { ... } or use constant CONSTANT => ...;
    The latter, no question. Self documenting.
  4. my ($foo, $bar) = @_; or my $foo = shift; my $bar = shift;
    I always shift $self. Occasionally I shift other stuff when I want to work with the rest of @_. Otherwise, which is 98% of th time, the former.
  5. for (@array) { ... } or foreach (@array) { ... }
    for. I only use for(;;) when I'd have to while(){} continue{}, which so far is never.
  6. print 'foo'; or print('foo');
    The former except for once in a blue moon when there are precendence issues.
  7. 'simple string'; or "simple string"
    The former, unless it's a oneliner where the shell gets the single quotes.
  8. glob '*' or <*>
    The former. Angle brackets are for reading a filehandle in my world.
  9. readline *FOO or <FOO>
    See above; the latter.
  10. for (keys %foo) { $_ and $foo{$_} } or while (my ($key, $value) = each %foo) { $key and $value }
    Always the latter when I don't need the elements in a certain order - for data munging I rarely do. The former tends to show up in I/O related code most of the time which plays along nicely with efficiency concerns, as I/O is usually constrained by external factors anyway.

Makeshifts last the longest.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (8)
As of 2021-06-22 15:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    What does the "s" stand for in "perls"? (Whence perls)












    Results (106 votes). Check out past polls.

    Notices?