END{for(s="[^369]*";1e3>=$0=++i;){gsub(s"[369]"s,"Clap");print}}