in reply to Short form (ternary) if else
perl -e 'my $n = 10; (1)? $n++ : $n--; print qq~This is $n\n~;'
This is 11
Celebrate Intellectual Diversity
Once (shame on you!)
Twice (shame on me!)
More often than I'd like to be
All the time
Just when answering stupid polls
Who you callin' a fool?
I refuse to vote in this ridiculous poll
Results (531 votes). Check out past polls.