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