exactly the same as mine ... well except for the varnames :

Code:

break on

$a = 1, 2 ,-3, 4, -5, -7, 8, 9

;! Tee
for each $ in $a
    $_ = $_ + ($>0)
;! Hole


I am pretty sure there is no further improvement possible.

@Allen: just having some fun with the sample course from Jens' announcement
_________________________