diff options
Diffstat (limited to 'meta/recipes-devtools/perl')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.12.3/perl-dynloader.patch | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.12.3/perl-dynloader.patch b/meta/recipes-devtools/perl/perl-5.12.3/perl-dynloader.patch index d5ea00f2da..1840605df1 100644 --- a/meta/recipes-devtools/perl/perl-5.12.3/perl-dynloader.patch +++ b/meta/recipes-devtools/perl/perl-5.12.3/perl-dynloader.patch | |||
@@ -19,7 +19,7 @@ Update by Nitin A Kamble <nitin.a.kamble@intel.com> 2011/04/21 | |||
19 | + { | 19 | + { |
20 | + my $hostlib = $ENV{PERLHOSTLIB}; | 20 | + my $hostlib = $ENV{PERLHOSTLIB}; |
21 | + print STDERR "*** Module name IN: $modlibname\n"; | 21 | + print STDERR "*** Module name IN: $modlibname\n"; |
22 | + ($p1, $p2, $p3, $p4, $p5) = $modlibname =~ m/(^(.*lib\/)?)((perl\/[0-9\.]*\/)?)(.*)$/; | 22 | + ($p1, $p2, $p3, $p4, $p5) = $modlibname =~ m/(^(.*lib\w*\/)?)((perl\/[0-9\.]*\/)?)(.*)$/; |
23 | + print STDERR "*** p1: $p1 p3: $p3 p5: $p5\n"; | 23 | + print STDERR "*** p1: $p1 p3: $p3 p5: $p5\n"; |
24 | + if ( $p1 ne "" ) { | 24 | + if ( $p1 ne "" ) { |
25 | + $modlibname = $hostlib.$p5; | 25 | + $modlibname = $hostlib.$p5; |