#!perl

use Parallel::ForkManager;
use File::Where qw(where_pm);
use strict;
use warnings;

my $pm = new Parallel::ForkManager(2);
for my $i (1 .. 3) {
  my $pid = $pm->start and next;

  my @ret = File::Where->where_pm("File::Where");
  print $ret[1]."\n";
  $pm->finish;
}
$pm->wait_all_children;

##</code><code>##

[pheller@lunatic:~/Source/test]% perl ./test.pl
/Library/Perl/5.8.6
Undefined subroutine File::Where::where_pm at ./test.pl line 12
Undefined subroutine File::Where::where_pm at ./test.pl line 12