Consider the following program code:
$Animal = Dogs bark;
package Cat;
$Animal = Cats purr;
{
package Fish;
$Animal = Fish swim;
} p
ackage main;
print $Animal;
What is the result of executing this program code?
In Perl, packages are used for which task?
Consider the following program code:
@array = ("ALPHA", "beta", "GaMmA");
sort(@array);
print("@array");
What is the output of this code?
Consider the following program code:
@arrayA = (10, 20, 30);
@arrayB = @arrayA;
$arrayB[1] = 40;
print $arrayA[1];
What is the output of this code?
Consider the following lines of code:
$_ = "This is a test";
s/^([^ ]*)\s*([^ ]*)/$2 $1/;
print;
What is the output of these lines of code?
Consider the following program code:
%employees = ("Lucy", "Accounting", "Armando", "Finance",
"Adrienne", "Marketing");
delete($employees{"Lucy"});
Which of the following lines of code has the same effect as the preceding code?
Consider the following code:
%hashA = ("alpha", "beta", "gamma", "alpha");
%hashA = reverse(%hashA);
print $hashA{"alpha"};
What is the result of executing this code?
Which one of the following choices lists only valid expression operators?
Which one of the following statements opens a file for appending?
Consider the following program code:
if ("cool" =~ m/[cool]{4}/)
{
print("True ");
}
else
{
print("False ");
}
if ("cool" =~ m/[col]{4}/)
{
print("True ");
}
else
{
print("False ");
}
What is the output of this code?