Here's one way:

my @path = split /;/,$ENV{PATH};
foreach(@path){
   chdir $_;
   if(-e 'net.exe'){
      print "Application found in $_!\n";
   }
}

-----Original Message-----
From: Jorge Goncalvez
To: [EMAIL PROTECTED]
Sent: 4/12/02 6:15 AM
Subject: RE:search an executable in path

HI, I wanted to know if the Win32 executable net.exe is on Path.
How can I do this in Perl?
Thanks.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


--------------------------------------------------------------------------------
This email may contain confidential and privileged 
material for the sole use of the intended recipient. 
If you are not the intended recipient, please contact 
the sender and delete all copies.

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to