> > If you have a way to determine at
> > start-up that you're running under bash, you could hard-wire this or
> > at least change the default in that environment.  See the following
> > docs on how this works:
>
> I currently use the following to detect bash.  While it is probably
> possible to fool it, it isn't easy and, if the user wants to force
> Perl into thinking it is running under Bash when it is really DCL,
> I'm not sure that is an issue.
>
> if getenv("SHELL") == "bash"
> and
> if argv[0] is in Unix format and is == getenv("_")
> then bash environment is assumed.

Oops, I forgot.  If argv[0] is just a filename (i.e. contains no /
or [ ) I prepend a ./ before comparing it to getenv("_").

Mark Berryman

Reply via email to