my $worked = eval { stuff; 1; };