#!/usr/bin/env perl

use strict;
use warnings;

while (<DATA>) {
    if (/in mmgsdi_evt_cb/) {
        print 'MATCH: ', $_;
    }
    else {
        print 'OTHER: ', $_;
    }
}

__DATA__
0x0 in mmgsdi_evt_cb
mmgsdi X
mmgsdi Y
0xd in mmgsdi_evt_cb
0x1a in mmgsdi_evt_cb
0xe in mmgsdi_evt_cb
0xf in mmgsdi_evt_cb
mmgsdi Z
0x13 in mmgsdi_evt_cb
mmgsdi Z
mmgsdi Z