我有这样的文件:
pup@pup:~/perl_test$ cat numbers
1234567891
2133123131
4324234243
4356257472
3465645768000
3424242423
3543676586
3564578765
6585645646000
0001212122
1212121122
0003232322
在上面的文件中,我想删除前导零和尾随零,所以输出将是这样的
pup@pup:~/perl_test$ cat numbers
1234567891
2133123131
4324234243
4356257472
3465645768
3424242423
3543676586
3564578765
6585645646
1212122
1212121122
3232322
如何实现?我试过 sed
来删除那些零。删除尾随零很容易,但不删除前导零。
帮帮我。
最佳答案
perl -pe 's/^0+ | 0+$//xg' numbers
关于perl - 如何使用 sed/awk/perl 从数字中删除前导和尾随零?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/18714645/