++$hash{$_} and next if $_ > 5;
[download]

Be careful though about using and this way. Since the precedence of and is extremely low, this is the same as saying:

  # Increment $hash{$_} then if $_ > 5 loop next
  ++$hash{$_} and (next if $_ > 5);
[download]

No, it is not the same at all. The if is a statement modifier and will always be tested first.

  ++$hash{$_} and next if $_ > 5;
[download]

is, as one would expect, the same as:

$_ > 5 and (++$hash{$_} and next);
[download]