☰

将最后六位数字移至数字开头

tag-icon • tag-icon text-processing awk
将最后六位数字移至数字开头

我正在使用 Twitter 将新闻提取到电子邮件中，最后六个字段是日期和时间。我希望这些是前六个字段。 awk 中将最后 n 个字段移至行首的命令是什么？

我尝试过谷歌搜索，但给出的所有示例都假设每行具有相同数量的字段

例子：

76356378090986
08976357627980089
089723571237809209
0897253712730912838798
908916523568909887
876756467890
09876535467890
765643324343
467890876543
234567890987654
123456789009876543
54323456789876
09876543345678
123456789009876
12345678998765

结果：

09098676356378
98008908976357627
809209089723571237
8387980897253712730912
909887908916523568
467890876756
46789009876535
324343765643
876543467890
987654234567890
876543123456789009
78987654323456
34567809876543
009876123456789
99876512345678

答案1

和sed：

sed 's/\(.*\)\(.\{6\}\)/\2\1/'

答案2

使用 sed：

sed -E 's/(.*)(.{6})/\2\1/'

或者：

sed 's/\(.*\)\(.\{6\}\)/\2\1/'

使用 awk：

awk '{l=length-6;print(substr($0,l+1) substr($0,1,l))}'

使用 (GNU) awk：

awk '{print gensub(/(.*)(.{6})/,"\\2\\1",1)}'

答案3

cat file | sed -e 's/\(.\)/\1 /g' | awk '{ for (i = 1; i <= NF; i++) printf "%s" FS, $((NF-7+i) % NF+1); print ""}' | sed 's/ //g'
09098676356378
98008908976357627
809209089723571237
8387980897253712730912
909887908916523568
467890876756
46789009876535
324343765643
876543467890
987654234567890
876543123456789009
78987654323456
34567809876543
009876123456789
99876512345678

答案4

一些 Perl 行话：

  1. 将每一行分割成字符：

    perl -F'' -lane 'print join "", splice(@F, -6), @F' file

  2. 使用子字符串

    perl -lpe '$_ = substr($_, -6) . substr($_, 0, $#_ - 6)' file

相关内容