Select Code to Download

while ( COND ) BLOCK
if ( COND ) BLOCK

EXPR while COND;
EXPR if COND;

if ( !eval { f() } ) { ... }

my $x = eval { f() }
   or ...;

EXPR;