if( $string =~ m/MTV\s*=\s*(0x[[:xdigit:]]+)/ ) {
    print $1, "\n";
}