$var =~ tr/a-z//s; [download]
In reply to Re: perl regex referencing by eff_i_g in thread perl regex referencing by ocs