Re: Style, style, style

[Arien]

while (<>) { ... } or while (my $line = <>) { ... }?

The implicit $_, unless spelling things out makes it clearer.

-w or use warnings;?

use warnings; whenever the Perl version lets me.

sub CONSTANT () { ... } or use constant CONSTANT => ...;?

The latter in general, to avoid confusion about intended use.

my ($foo, $bar) = @_; or my $foo = shift; my $bar = shift;?

Option 1, unless there a $self I'll shift of, I'm using default values, or there's a hash being passed by value.

for (@array) { ... } or foreach (@array) { ... }?

Both, depending on what I'm doing. It could even be .... for (@array);.

print 'foo'; or print('foo');?

No parens please, I'll put them in on the rare occasion I need them.

'simple string'; or "simple string"?

Interpolated unless I explicity don't want it.

glob '*' or <*>?

Depending on who will see the code. A lot of people don't know about <*>.

readline *FOO or <FOO>?

<FOO>.

for (keys %foo) { $_ and $foo{$_} } or while (my ($key, $value) = each %foo) { $key and $value }?

That would be door no. 1, please, unless %foo is tied to something like a database, to avoid getting Perl all cranky. :-)

— Arien