Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Re: require issue.

by osunderdog (Deacon)
on Mar 02, 2007 at 12:56 UTC ( #602871=note: print w/replies, xml ) Need Help??


in reply to require issue.

I ran through this with the debugger:

$perl -d main.pl Loading DB routines from perl5db.pl version 1.25 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(main.pl:4): require "somefile.pl"; DB<1> S newform* newform::func1 newform::someFile newform::someFile1 DB<2> S main* main::BEGIN DB<3>

So the functions you are requiring are getting included in the package.. because that's where you require them.

One thing that require does is "check for redundant loading, skipping already loaded files." So in this case, the required script is getting included in the package. The package is compiled first. The second time that require is called is at the main, however this is after the package has been compiled. So at that time, the require fails/does not include the package a second time.

So I changed the main code to scope the function call:

use strict; require "somefile.pl"; use newform; &newform::someFile(); &newform::func1();

and it works as expected.

Alternatively you could do this in your main:
sub BEGIN { require "somefile.pl"; }

Which would force the require before the newform package, however you would have to also change the call to someFile in the newform package:

&main::someFile();

which might not make sense.

Hazah! I'm Employed!

Replies are listed 'Best First'.
Re^2: require issue.
by ant (Scribe) on Mar 02, 2007 at 13:29 UTC
    After posting that request for help I continued looking for a solution and came up with this.

    in newform.pm I commented out the require statement
    package newform; #require "somefile.pl"; sub func1 { main::someFile1(); print "Inside func1"; } 1;
    I left the Requires('somefile.pl') in the Main.pl, Then, when in the newform.pm and I wanted to use the someFile1 function I called main::someFile1(); This seemed to work!

    Thanks all for looking into this also.
      Or put a package main; at the beginning of somefile.pl; that way each other file that uses something from somefile.pl makes sure that it's loaded, but always knows what package to expect it to be loaded into.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://602871]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (4)
As of 2020-12-01 08:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?