1 # UCW Library configuration system: Perl paths
2 # (c) 2017 Martin Mares <mj@ucw.cz>
4 package UCW::Configure::Perl;
11 Log "Determining Perl module path ... ";
12 my $prefix = $Config{installprefix};
13 $prefix .= '/' unless $prefix =~ m{/$};
14 my $lib = substr($Config{installvendorlib}, length $prefix);
15 Set('INSTALL_PERL_DIR', Get('INSTALL_USR_PREFIX') . $lib);
16 Log Get('INSTALL_PERL_DIR') . "\n";
18 Log "Determining Perl arch-dependent module path ... ";
19 my $archlib = substr($Config{installvendorarch}, length $prefix);
20 Set('INSTALL_PERL_ARCH_DIR', Get('INSTALL_USR_PREFIX') . $archlib);
21 Log Get('INSTALL_PERL_ARCH_DIR') . "\n";