eill 24.01.2013 09:40 tknote

root@voip-nv:/var/log/asterisk/cdr-csv# grep "2012-12" Master.csv | grep ANSWERED | grep '^"","2' | cut -f 10-11 -d ',' | perl -e 'sub gda { return `date --date \"$_[0]\" +%s`; } $c=0; while (<>) { next unless /:\d+","\d+-/; /"(.+)","(.+)"/; $counter += (gda($2) — gda($1)); } print $counter / 3600, "\n"'
33.8566666666667

говнокод, быдло, perl, asterisk, oneliner
#tiifeg
re add comment !recommend ~bookmark Ssubscribe
Do you really want to delete ?