{
  my $block2 = sub {
                      # Block 2 code
                   };
  if ( $condition1 ) {
    if ( $condition2 ) {
        # Block1
    }
    else {
        &$block2();
    }
  }
  else {
      &$block2();
  }
}