while(<TMPFILE>)
{

  if (/myword/)
  {
    $_.=<TMPFILE>;
    print;
  }
}