$arr[$i] =~ s/^\c[A-Z]//g; [download]
$arr[$i]=~ s/\cO//g; [download]
In reply to Control characters by sandy1028