| Subject: | memory leak |
The following script leaks memory:
#!/usr/bin/env perl
use strict;
use warnings;
use Algorithm::FastPermute qw(permute);
my @array = (0..50);
permute {
my $str = join '', @array;
# This also leaks:
# my $str = 'a'x100;
} @array;