On Friday, Sep 6, 2002, at 23:26 US/Pacific, pelp wrote:
>
> my $change_on = "/FChangeBar Yes/";
> my $change_off = "/FChangeBar No/";
>
>
> $FILE -> open(">test.mif") or die "can't open file";
>
> while ($FILE)
> {
> if ($change_on)
> {
> s/$change_on/$change_off/;
given that you have the "/" elements in the variables,
you may find it nicer to write that as
s!$change_on!$change_off!;
or you might want to think about removing the "/" elements,
or guarding them with "\/....\/"....
> }
> }
ciao
drieux
---
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
