You need the program name, hence the $0. But you've wrapped the path in backticks, which Perl interprets as an OS command. I think you mean single quotes, but double quotes are better for $0 interpolation:
my $oraProgName = "/path/to/$0"; You could also use the caller function, for example: my $oraProgName = (caller(0))[1]; #progam filename Hope this helps, Nathanael >===== Original Message From Steve Main <[EMAIL PROTECTED]> ===== >Hello list, > >I have a script that will run with the SUID bit set. This of course has >generated a bunch of problems. As I have been working through them I have >come across one that I just can't seem to figure out. > >I want to get this ( or some equivalent) to work: > >$oraProgName = `/usr/bin/basename $0`; > >this command gives me "Insecure dependency in `` while running setuid at" >yada yada yada > >does anyone have a way to make this work? > >thanks for your help > >Steve -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
