Is there a way using sprintf, or a Perl function to take a
Phone number and make it formatted something like this:
or even 123-456-7890 would work.
I've looked at the perldoc for sprintf, but did not see anything like it. I would appreciate any tips on this.