Print

---

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