$s = 'a10';; $s =~ s[(.)(.+)][\U$1:$2];; print $s;; A:10 [download]
In reply to Re: How would I change a10 into A:10 in perl? by BrowserUk in thread How would I change a10 into A:10 in perl? by Tails