Select Code to Download

sub is_valid { 0 }

...

my ($invalid) = is_valid()
   or die "invalid";         # XXX (Doesn't die!)

%data = (
    foo => !!is_foo(),
    bar => !!is_bar(),
);

%data = (
    foo => is_foo(),
    bar => is_bar(),
);