my $inBlock = 0;
while(<$in>) 
{
  if ($inBlock) 
  {
    $inBlock = 0 if ( $_ =~ /2nd Regex/);
  }
  else
  { 
    $inBlock = 1 if ( $_ =~ /1st Regex/);
    print $_ if(!$inBlock);
  }
}