再来两个脚本

#!/usr/bin/perl

@lines=<>;

@tmp=reverse @lines;
print @tmp;

tac.pl可以实现tac命令（跟cat命令相反）

#!/bin/sh

for fname in *;do
newname=`echo $fname |tr [a-z] [A-Z] `
mv $fname $newname
done
ren.sh可以把当前目录下的小写文件名改成大写