写一个程序，将一些字符串（不同的行）读入一个列表中，逆向输出它。如果是从键盘输入的，那在Unix 系统中
应当使用CTRL+D 表明end-of-file，在Windows 系统中使用CTRL+Z.
$ cat 3.1
#!/usr/bin/perl
@lines=;
@reverse=reverse @lines;
print reverse @lines;
写一个程序，读入一串数字（一个数字一行），将和这些数字对应的人名（下面列出的）输出来。（将下面的人
名列表写入代码中）。例如，当输入为1，2，4 和2，则输出的为fred, betty, dino, 和betty
#!/usr/bin/perl
@names=qw;
foreach $id(){
#print "$id\n";
print $names[$id]."\n";
}
写一个程序，将一些字符串（在不同的行中）读入一个列表中。然后按ASCII 顺序将它们输出来。也就是说，当输入的字符串为fred, barney, wilma, betty，则输出为barney betty fred wilma。分别在一行或不同的行将之输出。
#!/usr/bin/perl
@lines=;
#@reverse=reverse @lines;
print sort @lines;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/7899089/viewspace-735433/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
interview tips
下一篇：
perl array
请登录后发表评论
登录
全部评论
