- {
- local $ENV{DEBUG} = '';
- like "$error", qr!^uh oh at \H+error\.t line \d+\.$!, 'Errors stringify without stacktrace';
- }
-
- {
- local $ENV{DEBUG} = '1';
- like "$error", qr!^uh oh at \H+error\.t line \d+\.\nbless!,
- 'Errors stringify with stacktrace when DEBUG environment variable is set';
- }
-