use strict; use warnings; use Test::LeakTrace; use Text::CSV_XS 'csv'; leaktrace { csv( in => \'1,2' ); };