dmesg 的时间戳处理

dmesg 的时间戳处理

dmesg_with_human_timestamps () {
    $(type -P dmesg) "$@" | perl -w -e 'use strict;
        my ($uptime) = do { local @ARGV="/proc/uptime";<>}; ($uptime) = ($uptime =~ /^(d+)./);
        foreach my $line (<>) {
            printf( ($line=~/^[s*(d+).d+](.+)/) ? ( "[%s]%s
", scalar localtime(time - $uptime + $1), $2 ) : $line )
        }'
}
alias dmesg=dmesg_with_human_timestamps