perl -pi -e ’s/startpos\((\d), (\d), (\d)\)/”startpos\(” .$1. “, ” .$2. “, ” .($3+1). “\)”/ge’
echo "123"|perl -p -e 's/(\d+)/$1+4/ge'
echo "123"|perl -p -e 's/(\d+)/$1\/7/ge'
perl -pi -e ’s/startpos\((\d), (\d), (\d)\)/”startpos\(” .$1. “, ” .$2. “, ” .($3+1). “\)”/ge’
echo "123"|perl -p -e 's/(\d+)/$1+4/ge'
echo "123"|perl -p -e 's/(\d+)/$1\/7/ge'
声明: 本文采用 BY-NC-SA 授权。转载请注明转自: levy