in reply to Question regarding "require" or "use"

I can replace use Bar; with require "Bar.pm"; and this seems to work.
Question: what effects does using 'require' instead of 'use' for a module have?

To quote Camel II:

use is exactly equivalent to the following:
BEGIN { require Module; import Module LIST; }

So it would seem that by using 'require' rather than 'use' you are missing out on importing from Module whatever it has to export. You also miss out on bringing the module in at compile time instead of runtime.

UPDATE: chromatic's followup is accurate and helpful. His solutions show how to direct Perl to the path of Foo.pm. The OP's use of the name 'Foo.pm' suggests a module, but it is in fact a filename, and requires that the full path be expressed. The portion about require not taking advantage of import and the BEGIN block is still relevant, and you can see by chromatic's solutions that the issue has to be delt with one way or another.

Dave

"If I had my life to do over again, I'd be a plumber." -- Albert Einstein

Replies are listed 'Best First'.
Re: Re: Question regarding "require" or "use"
by chromatic (Archbishop) on Oct 02, 2003 at 18:23 UTC

    While that's true, that bit of the Camel refers to require Module;, not require "FileName";. In the first case, Perl will resolve a module name to a file path. In the second case, Perl will treat the string as a file path and attempt to resolve it accordingly. (I don't have the source in front of me, so I'll wave my hands over some DWIMmery — there may be a Perl_looks_like_plain_module_name() macro in play there.

    To solve the original poster's problem, either solution one or two will work:

    # solution 1
use lib '/path/to/bar/parent/directory';
use Bar;

# solution 1b
use lib '/path/to/bar/parent/directory';
BEGIN
{
    require Bar;
    Bar->import();
}

# solution 2
BEGIN
{
    require "/path/to/bar/parent/directory/Bar.pm";
    Bar->import();
}

    [download]
[reply]
[d/l]
[select]
      Hi, Unfortunately, solution #1 won't work in my case because I want the script to determine at runtime where it is located. I don't want to hardcode a path.

      updateWhat does the BEGIN block accomplish compared to not having it enclosed like that?

      -------------------------------------
      Nothing is too wonderful to be true
      -- Michael Faraday

[reply]

In Section Seekers of Perl Wisdom