On 12/19/07, Jin Zhisong <[EMAIL PROTECTED]> wrote:
> The following code didn't work.
> my $pattern = ( $type eq 'bcv' ) ? "${match}\s+N\/Asst" :
> "${match}\s+N\/Grp" ;
Did it not work because it did not use qr//? That's at least part of
the problem. It may help you during development if you output the
value of $pattern, so you can see whether it's getting built as you
expect.
Cheers!
--Tom Phoenix
Stonehenge Perl Training
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
