On Dec 16, 2003, at 6:38 AM, Vic Norton wrote:

Thanks for the tip, Ken. I was not aware of FindBin. The combination

   use FindBin($Bin);
   use lib "$Bin/../ThisProjectLib;

is a particularly nice idea.

For maximum portability, I use:


use File::Spec::Functions qw(catdir updir);
use FindBin qw($Bin);
use lib catdir $Bin, updir, 'lib';

Regards,

David

--
David Wheeler                                     AIM: dwTheory
[EMAIL PROTECTED]                              ICQ: 15726394
http://www.kineticode.com/                     Yahoo!: dew7e
                                               Jabber: [EMAIL PROTECTED]
Kineticode. Setting knowledge in motion.[sm]



Reply via email to