Explain perl one-liner?

965

What is perl I used for?

963

What does read () command do?

938

How to know whether a key exists or not in perl?

982

what are prefix dereferencer and list them out?

1039

Explain perl.

950

How do I replace every character in a file with a comma?

992

What are the various advantages and disadvantages of perl?

901

How do you match one letter in the current locale?

1021

What is perl programming?

1029

Remove the duplicate data from @array=(“perl”,”php”,”perl”,”asp”)

1006

what are the two ways to get private values inside a subroutine or block?

943

What is boolean context?

1002

How to read a directory in perl?

1039

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,

2683