CGI Perl Interview Questions
Questions Answers Views Company eMail

What is the difference between for & foreach, exec & system?

Wipro, Photon,

9 27670

Name an instance where you used a CPAN module?


3 8062

How do you open a file for writing?

6 7732

How would you replace a char in string and how do you store the number of replacements?

2 10785

When would you not use Perl for a project?


1 8532

What is a hash?

Photon, Wipro, Satyam,

6 8760

What is the difference between chop & chomp functions in perl?

TCS, DELL, Cap Gemini, Electronic Data,

10 35501

Write a script for 'count the no.of digits using regular expressions in perl..


6 11829

i have a folder called 'error' and in that, i have error log files which are generated by the build, now i want to findout the string 'error' from each log file and that error has to be copied into the another file called 'analysis'. how do you do this in perl?


5 5783

Can any1 tell me 2 write the script using perl script 2 looking at a log file 2 see wheather the test has passed or not.


3 4757

What is the difference between module and package?

Symantec, EDS, IBM,

4 24128

How can you create an object of a class in a package?


4 5370

what is the procedure to define a user define module in your perl application?


2 4201

How would you trap error occurred in the perl program/file?


3 7083

what r the different type of function in perl ???

ABC, Symphony,

1 5092

Post New CGI Perl Questions

Un-Answered Questions { CGI Perl }

how to create a flat file database as shown below name age city phone 0 hema 22 Calcutta 4312542 1 hema 21 Bangalore 2344345 2 ganesh 25 delhi 2445454 3 kartik 45 pune 4312121 4 santosh 25 Hyderabad 2254231 5 kumar 25 mysore 2344567 6 gita 34 mangalore 6532123 7 gita 32 pune 2213456 Q1.print the details of the person who r from bangalore q2.Replace the city name managlore to pune q3.prints no of person having name gita and hema q4.print how many are of age 25.


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


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 we use CGI?


how to get back up from private character editor which is saved in the format of .udf


Hi, I am a accountant. I am preparing a balance sheet but because of staff shortage and time pressures I cant complete it on time. There is lot of common data with last years which I need not retype and I can manage by editing last year’s balance sheet ? Is their any software on net where I can do this easily??


There is no strict data types in perl unlike in other high level languages like Java so wouldn't that be a problem if a code in perl is to be a written by a big team of 20+ members ?"


how to connect cisco switch uisng perl script


How to disable the mod_perl from apache_server as i have used perlfect search on the site and its pagination is not working and the remedy is to disable the mod_perl.


what are steps to do to lock the sony ericsson mobile with password?


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 ?


We all know private variables exist in perl. But do private METHODS exist in perl ? Eg ?


how to extract pin_code,phone_number,year from text file using regular expressions in perl


I have one question regarding to eval function. I know eval function is use for error checking but I am not able to understand below line. eval \'exec perl -S $0 ${1+\"$@\"}\' if 0; $0 for script name $@ set if error occur