my( $file ) = /[[:hexdigit:]]{8}\s+(.*)$/;