{
    local $Regexp::Assemble::have_Storable = 0;
    my $orig = Regexp::Assemble->new->add( qw/ dig dug dog / );
    my $clone = $orig->clone;
    is_deeply( $orig, $clone, 'clone path' );
}