Hi Gregory,
Yes, we realized this much too late. I mindlessly did a cut and paste to
include the fixes you sent me earlier.
Andy
On Thu, 11 Nov 2004, Gregory J. Sharp wrote:
> Some irony - I am reporting a bug that I induced with a previous bug
> report ... sorry about that.
>
> mps_Stage, on or about line 679 should be changed from
>
> while( <CONFIG> ) {
> s/#.*$//; #remove comments
> ($var, $val) = split("\s",$_,2);
> ($x, $val) = split("\s", $val,2) if $val =~ /^= /; # remove =
>
> to
>
> while( <CONFIG> ) {
> chomp;
> s/#.*$//; #remove comments
> ($var, $val) = split(/\s/,$_,2);
> ($val) = (split(/\s/,$val,2))[1] if $val =~ /^= /; # remove =
>
> The chomp is not essential, but right.
> The /\s/ is a pattern. The string "\s" is just "\s", so it splits on
> the letter s.
> The change to the last line is because $x is not needed, and this makes
> that clearer ;-)
>
> --
> Gregory J. Sharp email: [log in to unmask]
> Wilson Synchrotron Laboratory url:
> http://www.lepp.cornell.edu/~gregor
> Dryden Rd ph: +1 607 255 4882
> Ithaca, NY 14853 fax: +1 607 255 8062
>
>
|