Write syntax to use grep function?
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,
Explain ivalue in perl?
Why is it hard to call this function: sub y { "because" } ?
What are the characteristics of a project that is well suited to Perl?
What is the peculiarity of returning values by subroutines in perl?
What are scalar data and scalar variables?
Explain arrays in perl.
How do you open a file for writing?
Explain returning values from subroutines?
Explain split function in perl?
Create a function that is only available inside the scope where it is defined ?
In Perl, what is grep function used for?