in reply to using regular expressions showing just the hits.
\D+ stands for "non-digit repeated". You want "alphanumeric repeated", so try
while ( /([[:alnum:]]+)(\@dh\.nl)/g ) { my ($name, $domain) = ($1, $2); print "$name$domain\n"; }
لսႽ† ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: using regular expressions showing just the hits.
by fritsimeel (Initiate) on Apr 05, 2013 at 15:13 UTC | |
by choroba (Cardinal) on Apr 05, 2013 at 15:18 UTC | |
by fritsimeel (Initiate) on Apr 05, 2013 at 15:33 UTC |
In Section
Seekers of Perl Wisdom