Hi Greg,
I just found the new rtpict Perl script, and decided to play with it.
It's a nice and convenient wrapper for vwrays|rtrace, so I think I
will use it in my own scripts. Thank you for writing it.
There is one little glitch that I noticed: it only handles Boolean
options followed by +-yn etc. It doesn't like bare Booleans such as
-w or -i. Adding a '?' after the bracket match on line 46 seems to
fix this:
if ("$ARGV[0]" =~ ('^' . $boopt . '[-+01tfynTFYN]?$')) {
Cheers
Axel
_______________________________________________
Radiance-dev mailing list
[email protected]
https://www.radiance-online.org/mailman/listinfo/radiance-dev
