perl 有毫秒 vmstat 1|perl -nle 'use POSIX 'strftime'; use Time::HiRes 'gettimeofday'; ($x,$y)=gettimeofday; $y=sprintf("%06d",$y);print strftime("%Y-%m-%d %H:%M:%S",localtime($x)),".$y $_"'  awk vmstat 3 5 | awk '/^ *[0-9]/{$0=$0 " " strftime("%m-%d-%Y %T")};1'  …