Leaks memory when passed an expression that returns a non-existent hash value (which should be effectively undef). For example the following loop leaks ~70 MiB per second on my system.
use Clone;
my $data = {};
while(1) {
Clone::clone ($data->{no_such_key});
};
However if you save the hash value in an intermediate variable, it doesn't leak:
use Clone;
my $data = {};
while(1) {
my $tmp = $data->{no_such_key};
Clone::clone ($tmp);
};
Environment
I was able to reproduce it in these environments:
Leaks memory when passed an expression that returns a non-existent hash value (which should be effectively
undef
). For example the following loop leaks ~70 MiB per second on my system.However if you save the hash value in an intermediate variable, it doesn't leak:
Environment I was able to reproduce it in these environments: