关闭

某知名公司Perl面试题及答案

标签: perl面试stringreferencejoineach
6235人阅读 评论(7) 收藏 举报
分类:

蓝色部分为我的作答

Software Configuration Management Question

 

Perl  

Basic

 

1. Which statement is wrong:

 

A.        $_= 'hello world';

 

B.        $a='hello world';

 

C.        my $b,$a='hello world';

 

D.       my ($a,$b)=(0,'hello world');

 

Item C: $b is empty and $a is ‘hello world’

All of items is correct in program syntax, and can run.

 

 

2. The expression should be (B), then the following code can run correctly:

 

$a=0;$b=55;

 

while (expression)

 

{

 

  $a+=2;

 

}

 

print "$a/n";

 

A.        $a = $b

 

B.        $a*$a <= $b

 

C.        $a != $b

 

D.       $b == 0

 

 

 

3. @array is an array variable, what is output of “print @array;” :A

 

A.        Each element of this array

 

B.        The size of this array

 

C.        The first element of this array

 

D.       Nothing

 

 

 

4. “$a = @array;”, what is value of $a: B

 

A.        The first element’s value of this array

 

B.        The size of this array

 

C.        This line code is wrong

 

D.       N/A

 

 

 

5. Which code snippet can print all elements in %abcd: B

 

A.    foreach $Var (keys %abcd)

 

   {

 

     print “$Var /n”;

 

   }

 

B.    for ($I=0;$I<%abcd;$I++)

 

   {

 

     print “$%abcd{$I} /n”;

 

   }

 

C.    while ($Var (keys %abcd))

 

   {

 

     print “$Var /n”;

 

   }

 

D.    print join(‘/n’,%abcd);

 

 

 

 


Advance:

 

6. After execute following code snippet, what is value of $count: B (match twice)

 

$Str=’hello world!’;

 

$count=0;

 

while ($Str=~m/(/w+)/g)

 

  {

 

    $count++;

 

  }

 

A.        1

 

B.        2

 

C.        3

 

D.       12

 

 

 

7. What is the result of $string? D

 

$string = "This string contains the number 25.11.";

$string =~ /-?(/d+)/.?(/d+)/;

 

A.        25.

 

B.        .11

 

C.        25.11

 

D.                             25.11.

I don’t know what is meaning of -, but perhaps the answer is D

 

 

8. What is meaning of following code snippet?

 

  open(MYFILE,"temp.txt");

 

  while (<MYFILE>) {

 

    while ( /(/w)/g ) {

 

      $seen{$1}++;

 

    }

 

  }

 

  foreach $word(keys %seen)

 

  {

 

    print "$seen{$word} $word/n";

 

  }

 

  close(MYFILE);

 

A.        Delete all words in temp.txt

 

B.        Calculate the frequency of each word in temp.txt

 

C.        Wrong code

 

D.       Calculate the sum of words in temp.txt

 

$1 is first variable of group match of perl, it match a char here.

 

9. In following code, expression#1 D let $point get the reference of @ARGV, expression#1  should be:

 

#!/usr/contrib/bin/perl -w

 

expression#1

print "ARGV = ", join(",", expression#2), "/n";

 

 

 

A.        my $point=@ARGV;

 

B.        my $point={@ARGV};

 

C.        my $point=ARGV;

 

D.       my $point=/@ARGV;

 

 

10. The expression#2 A should be:

 

A.        @$point

 

B.        $point

 

C.        @point

 

D.       /@point

 

 

NOTE: Answer of question 5  shoud be A 
20060519

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:51050次
    • 积分:816
    • 等级:
    • 排名:千里之外
    • 原创:27篇
    • 转载:2篇
    • 译文:1篇
    • 评论:14条
    最新评论