Technically, when you open a file called "Images/foo.png", perl will use the current process' current working directory (which defaults to the same as the parent process was using when your perl app was started). So, unless you happen to already be in the lib directory when you started (or manually changed since then), no, that won't work.

What you can do, potentially, is to look for yourself in %INC and figure out everything relative to that. e.g.:

use File::Basename; (my $pm_name = __PACKAGE__ . '.pm') =~ s[::][/]g; my $images_dir = File::Spec->catdir(dirname($INC{$pm_name}), 'Images') +;
This is depending on the concept that you follow all normal perl conventions (one package per pm file, the pm file is in a path where ::'s become /'s (or \ on windows), and a .pm is added to the end). If you don't, well, you'll have to look at %INC yourself to figure out what to do to figure out where you are.


In reply to Re: Where to keep images so a module can find them by Tanktalus
in thread Where to keep images so a module can find them by sweetser

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.