LinuxSir.Org  
| 网站首页 | 注册账号 | 论坛帮助 |

欢迎来到LinuxSir.Org!
您还未登录,请登录后查看论坛,或者点击论坛上方的注册链接注册新账号。


发表新主题 回复
精华主题  
主题工具
旧 04-05-18, 19:29 第 1 帖
KornLee
 
 
 
★☆★☆★☆★  
  注册日期: Nov 2002
  我的住址: LinuxWorld
  帖子: 6,960
  精华: 61
 

标题: sed/awk与unix命令等价代码


转自: www.chinaunix.net 特此感谢
sed与unix 命令等价代码
特此感谢转贴者:admirer
代码:
------------------------------------------------------------------------------- cat | sed ':' cat -s | sed '/./,/^$/!d' tac | sed '1!G;h;$!d' grep | sed '/patt/!d' grep -v | sed '/patt/d' head | sed '10q' head -1 | sed 'q' tail | sed -e ':a' -e '$q;N;11,$D;ba' tail -1 | sed '$!d' tail -f | sed -u '/./!d' cut -c 10 | sed 's/\(.\)\{10\}.*/\1/' cut -d: -f4 | sed 's/\(\([^:]*\):\)\{4\}.*/\2/' tr A-Z a-z | sed 'y/ABCDEFGHIJKLMNOPQRSTUVWXYZ/abcdefghijklmnopqrstuvwxyz/' tr a-z A-Z | sed 'y/abcdefghijklmnopqrstuvwxyz/ABCDEFGHIJKLMNOPQRSTUVWXYZ/' tr -s ' ' | sed 's/ \+/ /g' tr -d '\012' | sed 'H;$!d;g;s/\n//g' wc -l | sed -n '$=' uniq | sed 'N;/^\(.*\)\n\1$/!P;D' rev | sed '/\n/!G;s/\(.\)\(.*\n\)/&\2\1/;//D;s/.//' basename | sed 's,.*/,,' dirname | sed 's,[^/]*$,,' xargs | sed -e ':a' -e '$!N;s/\n/ /;ta' paste -sd: | sed -e ':a' -e '$!N;s/\n/:/;ta' cat -n | sed '=' | sed '$!N;s/\n/ /' grep -n | sed -n '/patt/{=;p;}' | sed '$!N;s/\n/:/' cp orig new | sed 'w new' orig[/code:1:739eb4cef5] -------------------------------------------------------------------------------
awk与unix 命令等价代码
特此感谢作者:飞灰橙
代码:
------------------------------------------------------------------------------- cat |awk '{print}' cat -s |awk '{blank = NF == 0 ? ++blank : 0; if (blank <= 1) print;}' tac |awk '{t[NR] = $0;}END{for (i = NR; i >= 1; i--) print t[i];}' grep patten |awk '/patten/{print}' grep -v patten |awk '! /patten/{print}' head |awk 'NR <= 10 {print}' 24.sh head -1 |awk '{print; exit; }' 24.sh tail |awk '{t[n++ % 10] = $0}END{for (i = 0; i < 10; i++) print t[n++ % 10];}' tail -1 |awk '{t = $0}END{print t}' cut -c 10 |awk '{print substr($0, 10, 1)}' cut -d: -f4 |awk -F: '{if (NF > 1) print $4; else print;}' tr A-Z a-z |awk '{print tolower($0);}' se.sh tr a-z A-Z |awk '{print toupper($0);}' se.sh tr -s ' ' |awk '{print gensub(" +", " ", "g")}' tr -d '\012' |awk '{printf "%s", $0}' wc -l |awk 'END{printf "% 7d\n", NR-1}' uniq |awk '{if (NR == 1 || ln != $0) print; ln = $0;}' rev |awk '{l = ""; for (i = length($0); i > 0; i--) printf "%c", substr($0, i, 1); print "";}' basename |awk -F'/' '{print $NF}' dirname |awk -F'/' '{if (NF <= 1) printf "."; else {OFS="/"; $NF=""; printf "%s", substr($0, 1, length($0) - 1);}}' xargs |awk '{printf "%s ", $0}END{print}' paste -sd: |awk 'NR > 1{printf ":%s", $0}' cat -n |awk '{printf "% 6d %s\n", NR, $0}' grep -n |awk '/ss/{print NR":"$0}' cp orig new |awk '{print > "new"}' orig -------------------------------------------------------------------------------
  KornLee 当前离线   回复时引用此帖
旧 04-05-19, 08:23 第 2 帖
yongjian
 
yongjian 的头像
 
 
★版☆主★  
  注册日期: May 2003
  我的住址: Linux
  帖子: 2,572
  精华: 9
 

Very Coooool! 谢谢javalee兄!







__________________
15" C2D MBP.
有简单的,不用复杂的!看到复杂的,尽量简单化!
Unix/Linux Philosophy: Be small! Be concentrated! One program does one thing and do it perfectly!
∞ years - 宇宙中最后的物质 Proton heat death. 之后,宇宙将以纯能量的形式永远存在。。。一切皆空
  yongjian 当前离线   回复时引用此帖
旧 04-08-23, 14:48 第 3 帖
tqb
 
 
 
注册会员  
  注册日期: Jun 2004
  我的住址: 安徽省
  帖子: 2
  精华: 0
 

谢谢,非常的好!
  tqb 当前离线   回复时引用此帖
旧 04-08-23, 18:14 第 4 帖
galilette
 
 
 
注册会员  
  注册日期: Oct 2002
  帖子: 186
  精华: 0
 

第一部分在sed的info里就有
info sed, m examples
  galilette 当前离线   回复时引用此帖
旧 05-03-12, 13:05 第 5 帖
xwindows
 
 
 
注册会员  
  注册日期: Feb 2005
  帖子: 8
  精华: 0
 

强~~~~
  xwindows 当前离线   回复时引用此帖
发表新主题 回复


主题工具

发帖规则
您 [不可以] 发表新主题
您 [不可以] 回复主题
您 [不可以] 上传附件
您 [不可以] 编辑您的帖子

已 [启用] BB 代码
已 [启用] 表情符号
已 [启用] IMG 代码
已 [禁用] HTML 代码
[论坛跳转…]


所有时间均为[北京时间]。现在的时间是 12:22


Powered by vBulletin 版本 3.6.8
版权所有 ©2000 - 2010, Jelsoft Enterprises Ltd.
官方中文技术支持: vBulletin 中文
版权所有 ©2002 - 2009, LinuxSir.Org