See perlre about \d, or about the [...] character class notation.

Also, you might want to use <code>...</code> tags around your code and data so it renders and downloads nicely.