Select Code to Download

use strict ;
use warnings ;
...
  my $entry = pop @$update ;
  warn "Cannot modify ".$entry->dn.", giving up!" ;
}

use strict ;
use warnings ;
...
    last ;
  }
}