Interested to Buy Any Domain ? << Click Here >> for more details...
package MYCALC;
use Exporter;
our @EXPORT = ();
our @ISA = qw(Exporter);
our @EXPORT_OK = qw(addition multi);
our %EXPORT_TAGS = (DEFAULT => [qw(&addition)],Both =>
[qw(&addition &
+multi)]);
sub addition {
return $_[0] + $_[1];
}
sub multi {
return $_[0] * $_[1];
}
1;
Program:
use strict;
use warnings;
my @list = qw (2 2);
use Module qw(:DEFAULT);
print addition(@list),"\n";
Above coding is my module MYCALC and the program which using
this module, I have not exported any function using @EXPORT,
but I have used the DEFAULT in %EXPORT_TAGS with the
function addition, when I call this function from the main
it says the error as,
- 0 Answers
- 2684 Views
- I also Faced
- E-Mail Answers
No Answer is Posted For this Question
Be the First to Post Answer
List the data types that Perl can handle?
What is the syntax used in Perl grep function?
Can any1 tell me 2 write the script using perl script 2 looking at a log file 2 see wheather the test has passed or not.
When would you not use Perl for a project?
In Perl we can show the warnings using some options in order to reduce or avoid the errors. What are that options?
How do I generate a list of all .html files in a directory?
What can be done for efficient parameter passing in perl?
What is a perl references?
What does read () command do?
How to close a file in perl?
how to connect cisco switch uisng perl script
What is the difference between use and require in perl?
ASP 
