Explain a tell function in perl?
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 does polymorphism work in perl? Give an example.
How can you call a subroutine and identify a subroutine?
Explain what is STDIN, STDOUT and STDERR?
What are arrays in perl?
Define say() function in perl?
What does 'do' statement do in perl?
write a Perl script to find a particular word in a paragraph???
How to concatenate strings with perl?
What does the q{ } operator do?
What is hash?
What does init 5 and init 0 do?