$line =~ s/(\d\d)(\d\d)/$1 $2/g;