Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Answer: How can I write and call subroutines in separate files?

by cLive ;-) (Prior)
on Apr 02, 2001 at 07:31 UTC ( #68925=categorized answer: print w/replies, xml ) Need Help??

Q&A > subroutines > How can I write and call subroutines in separate files? - Answer contributed by cLive ;-)

If you're using strict, you need to declare the package name as well (and it's probably best to if your code's big enough to suggest splitting :)
# file one use File2; File2::setup(); main(); # or ::main() (this package) or main::main() very specific # "default" package name for main script (the one requiring other file +s) is 'main' # print var foo from package File2 print $File2::foo . "\n"; sub main { print "I am in the main subroutine.\n"; } # file 2 package File2; sub setup { print "Setting up.\n"; } $::foo = 'bar'; # or define explicitely $File2::foo = 'bar'; 1; # use'd files have to return true!

Log In?

What's my password?
Create A New User
[Corion]: A good morning to everybody ;)

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (4)
As of 2018-06-24 06:26 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.