perl -E '$from = 0; $to = 10; say $to while $to --> $from' perl -E '$from = 0; $to = 10; say $to while $from <-- $to' [download]
In reply to Re: pointy counters by choroba in thread pointy counters by tobyink