Cool/useful short examples of Perl?

[Dave Hodgkinson]

On 30 May 2011, at 16:27, Denny wrote:

> On Mon, 2011-05-30 at 15:36 +0100, David Precious wrote:
>>    if (! Email::Valid->address($email_address) ) {
> 
> Something wrong with 'unless'?
> 

Ask Damian.

I also agree, it's a speedbump for my reading. KISS etc.