Explain the default scope of variables in perl?
No Answer is Posted For this Question
Be the First to Post Answer
Why aren't Perl's patterns regular expressions?
List the operator used in Perl?
my @array=('data1','data2'); my @array1=('data1','data2'); my ($i,$k); $i=7; $k=7; while($i){ $array [++$#array] = 'ree'; $i--; print "@array"; } while($k){ push(@array1,'ree'); $k--; print "@array1"; } Are these two while loop are doing the same functionality ? What may be the difference?
Does Perl have reference type?
How to turn on Perl warnings? Why is that important?
What happens when you return a reference to a private variable?
How many ways can we express string in Perl?
Assuming both a local($var) and a my($var) exist, what's the difference between ${var} and ${"var"}?
How do I read command-line arguments with Perl?
What are the advantages of perl programming?
How do I send e-mail from a Perl/CGI program on a Unix system?
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,