qq_36480087的博客

使用Perl ，Tcl 或 C实现如下的功能：从文件mail.list中读取联系人和联系邮箱，并在其中读取@nvidia.com的联系人，按字母表排序并写入nvidia.list。mail.list文件内容大致类似如下: Jenny Jenny@163.com Jojo jojo@nvidia.com Keke keke@nvidia.com Lily lily@yahoo.com...

初始文件a.txta bc de fo pq rs t处理后文件b.txta ba b c da b c d e fo po p q ro p q r s tshell#!/bin/basharray1=($(awk '{print $1}' a.txt))array2=($(awk '{print $2}' a.txt))length=${#array1[@]}size=$[$length/2]cat /dev/null >b.txtrec=()

##### 有txt文件第一列是姓名，第二列是分数，筛选出及格和不及格的人从高到底排列shell#!/bin/bashsort -n -r -k 2 grade.txt > grade_sort.txtawk '{if($2<60) print $0}' grade_sort.txt > fail.txtawk '{if($2>=60) print $0}' grade_sort.txt > pass.txt...

输入姓，返回名perl#!/usr/bin/perl%map=('Lebron'=> 'James','Paul'=> 'George'); #create hashwhile(defined($line= <STDIN>)){ #将键盘输入保存为变量$lineif( $line eq "Lebron\n" ){printf "$map{'Lebron'}\n"}elsif( $line eq "Paul\n" ) #注意回车符\n{pr