Re: Handling config-files in Tests

I'm not positive I understand your question, but you might be able to use the %INC hash for that.

use Data::Dumper;
print Dumper( \%INC );
[download]

Prints:

$VAR1 = {
          'warnings/register.pm' => '/usr/share/perl/5.8/warnings/regi
+ster.pm',
          'bytes.pm' => '/usr/share/perl/5.8/bytes.pm',
          'XSLoader.pm' => '/usr/lib/perl/5.8/XSLoader.pm',
          'Carp.pm' => '/usr/share/perl/5.8/Carp.pm',
          'Exporter.pm' => '/usr/share/perl/5.8/Exporter.pm',
          'warnings.pm' => '/usr/share/perl/5.8/warnings.pm',
          'overload.pm' => '/usr/share/perl/5.8/overload.pm',
          'Data/Dumper.pm' => '/usr/lib/perl/5.8/Data/Dumper.pm'
        };
[download]

Comment on Re: Handling config-files in Tests Select or Download Code

Replies are listed 'Best First'.
Re^2: Handling config-files in Tests by CountZero (Bishop) on Feb 16, 2007 at 20:30 UTC
Thank you, it works like a charm in combination with some `File::Basename` magic to extract the path-part. CountZero "If you have four groups working on a compiler, you'll get a 4-pass compiler." - Conway's Law	[reply] [d/l]