$/ = undef;  
  $_ = <file1>;
  s#\breport[s]?.*? \)\;|("[^"].*?")#defined $1 ? $1 :""#gsiex;
  print $_