Perl
我有一個帶有隨機數的文件。我需要將所有數字從 2000-4000 轉換為 xyzw
範例輸入:
2234 1233 5678 8876 9009 3444 2222 3454 5667 7878 4554 3222
輸出:
xyzw 1233 5678 8876 9009 xyzw xyzw xyzw 5667 7878 4554 xyzw
我正在使用這個查詢:
perl -pe 's/^[2-4]+/abcd/g'
但沒有給我想要的輸出。
由於它只是執行正則表達式,因此您可以使用以下命令直接更快地執行此操作
sed
:sed 's/\b\([2-3][0-9][0-9][0-9]\|4000\)\b/xyzw/g' input
請注意,我更新了它,考慮到@roaima 的評論。