perl -le '$line1 = "asdadAADSAsdfsfASASDjljsdASDAS"; $line1 =~ tr/[A-Za-z]/[a-zA-Z]/;print $line1;'