push @trace_rw, [unpack 'A10A8', $_] while <TRACE>;