in reply to Another puzzled RegEx Problem.

Substitutions aren't everything. How about :
my $d = "123456789";
$d = join "-", $d =~ /(\d{1,2})/g;

[download]

Replies are listed 'Best First'.
Re^2: Another puzzled RegEx Problem.
by pysome (Scribe) on Sep 13, 2007 at 00:59 UTC
    Yes.
[reply]

In Section Seekers of Perl Wisdom