... I wanted feed and any words or digits after ...
/d*/ matches zero or more 'd' characters, but does not match "words" (unless they're composed only of 'd' characters) and certainly not decimal digits. Perhaps you want something like /feed[[:alnum:]]*/
c:\@Work\Perl\monks>perl -wMstrict -le
"for my $str (qw(
feed feeder feed001 xfeed001x fee fee001 xfeex --fee-- fe xxx 001
)) {
print qq{'$str' -> },
$str =~ m{ feed [[:alnum:]]* }xms ? '' : 'NO', ' match';
}
"
'feed' -> match
'feeder' -> match
'feed001' -> match
'xfeed001x' -> match
'fee' -> NO match
'fee001' -> NO match
'xfeex' -> NO match
'--fee--' -> NO match
'fe' -> NO match
'xxx' -> NO match
'001' -> NO match
Change the match pattern above to just feed* to see the difference.
Give a man a fish: <%-{-{-{-<
|