It's easy! There is one sample:
sub do_somethig {
my @[EMAIL PROTECTED];
if (! ($passed_params[0])) { print "Not passed parametrs" }
my @lines;
#Do something ...
return @lines;
}On Thu, 25 Sep 2003 21:59:53 -0700, Rajesh Dorairajan <[EMAIL PROTECTED]> wrote:
Can someone explain how does one pass a parameter to a Perl Module? To illustrate suppose I've My::Module
package My::Module;
BEGIN { $scalar = $input; }
use Exporter; our @ISA = qw(Exporter); our @EXPORT = ($scalar);
In the above script is there anyway to pass the $input variable to the
package My::Module from the calling script? Please excuse me if the code is
horrible, just trying to simplify what I want ;)
TIA
Rajesh
-- With best regards, Juris
Using M2, Opera's revolutionary e-mail client: http://www.opera.com/m2/
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
