calling a subroutine while Initializing new

[opensourcer]

hi,

i'm creating new instance like this:

my $instance = new MYPACKAGE(READ_ONLY => 1, \&subroutine);

could any 1 explain where the subroutine in defined, i mean in the same program or in package called MYPACKAGE. if possible with example plz.

Code tags added by GrandFather

[chromatic]

Which subroutine?

If you're talking about the constructor new(), it should be in MYPACKAGE. (I say "should be" because with the syntax you're using there, a lot of weird things could happen. I recommend instead my $instance = MYPACKAGE->new( READ_ONLY => 1, \&subroutine );.)

If you're talking about subroutine(), it depends. The only necessary condition is that there is a subroutine of that name in the current package. However it is in that package, whether by declaration or export or AUTOLOAD or installation into the symbol table otherwise, it just has to be there.

[jkeenan1]

Most typically, you would define the subroutine in the package where the constructor is being called -- probably package main;.

Note: for the most part, Perl classes, modules and packages (with the exception of main) are generally spelled in upper and lower case: MyPackage or My::Package -- not in all upper case.

[neosamuri]

If you are passing wanting to pass the subroutine to the module(as you are doing above), then the subrutine should be defined in the file that instantiates the object.

If you are not wanting to pass the subroutine in to the module, then it should be in the package file and called from the new subroutine.