use strict;
use warnings;
use feature 'say';
use Test::LeakTrace;
use Text::CSV_XS 'csv';

say leaked_count { my $ret = csv( in => \'1,2' ); } for 1 .. 12;

__END__

25
-6
1
1
1
1
1
1
1
1
1
1