I don't know for sure if the behaviour with a segfault will change this, but I don't know why it would:
The standard way to handle unsafe code in perl is using an eval block, and then checking the error variable, like:

eval { system('somebinary'); };
print STDERR "Arrgh!: $@\n" if ($@);
[download]