Boiler plate code for the build scripts in our build system looks like:

package main;

my $build = BuildGeneral->new(buildtype => 'release');

exit(!$build || $build->runFailed());
[download]

which often causes a double take at first glance, but accurately reflects the sense of the exit value.