proxy代理   soft软件   IT 业界特快   norton 诺顿病毒库   代理列表   search FTP搜索   whois IP地理位置   blog 追求完美  
money理财   life生活   RSS聚合门户   firefox WEB浏览器   免费域名   typeset 假古文   AntiVirus 反病毒   ipcn 站点导航  

« Total Commander 7 public beta 发布 | Main | windows dos .bat 脚本 set 赋值注意别多写等号 »

November 2, 2006

perl sed awk 获取字符串一部分的方法

版权声明:可以任意转载,转载时请务必以超链接形式标明文章原始出处和作者信息及本声明。
https://windtear.net/archives/2006/11/02/001128.html
http://windtear.net/archives/2006/11/02/001128.html

perl sed awk 获取字符串一部分的方法

for i in *.log;do a=$(echo $i | perl -p -e "s#\.log##g");/bin/cp -a $i /tmp/b/$a;done
for i in *.log;do a=$(echo $i | sed -e "s#\.log##g");echo $a;done
for i in *.log;do a=$(echo $i | awk '{print substr($1,1,length($1)-4)}');echo $a;done

perl 还可通过 () \1 取值
本blog WWW

Posted by windtear at November 2, 2006 11:43 PM

本站使用中的任何问题,请与 windtear @ windtear.net 联系
Copyright© 1999-2024 Windtear. All rights reserved.