while($n<@C){$_=$C[$n++]};