@{$mon_obj->{FILE_DATA}} 
  = grep { defined $_ } @{$mon_obj->{FILE_DATA}};