《Perl語言入門》第四版習題(13)

2021-05-09 19:30:53 字數 1046 閱讀 8860

1. [10]寫乙個程式,讀入一串數字,將它們按照數字排序,將結果按右對齊的列列印出來。使用下面的資料進行檢測:

17 000 04 1.50 3.14159 -10 1.5 4 2001 90210 666

2. [15]寫乙個程式,將下例hash 資料根據姓(last name)按照大小寫無關的字母順序進行排序,並把結果列印出來。當

last name 相同時,再按照名(first name)排序(不用關心大小寫)。因此,第乙個輸出的的名字是fred』s,最後乙個是

betty』s。具有相同family name 名字在一起。不要改變資料。輸出名字的大小寫應當和這裡的一樣。

my %last_name = qw;

3. [15]寫乙個程式,查詢給定子串在給定字串中出現的每乙個位置,輸出子串出現的位置。例如,給定字串為「this is

a test.」給定子串為「is」,它應當輸出2 和5。如果子串是「a」,它應當輸出8。如果子串為「t」呢?

1、#! /usr/bin/env perl -w

use strict;

@_=(17,000,04,1.50,3.14159,-10,1.5,4,2001,90210,666);

@_=sort @_;

for (@_)

2、#! /usr/bin/env perl -w

use strict;

my @keys = sort " cmp "/l$last_name"  # by last name

or"/l$a" cmp "/l$b"                          # by first name

} keys %last_name;

foreach (@keys) , $_/n";              # rubble,bamm-bamm}3、

#! /usr/bin/env perl -w

use strict;

my $a="this is a test";

my $b="a";

my $c=-2;

while ($c+1)

《Perl語言入門》第四版習題(7)

1.10 寫乙個程式,輸出所有提到fred 的行 不要輸出其它行 如果輸入字串fred,fredrick,alfred,能匹配上嗎?準 備乙個小的文字檔案,其中包含如 fred lintsotne 以及類似的資訊。使用這個文字檔案作為此程式的輸入,以及本節 下面練習的輸入。2.6 修改上面的程式,允...

《Perl語言入門》第四版習題(12)

1 usr bin perl w use strict if argv else foreach 2 usr bin perl w use strict if argv else foreach 3 usr bin perl w use strict print which directory?de...

C primer 第四版部分習題的解答

1.16 include include using namespace std int main 1.17 include using namespace std int main system pause return amount 這裡有乙個需要注意的地方是檔案結束符的使用。即cin在什麼時候...