[boulder.pm] Where is my module?

[Robert L. Harris]

Thus spake Daniel Moore (moore at xor.com):

> On Sun, 11 Jun 2000, Robert L. Harris wrote:
> 
> > 
> > 
> > I cut/paste this in exactly as you have it.  No change to the output when
> > I run the script.  When I had typo'd the module name originally (forgot the .pm)
> > it screamed up a storm, so I'm sure it's finding the module.
> > 
> > It just can't find the function.
> > 
> 
> Hi,
> 
> It's good to know that the module is being found.  
> 
> Can we see how you're calling newFileArrival()?  

  my ($FileID)= &newFileArrival("GEC", "GEN3", "$File", "Getting DEF FileID", -1);
gave the below error.


hmm, I'd forgotten &LOADgen3::newFileArrive method.  That appears to ahve worked alot better.
Gives an error, but that's in the module and up to the author to fix.

Thanks.
  Robert



> Is newFileArrival in package main?  Have you tried calling 
> &LOADgen3::newFileArrival()?
> 
> Thanks,
> Dan
> 
> > 
> > Thus spake Daniel Moore (moore at xor.com):
> > 
> > > On Sun, 11 Jun 2000, Robert L. Harris wrote:
> > > 
> > > > 
> > > > 
> > > > I get this:
> > > > Undefined subroutine &main::newFileArrival called at ./DefMungeSplit.pl line
> > > >         361 (#1)
> > > >     
> > > >     (F) The subroutine indicated hasn't been defined, or if it was, it
> > > >     has since been undefined.
> > > >     
> > > > Uncaught exception from user code:
> > > >         Undefined subroutine &main::newFileArrival called at ./DefMungeSplit.pl line 361.
> > > >         main::GetFileID('../DEF.EBCDIC-06-07-2000-10-00.gz') called at ./DefMungeSplit.pl line 106
> > > > 
> > > > 
> > > > The subroutine, newFileArrival is defined in a module:
> > > > 
> > > > my ($LoadGen3Script)="$ENV{SCRIPT}"."/"."LOADgen3.pm";
> > > > eval (require $LoadGen3Script);
> > > > 
> > > > I can vi the LOADgen3.pm file and see that the subroutine is there.  
> > > > I don't get any other errors durring execution, yet.
> > > > 
> > > > 
> > > > Help?
> > > 
> > > Are you checking $@ for errors after you require the module?
> > > 
> > > e.g.
> > >  my ($LoadGen3Script)="$ENV{SCRIPT}"."/"."LOADgen3.pm";
> > >  eval (require $LoadGen3Script);
> > >  if ($@) {
> > >     die "error in loading script: $@";
> > >  }
> > > 
> > > Dan
> > 
> > 
> > 
> > :wq!
> > ---------------------------------------------------------------------------
> > Robert L. Harris                |  Micros~1 :  
> > Senior System Engineer          |    For when quality, reliability 
> >   at RnD Consulting             |      and security just aren't
> >                                 \_       that important!
> > DISCLAIMER:
> >       These are MY OPINIONS ALONE.  I speak for no-one else.
> > FYI:
> >  perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);'
> > 
> > 
> 
> Dan Moore
> Programmer
> XOR Inc.



:wq!
---------------------------------------------------------------------------
Robert L. Harris                |  Micros~1 :  
Senior System Engineer          |    For when quality, reliability 
  at RnD Consulting             |      and security just aren't
                                \_       that important!
DISCLAIMER:
      These are MY OPINIONS ALONE.  I speak for no-one else.
FYI:
 perl -e 'print $i=pack(c5,(41*2),sqrt(7056),(unpack(c,H)-2),oct(115),10);'