PERL interview questions

PERL quiz questions

  • 1.

    Write syntax to use grep function?


    grep BLOCK LIST
    grep (EXPR, LIST)


  • 2.

    List the data types that Perl can handle?


    Scalars ($): It stores a single value.

    Arrays (@): It stores a list of scalar values.

    Hashes (%): It stores associative arrays which use a key value as index instead of numerical indexes

  • 3.

    Which has the highest precedence, List or Terms? Explain?


    Terms have the highest precedence in Perl. Terms include variables, quotes, expressions in parenthesis etc. List operators have the same level of precedence as terms. Specifically, these operators have very strong left word precedence.

  • 4.

    Write a program to download the contents from website in Perl.


    use strict;
    use warnings;
    use LWP::Simple;
    my $siteurl = '';
    my $savefile = 'content.kml';
    getstore($siteurl, $savefile);


  • 5.

    What is the use of -w, -t and strict in Perl?


    When we use –w, it gives warnings about the possible interpretation errors in the script.

    Strict tells Perl to force checks on the definition and usage of variables. This can be invoked using the use strict command. If there are any unsafe or ambiguous commands in the script, this pragma stops the execution of the script instead of just giving warnings.

    When used –t, it switches on taint checking. It forces Perl to check the origin of variables where outside variables cannot be used in sub shell executions and system calls

  • 6.

    Suppose an array contains @arraycontent=(‘ab’, ‘cd’, ‘ef’, ‘gh’). How to print all the contents of the given array?


    @arraycontent=(‘ab’, ‘cd’, ‘ef’, ‘gh’)
    foreach (@arraycontent)
    print "$_\n";


  • 7.

    Where the command line arguments are stored and if you want to read command-line arguments with Perl, how would you do that?


    The command line arguments in Perl are stored in an array @ARGV.

    $ARGV[0] (the first argument)

    $ARGV[1] (the second argument) and so on.

    $#ARGV is the subscript of the last element of the @ARGV array, so the number of arguments on the command line is $#ARGV + 1

  • 8.

    If you want to empty an array then how would you do that?


    We can empty an array by setting its length to any –ve number, generally -1 and by assigning null list

    use strict;
    use warnings;
    my @checkarray;
    if (@checkarray)
    print "Array is not empty";
    print "Array is empty";


  • 9.

    How many types of operators are used in the Perl?


    Arithmetic operators

    +, – ,*

    Assignment operators:

    += , -+, *=

    Increment/ decrement operators:

    ++, —

    String concatenation:

    ‘.’ operator

    comparison operators:

    ==, !=, >, < , >=

    Logical operators:

    &&, ||, !

  • 10.

    Write syntax to add two arrays together in perl?


    @arrayvar = (@array1,@array2);

    To accomplish the same, we can also use the push function.

  • 11.

    For a situation in programming, how can you determine that Perl is a suitable?


    If you need faster execution the Perl will provide you that requirement. There a lot of flexibility in programming if you want to develop a web based application. We do not need to buy the license for Perl because it is free. We can use CPAN (Comprehensive Perl Archive Network), which is one of the largest repositories of free code in the world.

  • 12.

    “The methods defined in the parent class will always override the methods defined in the base class”. What does this statement means?


    The above statement is a concept of Polymorphism in Perl. To clarify the statement, let’s take an example:

    package X;
    sub foo
    print("Inside X::foo\n");
    package Z;
    @ISA = (X);
    sub foo
    print("Inside Z::foo\n");
    package main;

    This program displays:

    Inside Z::foo

    – In the above example, the foo() method defined in class Z class overrides the inheritance from class X. Polymorphism is mainly used to add or extend the functionality of an existing class without reprogramming the whole class.

  • 13.

    How the interpreter is used in Perl?


    Every Perl program must be passed through the Perl interpreter in order to execute. The first line in many Perl programs is something like:


    The interpreter compiles the program internally into a parse tree. Any words, spaces, or marks after a pound symbol will be ignored by the program interpreter. After converting into parse tree, interpreter executes it immediately. Perl is commonly known as an interpreted language, is not strictly true. Since the interpreter actually does convert the program into byte code before executing it, it is sometimes called an interpreter/compiler. Although the compiled form is not stored as a file.

  • 14.

    Which guidelines by Perl modules must be followed?


    In Perl, the following guidelines must follow by the modules:

    The file name of a module must the same as the package name.

    The name of the package should always begin with a capital letter.

    The entire file name should have the extension “.pm”.

    In case no object oriented technique is used the package should be derived from the Exporter class.

    Also if no object oriented techniques are used the module should export its functions and variables to the main namespace using the @EXPORT and @EXPOR_OK arrays (the use directive is used to load the modules).

    Above are guidelines and are not mandatory

  • 15.

    How can you define “my” variables scope in Perl and how it is different from “local” variable scope?


    $test = 2.3456;
    my $test = 3;
    print "In block, $test = $test ";
    print "In block, $:: test = $:: test ";
    print "Outside the block, $test = $test ";
    print "Outside the block, $:: test = $::test ";


    In block, $test = 3

    In block, $::test = 2.3456

    Outside the block, $test = 2.3456

    Outside the block, $::test = 2.3456

    The scope of “my” variable visibility is in the block only but if we declare one variable local then we can access that from the outside of the block also. ‘my’ creates a new variable, ‘local’ temporarily amends the value of a variable.

  • 16.

    Which functions in Perl allows you to include a module file or a module and what is the difference between them?



    1. The method is used only for the modules (only to include .pm type file)

    2. The included objects are verified at the time of compilation.

    3. We don’t need to specify the file extension.

    4. loads the module at compile time.


    1. The method is used for both libraries and modules.

    2. The included objects are verified at the run time.

    3. We need to specify the file Extension.

    4. Loads at run-time.

    suppose we have a module file as “”

    use Module;


    require “”;

    (will do the same)

  • 17.

    How many types of primary data structures in Perl and what do they mean?


    The scalar: It can hold one specific piece of information at a time (string, integer, or reference). It starts with dollar $ sign followed by the Perl identifier and Perl identifier can contain alphanumeric and underscores. It is not allowed to start with a digit. Arrays are simply a list of scalar variables.

    Arrays: Arrays begin with @ sign. Example of array:

    my @arrayvar = (“string a”, “string b “string c”);

    Associative arrays: It also frequently called hashes, are the third major data type in Perl after scalars and arrays. Hashes are named as such because they work very similarly to a common data structure that programmers use in other languages–hash tables. However, hashes in Perl are actually a direct language supported data type.

  • 18.

    In Perl, there are some arguments that are used frequently. What are that arguments and what do they mean?


    -w (argument shows warning)

    -d (use for debug)

    -c (which compile only not run)

    -e (which executes)

    We can also use combination of these like:


  • 19.

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


    perl -pi.bak -e 's/\t/,/g' myfile.txt


  • 20.

    Write a program to concatenate the $firststring and $secondstring and result of these strings should be separated by a single space.



    $result = $firststring . ” “.$secondstring;


    $firststring = "abcd";
    $secondstring = "efgh";
    $combine = "$firststring $secondstring";
    print "$Combine\n";


    abcd efgh


© 2017