I use strict and warnings on both, is there a problem with that? I am not sure what undeclared variable you are talking about? $var1 and $var2 are declared earlier in the script and $openreturn is declared inline.
------------------------------
Module NOTES
use strict;
use warnings;
use Win32::OLE;
use Win32::OLE::Variant;
use Date::Manip;
use base 'Exporter';
use vars qw($VERSION @EXPORT @EXPORT_OK);
($VERSION) = ' $Revision: 0.1 $ ' =~ /\$Revision:\s+(^\s+)/;
@EXPORT = qw( OpenNotes CloseNotes FetchNotesDoc Search FTSearch ); # Exported by Default
@EXPORT_OK = qw(); # Exported if Reference
rest of code
-----------------------------
Test Script test.pl
use strict;
use warnings;
use Win32::OLE;
use Win32::OLE::Variant;
use NotesOLE;
Bunch of variable stuff
my $openreturn = OpenNotes($dbname,$server);
Rest of code.
---------------------------
It is my understanding that if you use base 'Exporter'; you don't have to declare @ISA in vars, I tried both and had no success!
Tried Export(..) with use Module and Export_ok(…) with use Module qw(sub);
Thanks for the response.
</BODY> </HTML>In reply to Re: Re: Calling a subroutine located in a module
by Anonymous Monk
in thread Calling a subroutine located in a module
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |