Ooops, the HERE line whitespacing is a mistake introduced right before commit, my bad.
Curious about the /usr/bin/env not working, though. What error does it give you? Using env is the general mechanism for finding "system configured" utilities, only requiring that the utility in question be in your PATH. Some implementations don't split arguments so it might be trying to invoke "perl -w" as a command instead of "perl" with a - w argument. How does r39646 look? Cheers! Sean On Jun 22, 2010, at 11:04 AM, Tom Browder wrote: > On Tue, Jun 22, 2010 at 09:17, Christopher Sean Morrison > <brl...@mac.com> wrote: >> >> Tom, >> >> Just wanted to let you know that I've added your metaballs script to >> the repository as a sample procedural geometry generator as src/proc- >> db/metaballs.pl >> >> I did make a minor change to the script in order to quiet the >> db_lookup failures when killing objects that don't exist. Otherwise, >> it's an unmodified version of what you originally submitted to the >> mailing list. Nice inclusion of a sample file! Certainly made >> testing easier. :) > > Glad to hear it's useful. I can probably scrounge up others or make > some more if there is interest. > > BTW, the version on the trunk shows errors on my system: > > 1. The env top line works with Python but not with perl (but it > doesn't matter if it's executed as "perl metaballs.pl"--not usually > done on Linux). > > 2. The HERE tokens must be at the beginning of the line (unless more > tricks are used). > > Here is a patch that works for me: > > <begin-patch> > Index: metaballs.pl > =================================================================== > --- metaballs.pl (revision 39645) > +++ metaballs.pl (working copy) > @@ -1,4 +1,4 @@ > -#!/usr/bin/env perl -w > +#!/usr/bin/perl -w > > # Written by Tom Browder (tom.brow...@gmail.com), 2009-06-18, and > # contributed to the BRL-CAD community to use for any purpose > @@ -41,7 +41,7 @@ > -h Show details on writing an input script. > -f Write to stdout an example script usable in mged. > > - HERE > +HERE > exit; > } > > @@ -271,7 +271,7 @@ > # metaball definition. > > <zero or more additional metaballs> > - HERE > +HERE > exit; > } # help > > @@ -291,6 +291,6 @@ > metaball: mb2 > id: 2 > point: 20 0 5 .5 > - HERE > +HERE > exit; > </begin-patch> > > Regards, > > -Tom > > ---------------------------------------------------------------------- > -------- > ThinkGeek and WIRED's GeekDad team up for the Ultimate > GeekDad Father's Day Giveaway. ONE MASSIVE PRIZE to the > lucky parental unit. See the prize list and enter to win: > http://p.sf.net/sfu/thinkgeek-promo > _______________________________________________ > BRL-CAD Developer mailing list > brlcad-devel@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/brlcad-devel ------------------------------------------------------------------------------ ThinkGeek and WIRED's GeekDad team up for the Ultimate GeekDad Father's Day Giveaway. ONE MASSIVE PRIZE to the lucky parental unit. See the prize list and enter to win: http://p.sf.net/sfu/thinkgeek-promo _______________________________________________ BRL-CAD Developer mailing list brlcad-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/brlcad-devel
