in reply to Splitting up a string by lengths

perl -e ' $num = 20050725; $num=~ s/(\d{4})(\d{2})(\d{2})/$1 $2 $3/; print "$1 $2 $3\n";'
prints:
2005 07 25
Regards,
Edward