use Config qw|config_vars|;

print "Using Perl Malloc? ";
config_vars('usemymalloc');
print "\n";


##</code><code>##

Do you wish to attempt to use the malloc that comes with perl5? [n]