Interested to Buy Any Domain ? << Click Here >> for more details...
Assuming both a local($var) and a my($var) exist, what's the difference between ${var} and ${"var"}?
983If EXPR is an arbitrary expression, what is the difference between $Foo::{EXPR} and *{"Foo::".EXPR}?
1008Perl uses single or double quotes to surround a zero or more characters. Are the single(' ') or double quotes (" ") identical?
926What happens to objects lost in "unreachable" memory, such as the object returned by Ob->new() in `{ my $ap; $ap = [ Ob->new(), $ap ]; }' ?
989
how to extract pin_code,phone_number,year from text file using regular expressions in perl
What is the usage of -i and 0s options?
How to print escaping characters inside a string in perl?
Explain the various characteristics of perl.
Write a program to decode the data in the form using cgi programming
What happens to objects lost in "unreachable" memory, such as the object returned by Ob->new() in `{ my $ap; $ap = [ Ob->new(), $ap ]; }' ?
What is the difference between perl array and perl hash?
How does a “grep” function perform?
How to convert arrays into a string in perl?
what is Polymorphism in Perl?
Differences between die and exit.
What is subroutine in perl?
What's the difference between /^Foo/s and /^Foo/?
What is perl scripting?
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,
