my( $ti, $rt );
{
    {   local $/ = "TITLE="; <MGF>; }
    ( $ti ) = <MGF> =~ m[^(\S+)];
    {   local $/ = "RTINSECONDS="; <MGF> }
    ( $rt ) = <MGF> =~ m[^(\S+)];
    if( exists $IDS{ $ti } ) {
         $IDrtPairs{ $ti } = $rt;
    }
    redo unless eof( MGF );
}