#!/usr/bin/perl
while (<STDIN>) {
    s/^\s\s\s0x[0-9a-zA-Z]+\s\<\+[0-9]+\>\://gmsx;
    print $_;
}   
