Select Code to Download

int *x;
if(ptr != NULL && *ptr==5){ ... }
...
# extended to perl:
my $obj = Foo::Bar->new();
if( $obj && $obj->blah() ){ ... }