Select Code to Download

MY_BLOCK: {
  # do whatever you like
  # inside here and, if appropriate, set $condition
  redo MY_BLOCK unless $condition ;
}