my $success = eval { ...; 1 }