单行bash、shell、perl命令

主题：单行经典bash、shell、perl命令

作者：luomg

摘要：



001查看当前目录最大的10个

du  -mg .|sort  -k1nr|head   -n 10                            #AIX
du  ./ --max-depth=1   --block-size=1G|sort  -k1nr|head -10   #Linux

002打印标签关键字之间的内容

awk  '/CREATE.*/,/\)/' run.log                                 #awk
perl  -ne  'print if/CREATE.*/../\)/' run.log                  #perl

003打印标签关键字之外的内容

perl  -ne  'print unless/CREATE.*/../\)/' run.log              #perl

004打印指定范围的行

awk '10<=NR && NR<=20{print NR,$0}'  20150619.log              #awk
perl -ne  'print if($.>3 && $. <10)' cmd.sh                    #perl

005统计日志中访问次数最多的IP，并按逆序排序

perl -ne '{$user{$&}++ if/\b(?:[0-9]{1,3}\.){3}[0-9]{1,3}\b/}END{foreach $key (sort {$user{$b} <=> $user{$a} } keys %user){print "ip=$key,count=$user{$key}\n";}}' bomc.log              #perl

006统计日志文件大于1G的文件，并降序排列

find  ./ -name "*.log"   -exec  du  -sm {}  \;|awk  '$1>1024{$1=$1/1024;print}'|sort  -k1nr
find  ./ -name "*.log"   -exec  du  -sk {}  \;|awk  '$1>1048576{$1=$1/1048576;print}'|sort  -k1nr  #AIX LINUX SUNOS通用