P is for Practical | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
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
|
|