NAME

FindBin::Bin - Find the executin directory, exported via BIN()

SYNOSIS

            

              
              
# if $0 is '-e' or '-' or 'interactive' then use the
# working directory via File::Spec::Functions::curdir.
# otherwise use vol+directory of $0.
#
# the path is extracted once at startup to avoid
# issues with assignment to $0.
# there you have it: $Bin is the path.
use FindBin::Bin qw( $Bin );
# sub call, sans $:
# Bin is defines w/ no args and returns a constant string, 
# it can be used as a sub or constant in your code. 
use FindBin::Bin qw(  Bin );
my $path = Bin;
# Or, of course, both:
use FindBin::Bin qw( $Bin Bin );
say $Bin;
/scratch/lembark/sandbox/Modules/Perl5/FindBin-libs
say Bin;
/scratch/lembark/sandbox/Modules/Perl5/FindBin-libs