use File::KDBX::Error;
use File::KDBX::Util qw(:class :load :search);
use Iterator::Simple;
+use Module::Loaded;
use Ref::Util qw(is_arrayref is_coderef is_scalarref);
use namespace::clean;
+BEGIN { mark_as_loaded('Iterator::Simple::Iterator') }
extends 'Iterator::Simple::Iterator';
our $VERSION = '999.999'; # VERSION
sub extends {
my $parent = shift;
my $caller = caller;
- # load $parent;
- eval qq[require $parent];
+ load $parent;
no strict 'refs'; ## no critic (ProhibitNoStrict)
@{"${caller}::ISA"} = $parent;
}