CGI Perl Interview Questions
Questions Answers Views Company eMail

How do you debug a Perl scripting ( at the compile time error or run time error) in Unix environment ?

4 8222

how to search a unique pattern in a file by using perl hash map function ??? plz answer me

2 6679

how to install a package in perl ????

2 4750

How to count no of occurrence of a unique patterns in perl?

Ness Technologies,

4 13808

what is the difference between require and use in perl?

IBM,

3 8720

what is the difference b/w coldfusion MX 6 and Coldfusion MX 7?

1 4055

Which web site will help the student to download the Java mini Project ?

3 3359

while(my($key, $value) = each(%hash) ) { print "$key => $value\n"; } my($key, $value); while(($key, $value) = each(%hash) ) { print "$key => $value\n"; } What is the different between these two code in case of "my" usage ?

1 4444

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?

A1 Technology,

1 3246

What is the difference between $array[1] and @array[1]?

1 3876

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 ?

2488

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?

2 3269

Consider the following example #! /bin/perl use strict; sub sample { my @arr=(1,2,3,4); return @arr; } my ($a,$b,$c,$d) = &sample; print "$a\n$b\n$c\n$d\n"; In the above code, How can I get the $c without using the arguments such as $a,$b. I don't want to use any array to get the return values.

2 3149

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,

2253

write a script to check whether user enter a value is a leap year or not?

Oracle, Persistent, ViPrak,

3 14347


Post New CGI Perl Questions

Un-Answered Questions { CGI Perl }

What does the q{ } operator do?

504


What is use of ‘->’ symbol?

523


How do you you check the return code of a command in perl?

568


How do I send e-mail from a Perl/CGI program on a Unix system?

574


How to get help for perl?

575






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,

2253


How will you open a file in read-only mode in perl?

495


what is the function of Return Value?

552


What is the main function of cookie server?

516


What does the qx{ } operator do?

497


how to connect cisco switch uisng perl script

3373


How to check the status of airplane mode (enable/disable) in perl for Android mobile?

2602


Which feature of perl provides code reusability?

561


What is 'rollback' command in perl?

538


Explain perl one-liner?

503