perl -ple'$_&=ccnn x y;#;?'