[Boston.pm] unformatting phone numbers

[Matthew J. Brooks]

Time to liven up the list with some conversation.

Since everyone uses different ways of formatting phone numbers...

[e.g.
(555) 555-5555
555-555-5555
555.555.5555
555 555-5555
]

I'd like to stip out the usual garbage that a user would enter so I can then
reformat it. [Actually it'll be reformatted when it comes out of the
database... wouldn't want to waste any precious bytes on formatting :)]

What I'd like to know is can anyone come up with something less ugly than
this?

$phone =~ s#(\(|\)|-|\.| )##g;


Matthew