How can you call a subroutine and identify a subroutine?
No Answer is Posted For this Question
Be the First to Post Answer
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,
How to count no of occurrence of a unique patterns in perl?
Explain the difference between my and local?
How do I send e-mail from a Perl/CGI program on a Unix system?
Explain 'grep' function.
Explain what is STDIN, STDOUT and STDERR?
Explain grooving and shortening of arrays and splicing of arrays?
List all the features of perl programming?
Comment on the scope of variables in perl.
Explain ivalue in perl?
What are the purpose of close(), getc() and read() functions?
How will you create a file in perl?