How does polymorphism work in perl?
No Answer is Posted For this Question
Be the First to Post Answer
Explain perl. When do you use perl for programming? What are the advantages of programming in perl?
what are the two ways to get private values inside a subroutine or block?
What happens when you return a reference to a private variable?
Explain the difference between declarations of 'my' and 'local' variable scope in perl?
How does polymorphism work in perl? Give an example.
What are the different instances used in cgi overhead?
What are arrays in perl?
How can the user execute a long command repeatedly without typing it again and again?
How would you trap error occurred in the perl program/file?
Explain what is STDIN, STDOUT and STDERR?
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,
Why to use perl scripting?