怎样把文件序列a1,a2,a3...a11,a12...a1000改成a0001,a0002...a1

Imt1024

#/bin/sh

i=1
while [ $i -le 1000]
do
mv `printf "a%g" $i` `printf "a%04g" $i`
i=`expr $i + 1`
done

寂寞烈火

ls a[0-9] a[0-9][0-9] a[0-9][0-9][0-9] | awk '{printf "%s %s %s%04d\n","mv",$0,substr($0,1,1),substr($0,2)}'|sh

testor1

ls a* | perl '{chomp ($_);printf "mv %s a%04d\n", $_, substr($_,1)}' > tmp
sh tmp