Closed perlpunk closed 5 years ago
use YAML::XS; $YAML::XS::DumpCode = 1; my $data = [map { sub { print "hi\n" } } 1..1000]; for (1..100) { say "loop $_"; my $yaml = Dump $data; print "Enter "; scalar <STDIN>; }
Watch the memory usage increase when pressing enter.
This seems to be a bug in B::Deparse. I can't see a leak in perl 5.26 or higher, so it seems to be fixed.
Watch the memory usage increase when pressing enter.