New Year Sale Special Limited Time 70% Discount Offer - Ends in 0d 00h 00m 00s - Coupon code: xmas50

CIW 1D0-437 - CIW PERL FUNDAMENTALS

CIW 1D0-437 Premium Access     Download Demo    
Page: 2 / 5
Total 149 questions

Consider the following lines of code:

$_ = "This is a test";

s/^([^ ]*)\s*([^ ]*)/$2 $1/;

print;

What is the output of these lines of code?

A.

h Tis a test

B.

is This a test

C.

i Thiss a test

D.

his T is a test

Which one of the following choices is a unary operator that can apply to only a single variable?

A.

++

B.

**

C.

/

D.

?

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?

A.

The code will fail at line 4.

B.

The code will output the following:

Dogs bark

C.

The code will output the following:

Cats purr

D.

The code will output the following:

Fish swim

Consider the following program code:

@stack = (10, 10..25);

push(@stack, yellow);

shift(@stack);

push(@stack, white);

print shift(@stack);

What is the result of executing this program code?

A.

The code will fail at line 3 because shift requires two arguments.

B.

The code will output the following:

11

C.

The code will output the following:

10

D.

The code will output the following:

white

Consider that a file named test.txt contains this line of text:

One line of test text.

What is the output of the following lines of code?

$file = "test.txt";

open (OUT, "<$file") || (die "cannot open $file: $!");

seek(OUT, 15, 0);

read(OUT, $buffer, 5);

print $buffer . "\n";

print tell(OUT);

A.

t text

20

B.

t tex

19

C.

t text

19

D.

t tex

20

Assume $sth is a valid statement handle. Which of the following correctly outputs the data from the first three columns of a result set?

A.

while(@rcrds = $sth->fetch_array)

{

print($rcrds[0]\n);

print($rcrds[1]\n);

print($rcrds[2]\n); }

B.

while(@rcrds = $sth->fetch_array)

{

print($rcrds[1]\n);

print($rcrds[2]\n);

print($rcrds[3]\n);

}

C.

while(@rcrds = $sth->fetchrow_array)

{

print($rcrds[1]\n);

print($rcrds[2]\n);

print($rcrds[3]\n);

}

D.

while(@rcrds = $sth->fetchrow_array)

{

print($rcrds[0]\n);

print($rcrds[1]\n);

print($rcrds[2]\n);

}

Consider the program code in the attached exhibit. What is the result of executing this program code?

A.

The code will output the following:

BOBBY

B.

The code will output the following:

GERTRUDE

C.

The code will output the following:

JOHN

D.

The code will output the following:

ROBERT

Which one of the following while statements uses correct syntax and expressions?

A.

while {0} (print "OK");

B.

while ($c != 99) {print "OK"}

C.

while {$b eq "OK"} (print "$a++");

D.

while ($_) Do {print "OK");

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?

A.

%employees = ("Adrienne", "Marketing");

B.

%employees = ("Lucy", "Accounting");

C.

%employees = ("Lucy", "Accounting", "Armando", "Finance");

D.

%employees = ("Armando", "Finance", "Adrienne", "Marketing");

Which of the following choices demonstrates the correct syntax to pass the argument $arg2 to the subroutine getpass?

A.

getpass($arg2);

B.

call &getpass($arg2);

C.

sub &getpass($arg2);

D.

call getpass($arg2);