[MacPerl] No Tainting?

[Kevin Hemenway <info@totalnetnh.net>]

I've wanted to use tainting in a script, and have politely added this to my 
shebang (yes, MacPerl "checks for !# line").

#!/usr/bin/perl -wT

Primarily, I develop on the Mac so I can use the wonders of BBEdit 6.0 from 
Bare Bones (did it again, did you see that Jim? no spanking for that other 
guy! [injoke to BBEdit-Talk people]). But, I have every intention of my 
programs running under Windows, Linux, and the Mac as well.

So, anyways, I turn on -T, and I get an error from MacPerl saying that it's 
"too late for -T". Doing a Shuck on "taint", "-T", "taint mode" and so 
forth brings nothing exciting up. Nor does the Camel Book list that error 
message.

I know there's a menu item in MacPerl where I can enable taint checking, 
but that limits me to tainting on the Mac only, which although can prove 
helpful, doesn't excite me if someone decides to fuxor with the script on 
other OS's.

My questions:

   a) Why can't I use -T on the shebang in MacPerl? (or,
      if I can, what's my problem?

   b) Is there any system variable I can set after I
      determine what OS I'm using?

b) deserves some more info. Right now, I check for my path delimiter by 
comparing $^0 and then setting $delimiter to whatever I need (: for Mac, 
etc.). Can I turn on tainting based on this check as well? (ie. live with 
menu tainting in MacPerl, but turn tainting on for other OS's.)

Kevin Hemenway
-- -----------------------------------------------------------------
Total Net NH, LLC             EMAIL: <info@totalnetnh.net>
15 Pleasant St., Suite 11     WEBSITE: <http://www.totalnetnh.net/>
Concord, NH 03301             PHONE: (603) 225-8422
--------------------------------------------------------------------



# ===== Want to unsubscribe from this list?
# ===== Send mail with body "unsubscribe" to macperl-request@macperl.org