Your code doesn't show any attempts at matching , or you want what?
my( @this ) = $line =~ /$regex/gi; my @want = ( 'DATE', '_RE_IRD_Soc' ); Test::More::is_deeply( \@this, \@want, "got what I needed");
This ought to do
$regex = qr{ \$ \( ( [^\)]+ ) # $1 \) (.*) # $2 }xmi;
In reply to Re: regex needed
by Anonymous Monk
in thread regex needed
by doubledecker
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |