Path: utzoo!attcan!uunet!brunix!jsb
From: jsb@cs.brown.edu (John Bazik)
Newsgroups: comp.lang.perl
Subject: taintedness
Message-ID: <55514@brunix.UUCP>
Date: 6 Nov 90 16:25:16 GMT
Sender: news@brunix.UUCP
Reply-To: jsb@cs.brown.edu (John Bazik)
Organization: Brown University Department of Computer Science
Lines: 18

In moving some scripts I wrote under pl18 to pl37, I ran across this:

	Insecure PATH at /cs/lib/admin/perl/file.pl line 458.

The offending statement is:

	sub main'getwd {
>>>		$_ = `/usr/bin/pwd`;
		chop;
		return $_;
	}

I think it's safe to trust pwd.  How do I tell perl to let this go??

If only getwd was built-in...

John Bazik
jsb@cs.brown.edu