@arr = ('092205', '092305', '092605'); map {s/^(\d{2})(\d{2})(\d{2})/$1\/$2\/$3/} @arr; $" ="\n"; print "@arr";