perl -pe 's/cat/++$i/ge' file