while( $dl = <FH> ){
  my @entries  = GetEntries( ... );
  FudgeEntries( \@entries, $removememfilepath   );
}