On Thu, Aug 01, 2002 at 04:08:29PM +0100, Gary Stainburn wrote:
> Hi all,
>
> I've got the following code segment, which doesn't work. Regardless of the
> contents of $fields{'terms1'} $fields{'invcr'} always contains 'I', as shown
> below.
>
> As far as I can see, the condition looks correct.
>
> __BEGIN__
> $fields{'terms1'}=&tstr(&gettext(7,38,50));
> print STDERR "terms1='$fields{terms1}'\n";
> $fields{'invcr'}=($fields{'terms1'}=~/REVERSE/) ? 'C' : 'I';
> print STDERR "invcr='$fields{invcr}'\n";
> __END__
>
> __BEGIN__
> terms1='***** INVOICE REVERSAL *****'
> invcr='I'
> __END__
Seems fine to me. Would you care to elaborate, and post an example
where you would expect the output to be "C"?
--
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
