Files which are loaded by use or require must return a true value. That is usually done by making the statement, 1; the last perl statement in the file. If you exit the file early with return, a true value represents success, false an error condition.

The major difference between use and do is that use happens at compile time as if it were in a BEGIN block, but do, like require, happens at runtime. There are also differences in the scope of variables and the matter of the return value you found. See perlfunc for details.

thanks. but I tried your solution by putting "1;" at the end of mysub.pm. But it still fails, same error message.

sub mysub1{
  # somecodes
}

sub mysub2{
  # somecodes
}

1;
[download]

"happens at runtime" is slower than "compile time" ?

I just noticed your use syntax, say

use mysub;
# not
# use mysub.pm;
[download]

to load the module. I see a syntax error for that, rather than not returning true, though.

Your example works for me.

After Compline,
Zaxo

thanks guru, but I don't intend to create CPAN module. I just want to use it personally. Does it has to be that complicated as described in that website? Sorry I'm a newbie.

read the part about "Exports".


holli, /regexed monk/

Doe the program work currently with 'use'?
If not, maybe you are missing use lib
Try this:


#!/usr/local/bin/perl 

use lib 'path/to/mysub.pm';
use mysub;
[download]

Package mysub;

sub 1 {

}

sub 2 {

}

1;
[download]

Mr Tucano,


use the module only when you really need it

Thanks for the reply.
But how do I know I really need it? i.e. with *use*
Also having read,pointer by Mr,Displeaser below. Do I need to put all that bell and whistles? (e.g. ISA,etc)

From O'reilly Perl Cookbook:

Problem
You have a module that you don't need to load each time the program runs, or whose inclusion you wish to delay until after the program starts up.

A related situation arises in programs that don't always use the same set of modules every time they're run. For example, the factors program from Chapter 2, Numbers, needs the infinite precision arithmetic library only when the -b command-line flag is supplied. A use statement would be pointless within a conditional because it's evaluated at compile time, long before the if can be checked. So we'll use a require instead:

if ($opt_b) {
    require Math::BigInt;
}
[download]

That doesn't look like a Perl error message. Something else may be going on.

The trick with these sorts of things is to reproduce the behaviour with the smallest possible chunk of code. Copy everything you need to a safe place (for backup), then start excising bits of code. When you stop seeing the error message, you know the part you just took out may be the culprit. Put that code back in, and excise the code around that, making sure you keep seeing the error message. Pretty soon you should have a small example that shows the problem.

Once you have the smallest example that demonstrates the problem, so it to us. :)

Good luck ;)