use Test::Utils::Dump; use Test::Dirs; # sets up temporary scratch directories use Test; use_ok('File'); my $f = File->new(); $f->path($Test::Dirs::scratch . 'test.txt'); d $f; # d sub is in Test::Utils::Dump