m/00(\d{3})\.000(\d\d)\.00(\d{3})\.0000\.0000/ and print "$1$2$3";