Select Code to Download

# 1.
... map { ... } @array;
...
# 14. Blame [tye]
for( pipe(IN,OUT) && do { local $,=$/; print IN @array,'' } && <OUT> )
+ { ... }

my @array;
$_++ foreach @count;

my @array=map $_+1,@count;