sub is_hash_randomized {

# We don't have any random sequences yet, as if seed "0"

    return 0 if $] < 5.008001;

# Get the -Accflags= settings using this Perl executor

    open my $handle, "$^X -V:ccflags |"
     or die "Could not execute $^X -V:ccflags: $!\n";
    my $ccflags = <$handle>;
    close $handle;

# Return repeatable default if random sequences compiled out
# Return random if switch settings reversed and environment variable set
# Return whatever the environment variable indicates

    return 0 if $ccflags =~ m#-DNO_HASH_SEED#;
    return   if $ccflags =~ m#-DUSE_HASH_SEED_EXPLICIT#
                 and exists $ENV{PERL_HASH_SEED};
    $ENV{PERL_HASH_SEED};
} #is_hash_randomized