#!perl -p040l
s//$.%2?0>++$#a:"
@a"/ge