sub Which($) { my $file = shift; my $loc = `which $file`; chomp $loc; return $loc; } [download]
In reply to Re: Which by raflach in thread Which by ChOas