看错误号的定义

perl -MPOSIX -e 'print strerror($ARGV[0])."\n";' 14
--------------
$ cp /work/host/phone/ui/main.cpp !#$:s/host/target
expand to:

cp /work/host/phone/ui/main.cpp /work/target/phone/ui/main.cpp
-----------
$ while read line; do echo $line; done < file
count=0

while read line

do

echo $line

((count++))

done < file
---------------

你可能感兴趣的:(perl)