how to add script directory to @INC

bdimych has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: how to add script directory to @INC by ikegami (Patriarch) on Jan 11, 2009 at 18:02 UTC
Shorter: `use lib $0 =~ m\|(.*)/\|;` [download] But how about something that actually works instead. What you have there doesn't handle symlinks or non-unix systems. `use Cwd qw( realpath ); use File::Basename qw( dirname ); use lib dirname(realpath($0));` [download]	[reply] [d/l] [select]
Re: how to add script directory to @INC by ysth (Canon) on Jan 11, 2009 at 22:49 UTC
See FindBin -- Online Fortune Cookie Search Office Space merchandise	[reply]
Re^2: how to add script directory to @INC by zrajm (Beadle) on Feb 17, 2009 at 19:28 UTC
Also see FindBin is broken (RE: How do I get the full path to the script executing?).	[reply]