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"}?
986If EXPR is an arbitrary expression, what is the difference between $Foo::{EXPR} and *{"Foo::".EXPR}?
1009Perl 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
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 the meaning of perl one-liner?
What does the qx{ } operator do?
What is use of ‘->’ symbol?
How to create a package?
How can I implement the function overloading in Perl ? I read about the operator overloading, I do not know how to implement the function overloading. Thanks in advance ?
What is the use of 'ne' operator?
What are the various advantages and disadvantages of perl?
Explain join function in perl?
How to close a directory in perl?
How does polymorphism work in perl?
Mention what is cpan?
Remove the duplicate data from @array=(“perl”,”php”,”perl”,”asp”)
Explain lists ?
How are parameters passed to subroutines in perl?
