in reply to style quest

A cuddled else looks like: 
if (FOO) {
      1;
} else {
      1;
}

[download]
Because the else is cuddled between the {}'s.

In Section Seekers of Perl Wisdom