--- RegistryCooker.pm~ 2022-08-30 11:10:19.790171019 -0400
+++ RegistryCooker.pm 2022-08-30 11:12:34.319572045 -0400
@@ -399,7 +399,8 @@
my $eval = join '',
'package ',
$self->{PACKAGE}, ";",
- "sub handler {",
+ "use base 'sealed';",
+ "sub handler :Sealed {",
"local \$0 = '$script_name';",
$nph,
$shebang,