Re^2: File::Where->where_pm failure in forked children?

Replies are listed 'Best First'.
Re^3: File::Where->where_pm failure in forked children? by pheller (Initiate) on Mar 15, 2007 at 03:06 UTC
Ok, I figured out a solution myself :-) `#!perl use Parallel::ForkManager; use strict; use warnings; my $pm = new Parallel::ForkManager(2); for my $i (1 .. 3) { my $pid = $pm->start and next; my @ret = (); my $code = "use File::Where; \@ret = File::Where->where_pm(\"File::W +here\");"; eval $code; print $ret[0]."\n"; $pm->finish; } $pm->wait_all_children;` [download]	[reply] [d/l]
Re^4: File::Where->where_pm failure in forked children? by ikegami (Patriarch) on Mar 15, 2007 at 03:16 UTC
`my @ret = (); my $code = "use File::Where; \@ret = File::Where->where_pm(\"File::W +here\");"; eval $code;` [download] can be written more readably as: `eval("use File::Where"); die($@) if $@; my @ret = File::Where->where_pm("File::Where");` [download] or `require File::Where; import File::Where; my @ret = File::Where->where_pm("File::Where");` [download] These two snippets won't hide errors like yours did.	[reply] [d/l] [select]