#!perl -pl $_+=$_%2+1