123456789 2 3 4 5 6 % cat data.output | perl -ne'undef$/;/.{6}(.{9}).*[\d|:]{6}([\d|\.]{9})(?!\n)/s,print$2-$1'