===========================================================
.___ __ __
_________________ __ __ __| _/|__|/ |_
/ ___\_` __ \__ \ | | \/ __ | | \\_ __\
/ /_/ > | \// __ \| | / /_/ | | || |
\___ /|__| (____ /____/\____ | |__||__|
/_____/ \/ \/
grep rough audit - static analysis tool
v2.8 written by @Wireghoul
=================================[justanotherhacker.com]===
perl-5.32.0/makedepend.SH-17-case "$0" in
perl-5.32.0/makedepend.SH:18:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/makedepend.SH-19-esac
##############################################
perl-5.32.0/makedepend.SH-114- $echo *.c | $tr ' ' $trnl | $egrep -v '\*' >.clist)
perl-5.32.0/makedepend.SH:115:for file in `$cat .clist`; do
perl-5.32.0/makedepend.SH-116-# for file in `cat /dev/null`; do
##############################################
perl-5.32.0/makedepend.SH-125- case "$file" in
perl-5.32.0/makedepend.SH:126: *.c) filebase=`basename $file .c` ;;
perl-5.32.0/makedepend.SH:127: *.y) filebase=`basename $file .y` ;;
perl-5.32.0/makedepend.SH-128- esac
perl-5.32.0/makedepend.SH-129- case "$file" in
perl-5.32.0/makedepend.SH:130: */*) finc="-I`echo $file | sed 's#/[^/]*$##'`" ;;
perl-5.32.0/makedepend.SH-131- *) finc= ;;
##############################################
perl-5.32.0/plan9/arpa/inet.h-3-
perl-5.32.0/plan9/arpa/inet.h:4:/* extern unsigned long inet_addr(const char *); */
perl-5.32.0/plan9/arpa/inet.h-5-/* extern char *inet_ntoa(struct in_addr); */
##############################################
perl-5.32.0/plan9/config.plan9-1449-/* HAS_GETHOSTBYADDR:
perl-5.32.0/plan9/config.plan9:1450: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/plan9/config.plan9-1451- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/plan9/config.plan9-1498- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/plan9/config.plan9:1499: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config.plan9-1500- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config.plan9-1535-/* HAS_GETNETBYADDR:
perl-5.32.0/plan9/config.plan9:1536: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/plan9/config.plan9-1537- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/plan9/config.plan9-1555- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/plan9/config.plan9:1556: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config.plan9-1557- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config.plan9-1598- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/plan9/config.plan9:1599: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config.plan9-1600- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config.plan9-1664- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/plan9/config.plan9:1665: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config.plan9-1666- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config.plan9-2943- * This symbol holds the type used for the 1st argument
perl-5.32.0/plan9/config.plan9:2944: * to gethostbyaddr().
perl-5.32.0/plan9/config.plan9-2945- */
##############################################
perl-5.32.0/plan9/config.plan9-2947- * This symbol holds the type used for the 2nd argument
perl-5.32.0/plan9/config.plan9:2948: * to gethostbyaddr().
perl-5.32.0/plan9/config.plan9-2949- */
##############################################
perl-5.32.0/plan9/config.plan9-2955- * This symbol holds the type used for the 1st argument to
perl-5.32.0/plan9/config.plan9:2956: * getnetbyaddr().
perl-5.32.0/plan9/config.plan9-2957- */
##############################################
perl-5.32.0/plan9/plan9.c-38-
perl-5.32.0/plan9/plan9.c:39:struct netent *getnetbyaddr(long a, int b)
perl-5.32.0/plan9/plan9.c-40-{
##############################################
perl-5.32.0/plan9/config_h.sample-1396-/* HAS_GETHOSTBYADDR:
perl-5.32.0/plan9/config_h.sample:1397: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/plan9/config_h.sample-1398- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/plan9/config_h.sample-1445- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/plan9/config_h.sample:1446: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config_h.sample-1447- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config_h.sample-1482-/* HAS_GETNETBYADDR:
perl-5.32.0/plan9/config_h.sample:1483: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/plan9/config_h.sample-1484- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/plan9/config_h.sample-1502- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/plan9/config_h.sample:1503: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config_h.sample-1504- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config_h.sample-1545- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/plan9/config_h.sample:1546: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config_h.sample-1547- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config_h.sample-1611- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/plan9/config_h.sample:1612: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/plan9/config_h.sample-1613- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/plan9/config_h.sample-2868- * This symbol holds the type used for the 1st argument
perl-5.32.0/plan9/config_h.sample:2869: * to gethostbyaddr().
perl-5.32.0/plan9/config_h.sample-2870- */
##############################################
perl-5.32.0/plan9/config_h.sample-2872- * This symbol holds the type used for the 2nd argument
perl-5.32.0/plan9/config_h.sample:2873: * to gethostbyaddr().
perl-5.32.0/plan9/config_h.sample-2874- */
##############################################
perl-5.32.0/plan9/config_h.sample-2880- * This symbol holds the type used for the 1st argument to
perl-5.32.0/plan9/config_h.sample:2881: * getnetbyaddr().
perl-5.32.0/plan9/config_h.sample-2882- */
##############################################
perl-5.32.0/qnx/ar-31-shift
perl-5.32.0/qnx/ar:32:wlib -p=32 -n $library `for i in $*; do echo "+$i \\c"; done`
##############################################
perl-5.32.0/uconfig.h-1492-/* HAS_DLADDR:
perl-5.32.0/uconfig.h:1493: * This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/uconfig.h-1494- * available to query dynamic linker information for an address.
##############################################
perl-5.32.0/uconfig.h-1567-/* HAS_GETHOSTBYADDR:
perl-5.32.0/uconfig.h:1568: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/uconfig.h-1569- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/uconfig.h-1614-/* HAS_GETNETBYADDR:
perl-5.32.0/uconfig.h:1615: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/uconfig.h-1616- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/uconfig.h-4311- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/uconfig.h:4312: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/uconfig.h-4313- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/uconfig.h-4319- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/uconfig.h:4320: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/uconfig.h-4321- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/uconfig.h-4327- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/uconfig.h:4328: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/uconfig.h-4329- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/uconfig.h-4335- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/uconfig.h:4336: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/uconfig.h-4337- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/uconfig.h-4350- * This symbol holds the type used for the 1st argument
perl-5.32.0/uconfig.h:4351: * to gethostbyaddr().
perl-5.32.0/uconfig.h-4352- */
##############################################
perl-5.32.0/uconfig.h-4354- * This symbol holds the type used for the 2nd argument
perl-5.32.0/uconfig.h:4355: * to gethostbyaddr().
perl-5.32.0/uconfig.h-4356- */
##############################################
perl-5.32.0/uconfig.h-4362- * This symbol holds the type used for the 1st argument to
perl-5.32.0/uconfig.h:4363: * getnetbyaddr().
perl-5.32.0/uconfig.h-4364- */
##############################################
perl-5.32.0/utils/splain.PL-57-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/splain.PL:58:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/splain.PL-59-chdir $origdir;
##############################################
perl-5.32.0/utils/cpan.PL-46-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/cpan.PL:47:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/cpan.PL-48-chdir $origdir;
##############################################
perl-5.32.0/utils/streamzip.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/streamzip.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/streamzip.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/ptargrep.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/ptargrep.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/ptargrep.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/pl2pm.PL-418-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/pl2pm.PL:419:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/pl2pm.PL-420-chdir $origdir;
##############################################
perl-5.32.0/utils/h2ph.PL-295- print OUT ($t,
perl-5.32.0/utils/h2ph.PL:296: "eval(\"sub $enum_name () \{ $enum_val; \}\") ",
perl-5.32.0/utils/h2ph.PL-297- "unless defined(\&$enum_name);\n");
##############################################
perl-5.32.0/utils/h2ph.PL-766-{
perl-5.32.0/utils/h2ph.PL:767: my $from_gcc = `LC_ALL=C $Config{cc} -v -E - < /dev/null 2>&1 | awk '/^#include/, /^End of search list/' | grep '^ '`;
perl-5.32.0/utils/h2ph.PL-768- length($from_gcc) ? (split(' ', $from_gcc), $Config{usrinc}) : ($Config{usrinc});
##############################################
perl-5.32.0/utils/h2ph.PL-1029-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/h2ph.PL:1030:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/h2ph.PL-1031-chdir $origdir;
##############################################
perl-5.32.0/utils/perldoc.PL-58-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/perldoc.PL:59:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/perldoc.PL-60-chdir $origdir;
##############################################
perl-5.32.0/utils/shasum.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/shasum.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/shasum.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/libnetcfg.PL-759-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/libnetcfg.PL:760:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/libnetcfg.PL-761-chdir $origdir;
##############################################
perl-5.32.0/utils/h2xs.PL-2244-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/h2xs.PL:2245:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/h2xs.PL-2246-chdir $origdir;
##############################################
perl-5.32.0/utils/xsubpp.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/xsubpp.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/xsubpp.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/ptardiff.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/ptardiff.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/ptardiff.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/pod2html.PL-51-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/pod2html.PL:52:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/pod2html.PL-53-chdir $origdir;
##############################################
perl-5.32.0/utils/enc2xs.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/enc2xs.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/enc2xs.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/piconv.PL-46-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/piconv.PL:47:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/piconv.PL-48-chdir $origdir;
##############################################
perl-5.32.0/utils/zipdetails.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/zipdetails.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/zipdetails.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/instmodsh.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/instmodsh.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/instmodsh.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/corelist.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/corelist.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/corelist.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/prove.PL-47-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/prove.PL:48:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/prove.PL-49-chdir $origdir;
##############################################
perl-5.32.0/utils/encguess.PL-46-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/encguess.PL:47:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/encguess.PL-48-chdir $origdir;
##############################################
perl-5.32.0/utils/ptar.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/ptar.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/ptar.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/json_pp.PL-49-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/json_pp.PL:50:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/json_pp.PL-51-chdir $origdir;
##############################################
perl-5.32.0/utils/perlivp.PL-454-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/perlivp.PL:455:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/perlivp.PL-456-chdir $origdir;
##############################################
perl-5.32.0/utils/perlbug.PL-766- while ( !$report_written ) {
perl-5.32.0/utils/perlbug.PL:767: my $exit_status = system("$editor $filename");
perl-5.32.0/utils/perlbug.PL-768- if ($exit_status) {
##############################################
perl-5.32.0/utils/perlbug.PL-1574-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/utils/perlbug.PL:1575:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/utils/perlbug.PL-1576-chdir $origdir;
##############################################
perl-5.32.0/install_lib.pl-200- print "PROTECT: File $file\n";
perl-5.32.0/install_lib.pl:201: system("PROTECT $file $bits")
perl-5.32.0/install_lib.pl-202- unless $opts{notify};
##############################################
perl-5.32.0/pod/perl58delta.pod-3348-
perl-5.32.0/pod/perl58delta.pod:3349:This is harmless; it is caused by the getnetbyaddr() and getnetbyaddr_r()
perl-5.32.0/pod/perl58delta.pod-3350-having slightly different types for their first argument.
##############################################
perl-5.32.0/pod/perlhacktips.pod-1449- for file in `find . -name \*.gcno`
perl-5.32.0/pod/perlhacktips.pod:1450: do sh -c "cd `dirname $file` && gcov `basename $file .gcno`"
perl-5.32.0/pod/perlhacktips.pod-1451- done
##############################################
perl-5.32.0/pod/perldiag.pod-1302-shell's $PATH search, the -S option causes perl to do that search, so
perl-5.32.0/pod/perldiag.pod:1303:you don't have to type the path or C<`which $scriptname`>.
perl-5.32.0/pod/perldiag.pod-1304-
##############################################
perl-5.32.0/pod/perlsec.pod-137-
perl-5.32.0/pod/perlsec.pod:138: $shout = `echo $arg`; # Insecure, $shout now tainted
perl-5.32.0/pod/perlsec.pod-139-
##############################################
perl-5.32.0/pod/perltie.pod-656- } else {
perl-5.32.0/pod/perltie.pod:657: return $self->{LIST}->{$dot} = `cat $dir/.$dot`;
perl-5.32.0/pod/perltie.pod-658- }
##############################################
perl-5.32.0/pod/perlipc.pod-141- # ...
perl-5.32.0/pod/perlipc.pod:142: system($command);
perl-5.32.0/pod/perlipc.pod-143- # ...
##############################################
perl-5.32.0/pod/perlipc.pod-210- print "got SIGHUP\n";
perl-5.32.0/pod/perlipc.pod:211: exec($SELF, @ARGV) || die "$0: couldn't restart: $!";
perl-5.32.0/pod/perlipc.pod-212- };
##############################################
perl-5.32.0/pod/perlipc.pod-383- $ENV{PATH} .= ":/etc:/usr/etc";
perl-5.32.0/pod/perlipc.pod:384: if ( system("mknod", $path, "p")
perl-5.32.0/pod/perlipc.pod:385: && system("mkfifo", $path) )
perl-5.32.0/pod/perlipc.pod-386- {
##############################################
perl-5.32.0/pod/perlipc.pod-615- ($>, $)) = ($<, $(); # suid only
perl-5.32.0/pod/perlipc.pod:616: exec($program, @options, @args)
perl-5.32.0/pod/perlipc.pod-617- || die "can't exec program: $!";
##############################################
perl-5.32.0/pod/perlipc.pod-633- ($>, $)) = ($<, $();
perl-5.32.0/pod/perlipc.pod:634: exec($program, @options, @args)
perl-5.32.0/pod/perlipc.pod-635- || die "can't exec program: $!";
##############################################
perl-5.32.0/pod/perlipc.pod-999- my($port, $iaddr) = sockaddr_in($paddr);
perl-5.32.0/pod/perlipc.pod:1000: my $name = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/pod/perlipc.pod-1001-
##############################################
perl-5.32.0/pod/perlipc.pod-1060- my ($port, $iaddr) = sockaddr_in($paddr);
perl-5.32.0/pod/perlipc.pod:1061: my $name = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/pod/perlipc.pod-1062-
##############################################
perl-5.32.0/pod/perlipc.pod-1585- print $client "Welcome to $0; type help for command list.\n";
perl-5.32.0/pod/perlipc.pod:1586: my $hostinfo = gethostbyaddr($client->peeraddr);
perl-5.32.0/pod/perlipc.pod-1587- printf "[Connect from %s]\n",
##############################################
perl-5.32.0/pod/perlipc.pod-1662- my ($port, $hisiaddr) = sockaddr_in($hispaddr);
perl-5.32.0/pod/perlipc.pod:1663: my $host = gethostbyaddr($hisiaddr, AF_INET);
perl-5.32.0/pod/perlipc.pod-1664- my $histime = unpack("N", $rtime) - $SECS_OF_70_YEARS;
##############################################
perl-5.32.0/pod/perlebcdic.pod-1131- # OS/390 or z/OS example
perl-5.32.0/pod/perlebcdic.pod:1132: $ascii_data = `echo '$ebcdic_data'| iconv -f IBM-1047 -t ISO8859-1`
perl-5.32.0/pod/perlebcdic.pod-1133-
##############################################
perl-5.32.0/pod/perlebcdic.pod-1136- # OS/390 or z/OS example
perl-5.32.0/pod/perlebcdic.pod:1137: $ebcdic_data = `echo '$ascii_data'| iconv -f ISO8859-1 -t IBM-1047`
perl-5.32.0/pod/perlebcdic.pod-1138-
##############################################
perl-5.32.0/pod/perlebcdic.pod-1645- ($uu = <<'ENDOFHEREDOC') =~ s/^\s*//gm;
perl-5.32.0/pod/perlebcdic.pod:1646: M``$"`P0%!@<("0H+#`T.#Q`1$A,4%187&!D:&QP='A\@(2(C)"4F)R@I*BLL
perl-5.32.0/pod/perlebcdic.pod-1647- M+2XO,#$R,S0U-C<X.3H[/#T^/T!!0D-$149'2$E*2TQ-3D]045)35%565UA9
##############################################
perl-5.32.0/pod/perlsub.pod-1860- my $sym = shift;
perl-5.32.0/pod/perlsub.pod:1861: my $where = ($sym =~ s/^GLOBAL_// ? 'CORE::GLOBAL' : caller(0));
perl-5.32.0/pod/perlsub.pod-1862- $pkg->export($where, $sym, @_);
##############################################
perl-5.32.0/pod/perlsub.pod-1959- $program =~ s/.*:://;
perl-5.32.0/pod/perlsub.pod:1960: system($program, @_);
perl-5.32.0/pod/perlsub.pod-1961- }
##############################################
perl-5.32.0/pod/Makefile.SH-16-case "$0" in
perl-5.32.0/pod/Makefile.SH:17:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/pod/Makefile.SH-18-esac
##############################################
perl-5.32.0/pod/Makefile.SH-23-POD=`echo *.pod`
perl-5.32.0/pod/Makefile.SH:24:MAN=`echo $POD|sed 's/\.pod/\.man/g'`
perl-5.32.0/pod/Makefile.SH:25:HTML=`echo $POD|sed 's/perltoc.pod//'|sed 's/\.pod/\.html/g'`
perl-5.32.0/pod/Makefile.SH:26:TEX=`echo $POD|sed 's/\.pod/\.tex/g'`
perl-5.32.0/pod/Makefile.SH-27-
##############################################
perl-5.32.0/pod/perlinterp.pod-132-
perl-5.32.0/pod/perlinterp.pod:133: while ((PL_op = PL_op->op_ppaddr(aTHX))) {
perl-5.32.0/pod/perlinterp.pod-134- PERL_ASYNC_CHECK();
##############################################
perl-5.32.0/pod/perlvar.pod-788-
perl-5.32.0/pod/perlvar.pod:789: @first_run = `$^X -le "print int rand 100 for 1..100"`;
perl-5.32.0/pod/perlvar.pod-790-
##############################################
perl-5.32.0/pod/perl5140delta.pod-2549-
perl-5.32.0/pod/perl5140delta.pod:2550:Previously, if none of the gethostbyaddr(), gethostbyname() and
perl-5.32.0/pod/perl5140delta.pod-2551-gethostent() functions were implemented on a given platform, they would
##############################################
perl-5.32.0/pod/perl5140delta.pod-3554-
perl-5.32.0/pod/perl5140delta.pod:3555:A label right before a string eval (C<foo: eval $string>) no longer causes
perl-5.32.0/pod/perl5140delta.pod-3556-the label to be associated also with the first statement inside the eval
##############################################
perl-5.32.0/pod/perl5004delta.pod-400- chomp $answer;
perl-5.32.0/pod/perl5004delta.pod:401: die "`$answer' is neither `yes' nor `no'";
perl-5.32.0/pod/perl5004delta.pod-402- }
##############################################
perl-5.32.0/pod/perlfunc.pod-2999- my ($port, $iaddr) = sockaddr_in($hersockaddr);
perl-5.32.0/pod/perlfunc.pod:3000: my $herhostname = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/pod/perlfunc.pod-3001- my $herstraddr = inet_ntoa($iaddr);
##############################################
perl-5.32.0/pod/perlfunc.pod-3248- my $iaddr = inet_aton("127.1"); # or whatever address
perl-5.32.0/pod/perlfunc.pod:3249: my $name = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/pod/perlfunc.pod-3250-
##############################################
perl-5.32.0/pod/perlfunc.pod-3318- printf "Connect to %s [%s]\n",
perl-5.32.0/pod/perlfunc.pod:3319: scalar gethostbyaddr($myaddr, AF_INET),
perl-5.32.0/pod/perlfunc.pod-3320- inet_ntoa($myaddr);
##############################################
perl-5.32.0/README.os2-1485- return handle; /* was loaded with short name; all is fine */
perl-5.32.0/README.os2:1486: if (DosQueryProcAddr(handle, 0, "fill_extLibpath", (PFN*)&f))
perl-5.32.0/README.os2-1487- die_with(buf,
##############################################
perl-5.32.0/README.os2-1524-
perl-5.32.0/README.os2:1525: if (DosQueryProcAddr(handle,
perl-5.32.0/README.os2-1526- 0,
##############################################
perl-5.32.0/README.os2-1539- "");
perl-5.32.0/README.os2:1540: if (DosQueryProcAddr(handle, 0, "dll_perlmain", (PFN*)&f))
perl-5.32.0/README.os2-1541- die_with(PERL_DLL_BASENAME,
##############################################
perl-5.32.0/installperl-214- if ($usedl eq 'define') {
perl-5.32.0/installperl:215: `./$^X -pibak -e 's{$pwd\/libperl.x}{$archlibexp/CORE/libperl.x}' lib/Config.pm`;
perl-5.32.0/installperl-216- }
##############################################
perl-5.32.0/installperl-788- }
perl-5.32.0/installperl:789: system("strip", @opts, $file);
perl-5.32.0/installperl-790- } else {
##############################################
perl-5.32.0/util.c-3468-PPADDR_t*
perl-5.32.0/util.c:3469:Perl_get_ppaddr(pTHX)
perl-5.32.0/util.c-3470-{
##############################################
perl-5.32.0/util.c-6214-
perl-5.32.0/util.c:6215: /* Currently only implemented with backtrace() and dladdr(),
perl-5.32.0/util.c-6216- * for other platforms NULL is returned. */
##############################################
perl-5.32.0/util.c-6219- /* backtrace() is available via <execinfo.h> in glibc and in most
perl-5.32.0/util.c:6220: * modern BSDs; dladdr() is available via <dlfcn.h>. */
perl-5.32.0/util.c-6221-
##############################################
perl-5.32.0/util.c-6223- * the |skip| first ones. For the remaining ones we will try
perl-5.32.0/util.c:6224: * retrieving more information with dladdr(). */
perl-5.32.0/util.c-6225- int try_depth = skip + depth;
##############################################
perl-5.32.0/util.c-6229-
perl-5.32.0/util.c:6230: /* Retrieved with dladdr() from the addresses returned by backtrace(). */
perl-5.32.0/util.c-6231- Dl_info* dl_infos;
##############################################
perl-5.32.0/util.c-6280-
perl-5.32.0/util.c:6281: /* We use dladdr() instead of backtrace_symbols() because we want
perl-5.32.0/util.c-6282- * the full details instead of opaque strings. This is useful for
##############################################
perl-5.32.0/util.c-6312-
perl-5.32.0/util.c:6313: /* Yes, zero from dladdr() is failure. */
perl-5.32.0/util.c:6314: if (dladdr(raw_frames[i], dl_info)) {
perl-5.32.0/util.c-6315- total_bytes += sizeof(Perl_c_backtrace_frame);
##############################################
perl-5.32.0/util.c-6422- Safefree(object_name_sizes);
perl-5.32.0/util.c:6423: /* Assuming the strings returned by dladdr() are pointers
perl-5.32.0/util.c-6424- * to read-only static memory (the object file), so that
##############################################
perl-5.32.0/configure.com-124-$!: This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist. !sfn
perl-5.32.0/configure.com:125:$!glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'` !sfn
perl-5.32.0/configure.com-126-$!glibpth="/usr/shlib $glibpth" !sfn
##############################################
perl-5.32.0/README.qnx-178- $ ssh $TARGETUSER@$TARGETHOST 'rm -rf perl; mkdir perl; mkdir perl/tmp'
perl-5.32.0/README.qnx:179: $ export TARGETDIR=`ssh $TARGETUSER@$TARGETHOST pwd`/perl
perl-5.32.0/README.qnx-180- $ export TARGETENV="export TMPDIR=$TARGETDIR/tmp; "
##############################################
perl-5.32.0/reentr.c-445- /* socklen_t is what Posix 2001 says this should be */
perl-5.32.0/reentr.c:446: retptr = gethostbyaddr(host_addr, (socklen_t) asize, anint); break;
perl-5.32.0/reentr.c-447- case KEY_gethostbyname:
##############################################
perl-5.32.0/reentr.c-515- anint = va_arg(ap, int);
perl-5.32.0/reentr.c:516: retptr = getnetbyaddr(net, anint); break;
perl-5.32.0/reentr.c-517- case KEY_getnetbyname:
##############################################
perl-5.32.0/ext/POSIX/lib/POSIX.pod-503-
perl-5.32.0/ext/POSIX/lib/POSIX.pod:504:It returns the remainder S<C<$r = $x - $n*$y>>, where S<C<$n = trunc($x/$y)>>.
perl-5.32.0/ext/POSIX/lib/POSIX.pod-505-The C<$r> has the same sign as C<$x> and magnitude (absolute value)
##############################################
perl-5.32.0/ext/POSIX/lib/POSIX.pm-164- strstr => 'big, little => CORE::index($_[0], $_[1])',
perl-5.32.0/ext/POSIX/lib/POSIX.pm:165: system => 'command => CORE::system($_[0])',
perl-5.32.0/ext/POSIX/lib/POSIX.pm-166- time => 'CORE::time',
##############################################
perl-5.32.0/ext/POSIX/t/wrappers.t-152- skip("Can't find true", 1) unless $true;
perl-5.32.0/ext/POSIX/t/wrappers.t:153: is(POSIX::system($true), 0, 'system');
perl-5.32.0/ext/POSIX/t/wrappers.t-154-}
##############################################
perl-5.32.0/ext/XS-APItest/APItest.xs-2208-IV
perl-5.32.0/ext/XS-APItest/APItest.xs:2209:xop_ppaddr ()
perl-5.32.0/ext/XS-APItest/APItest.xs-2210- CODE:
##############################################
perl-5.32.0/ext/XS-APItest/t/synthetic_scope.t-40-
perl-5.32.0/ext/XS-APItest/t/synthetic_scope.t:41:is eval('$x++'), undef;
perl-5.32.0/ext/XS-APItest/t/synthetic_scope.t-42-like $@, qr/explicit package name/;
##############################################
perl-5.32.0/ext/XS-APItest/t/callregexec.t-34- my $bytes = do { use bytes; length $str1 };
perl-5.32.0/ext/XS-APItest/t/callregexec.t:35: ok !!$exp == !!callregexec($re, 0, $bytes, 0, $str, 0),
perl-5.32.0/ext/XS-APItest/t/callregexec.t-36- "$desc callregexec";
##############################################
perl-5.32.0/ext/VMS-Stdio/t/vms_stdio.t-75-close $sfh;
perl-5.32.0/ext/VMS-Stdio/t/vms_stdio.t:76:@defs = map { /(\S+)/ && $1 } `\@$name.tmp`;
perl-5.32.0/ext/VMS-Stdio/t/vms_stdio.t-77-unlink("$name.tmp");
##############################################
perl-5.32.0/ext/Devel-Peek/t/Peek.t-11- my $core = !!$ENV{PERL_CORE};
perl-5.32.0/ext/Devel-Peek/t/Peek.t:12: require($core ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/ext/Devel-Peek/t/Peek.t-13- }
##############################################
perl-5.32.0/ext/Devel-Peek/t/Peek.t-617-)? MG_LEN = -?\d+
perl-5.32.0/ext/Devel-Peek/t/Peek.t:618: MG_PTR = $ADDR (?:"(?i:PATH)"|=> HEf_SVKEY
perl-5.32.0/ext/Devel-Peek/t/Peek.t-619- SV = PV(?:IV)?\\($ADDR\\) at $ADDR
##############################################
perl-5.32.0/ext/IPC-Open3/t/IPC-Open3.t-184- #unacceptable for testing where the FETCH failure occured, we dont want
perl-5.32.0/ext/IPC-Open3/t/IPC-Open3.t:185: #it failing in a $foo = $_[0]; #later# system($foo), where the failure
perl-5.32.0/ext/IPC-Open3/t/IPC-Open3.t-186- #is supposed to be triggered in the inner most syscall, aka system()
##############################################
perl-5.32.0/ext/Errno/Errno_pm.PL-51- defined($file) && !-f $file) {
perl-5.32.0/ext/Errno/Errno_pm.PL:52: chomp($file = `cygpath -w "$file"`);
perl-5.32.0/ext/Errno/Errno_pm.PL-53- }
##############################################
perl-5.32.0/ext/B/B.pm-230- print $prefix, uc($1), " => {\n";
perl-5.32.0/ext/B/B.pm:231: walkoptree_exec($op->other, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-232- print $prefix, "}\n";
##############################################
perl-5.32.0/ext/B/B.pm-236- print $prefix, "PMREPLSTART => {\n";
perl-5.32.0/ext/B/B.pm:237: walkoptree_exec($pmreplstart, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-238- print $prefix, "}\n";
##############################################
perl-5.32.0/ext/B/B.pm-241- print $prefix, "SUBSTCONT => {\n";
perl-5.32.0/ext/B/B.pm:242: walkoptree_exec($op->other->pmreplstart, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-243- print $prefix, "}\n";
##############################################
perl-5.32.0/ext/B/B.pm-246- print $prefix, "REDO => {\n";
perl-5.32.0/ext/B/B.pm:247: walkoptree_exec($op->redoop, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-248- print $prefix, "}\n", $prefix, "NEXT => {\n";
perl-5.32.0/ext/B/B.pm:249: walkoptree_exec($op->nextop, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-250- print $prefix, "}\n", $prefix, "LAST => {\n";
perl-5.32.0/ext/B/B.pm:251: walkoptree_exec($op->lastop, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-252- print $prefix, "}\n";
##############################################
perl-5.32.0/ext/B/B.pm-256- print $prefix, "SUBST => {\n";
perl-5.32.0/ext/B/B.pm:257: walkoptree_exec($replstart, $method, $level + 1);
perl-5.32.0/ext/B/B.pm-258- print $prefix, "}\n";
##############################################
perl-5.32.0/ext/B/B/Concise.pm-196- if ($order eq "exec") {
perl-5.32.0/ext/B/B/Concise.pm:197: walk_exec($cv->START);
perl-5.32.0/ext/B/B/Concise.pm-198- }
##############################################
perl-5.32.0/ext/B/t/b.t-297-{
perl-5.32.0/ext/B/t/b.t:298: my @tests = ((map {eval(qq{"$_"}), $_} '\\n', '\\r', '\\t',
perl-5.32.0/ext/B/t/b.t-299- '\\b', '\\a', '\\f', '\\000', '\\\'', '?'), '"', '"',
##############################################
perl-5.32.0/ext/B/t/showlex.t-30-} else {
perl-5.32.0/ext/B/t/showlex.t:31: $a = `$^X $path "-MO=Showlex" -e "my \@one" 2>&1`;
perl-5.32.0/ext/B/t/showlex.t-32- like ($a, qr/undef.*: \([^)]*\) \@one.*Nullsv.*AV/s,
##############################################
perl-5.32.0/ext/B/t/optree_samples.t-157-
perl-5.32.0/ext/B/t/optree_samples.t:158:checkOptree ( name => '-exec (see above, with my $a = shift)',
perl-5.32.0/ext/B/t/optree_samples.t-159- bcopts => '-exec',
##############################################
perl-5.32.0/ext/B/t/strict.t-24- my $check = "$^X -cw -Mstrict $path 2>&1";
perl-5.32.0/ext/B/t/strict.t:25: my $got = `$check`;
perl-5.32.0/ext/B/t/strict.t-26- is( $got, "$path syntax OK\n", "$module.pm compiles without errors" )
##############################################
perl-5.32.0/ext/Sys-Hostname/Hostname.pm-140-then caches the result. It tries the first available of the C
perl-5.32.0/ext/Sys-Hostname/Hostname.pm:141:library's gethostname(), C<`$Config{aphostname}`>, uname(2),
perl-5.32.0/ext/Sys-Hostname/Hostname.pm-142-C<syscall(SYS_gethostname)>, C<`hostname`>, C<`uname -n`>,
##############################################
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm-108-the reference address of its argument as a numeric value. The only
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm:109:difference is that C<refaddr()> returns C<undef> when given a
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm-110-non-reference while C<id()> returns its argument unchanged.
##############################################
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm-282-The C<id()> function is provided in addition to the
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm:283:existing C<Scalar::Util::refaddr()>. Besides its short name
perl-5.32.0/ext/Hash-Util-FieldHash/lib/Hash/Util/FieldHash.pm-284-it can be a little faster under some circumstances (and a
##############################################
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-23- my $ref = [];
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t:24: is id( $ref), refaddr( $ref), "id is refaddr";
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-25- my %h;
##############################################
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-98- ok( exists $h{ $key}, "existence ($keytype)");
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t:99: is( $h{ $key}, $val, "retrieval ($keytype)");
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-100- delete $h{ $key};
##############################################
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-116- my ( $id) = keys %f;
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t:117: my $refaddr = refaddr($key);
perl-5.32.0/ext/Hash-Util-FieldHash/t/02_function.t-118- is $id, $refaddr, "key is refaddr";
##############################################
perl-5.32.0/ext/Pod-Html/testdir/perlvar-copy.pod-1406-
perl-5.32.0/ext/Pod-Html/testdir/perlvar-copy.pod:1407: @first_run = `$^X -le "print int rand 100 for 1..100"`;
perl-5.32.0/ext/Pod-Html/testdir/perlvar-copy.pod-1408-
##############################################
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-14-
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t:15:($val) = `Show Symbol $name` =~ /(\w+)"$/;
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-16-print +($val eq 'Perl_test' ? '' : 'not '),"ok 5\n";
##############################################
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-44-
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t:45:($val) = `Show Symbol/Global $name` =~ /==\s+"(\w+)"$/;
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-46-print +(defined($val) ? 'not ' : ''),"ok 17\n";
##############################################
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-58-
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t:59:($val) = `Show Symbol/Global $name` =~ /==\s+"(\w+)"$/;
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-60-print +($val eq 'Perl_test' ? '' : 'not '),"ok 23\n";
##############################################
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-67-
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t:68:($val) = `Show Symbol/Global $name` =~ /==\s+"(\w+)"$/;
perl-5.32.0/ext/VMS-DCLsym/t/vms_dclsym.t-69-print +($val eq 'Perl_test' ? 'not ' : ''),"ok 26\n";
##############################################
perl-5.32.0/reentr.h-1064-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISBWRE
perl-5.32.0/reentr.h:1065:# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1066-# endif
perl-5.32.0/reentr.h-1067-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBWIE
perl-5.32.0/reentr.h:1068:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1069-# endif
perl-5.32.0/reentr.h-1070-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CWISBIE
perl-5.32.0/reentr.h:1071:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1072-# endif
perl-5.32.0/reentr.h-1073-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TWISBIE
perl-5.32.0/reentr.h:1074:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1075-# endif
perl-5.32.0/reentr.h-1076-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CIISBIE
perl-5.32.0/reentr.h:1077:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? &PL_reentrant_buffer->_hostent_struct : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1078-# endif
perl-5.32.0/reentr.h-1079-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_CSBIE
perl-5.32.0/reentr.h:1080:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? 1 : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1081-# endif
perl-5.32.0/reentr.h-1082-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_S_TSBIE
perl-5.32.0/reentr.h:1083:# define gethostbyaddr(a, b, c) (gethostbyaddr_r(a, b, c, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_errno) ? 1 : ((errno == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1084-# endif
perl-5.32.0/reentr.h-1085-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CWISD
perl-5.32.0/reentr.h:1086:# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1087-# endif
perl-5.32.0/reentr.h-1088-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CIISD
perl-5.32.0/reentr.h:1089:# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, &PL_reentrant_buffer->_hostent_data)) == 0 ? &PL_reentrant_buffer->_hostent_struct : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1090-# endif
perl-5.32.0/reentr.h-1091-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_CII
perl-5.32.0/reentr.h:1092:# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c)) == 0 ? 1 : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1093-# endif
perl-5.32.0/reentr.h-1094-# if !defined(gethostbyaddr) && GETHOSTBYADDR_R_PROTO == REENTRANT_PROTO_I_TsISBWRE
perl-5.32.0/reentr.h:1095:# define gethostbyaddr(a, b, c) ((PL_reentrant_retint = gethostbyaddr_r(a, b, c, &PL_reentrant_buffer->_hostent_struct, PL_reentrant_buffer->_hostent_buffer, PL_reentrant_buffer->_hostent_size, &PL_reentrant_buffer->_hostent_ptr, &PL_reentrant_buffer->_hostent_errno)) == 0 ? PL_reentrant_buffer->_hostent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct hostent *) Perl_reentrant_retry("gethostbyaddr", a, b, c) : 0))
perl-5.32.0/reentr.h-1096-# endif
##############################################
perl-5.32.0/reentr.h-1176-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_UISBWRE
perl-5.32.0/reentr.h:1177:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1178-# endif
perl-5.32.0/reentr.h-1179-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_LISBI
perl-5.32.0/reentr.h:1180:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1181-# endif
perl-5.32.0/reentr.h-1182-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_TISBI
perl-5.32.0/reentr.h:1183:# define getnetbyaddr(a, b) (getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1184-# endif
perl-5.32.0/reentr.h-1185-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_S_LISBI
perl-5.32.0/reentr.h:1186:# define getnetbyaddr(a, b) (getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size) ? &PL_reentrant_buffer->_netent_struct : ((errno == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1187-# endif
perl-5.32.0/reentr.h-1188-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_TISD
perl-5.32.0/reentr.h:1189:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1190-# endif
perl-5.32.0/reentr.h-1191-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_LISD
perl-5.32.0/reentr.h:1192:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1193-# endif
perl-5.32.0/reentr.h-1194-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_IISD
perl-5.32.0/reentr.h:1195:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, &PL_reentrant_buffer->_netent_data)) == 0 ? &PL_reentrant_buffer->_netent_struct : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1196-# endif
perl-5.32.0/reentr.h-1197-# if !defined(getnetbyaddr) && GETNETBYADDR_R_PROTO == REENTRANT_PROTO_I_uISBWRE
perl-5.32.0/reentr.h:1198:# define getnetbyaddr(a, b) ((PL_reentrant_retint = getnetbyaddr_r(a, b, &PL_reentrant_buffer->_netent_struct, PL_reentrant_buffer->_netent_buffer, PL_reentrant_buffer->_netent_size, &PL_reentrant_buffer->_netent_ptr, &PL_reentrant_buffer->_netent_errno)) == 0 ? PL_reentrant_buffer->_netent_ptr : ((PL_reentrant_retint == ERANGE) ? (struct netent *) Perl_reentrant_retry("getnetbyaddr", a, b) : 0))
perl-5.32.0/reentr.h-1199-# endif
##############################################
perl-5.32.0/configure.gnu-24-*configure)
perl-5.32.0/configure.gnu:25: if cmp $0 `echo $0 | sed -e s/configure/Configure/` >/dev/null; then
perl-5.32.0/configure.gnu-26- echo "Your configure and Configure scripts seem to be identical."
##############################################
perl-5.32.0/configure.gnu-61- --prefix=*)
perl-5.32.0/configure.gnu:62: arg=`echo $1 | sed 's/--prefix=/-Dprefix=/'`
perl-5.32.0/configure.gnu-63- opts="$opts $arg"
##############################################
perl-5.32.0/configure.gnu-87- --*)
perl-5.32.0/configure.gnu:88: opt=`echo $1 | sed 's/=.*//'`
perl-5.32.0/configure.gnu-89- echo "This GNU configure front end does not understand $opt"
##############################################
perl-5.32.0/win32/Makefile-641-#clear the list, we dont support .cxx .bas .cbl .for .pas .f .f90
perl-5.32.0/win32/Makefile:642:# .asm .cpp are not currently used but they are included for completeness
perl-5.32.0/win32/Makefile-643-.SUFFIXES :
perl-5.32.0/win32/Makefile:644:.SUFFIXES : .c $(o) .cpp .asm .dll .lib .exe .rc .res
perl-5.32.0/win32/Makefile-645-
##############################################
perl-5.32.0/win32/config_H.vc-1481-/* HAS_DLADDR:
perl-5.32.0/win32/config_H.vc:1482: * This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/win32/config_H.vc-1483- * available to query dynamic linker information for an address.
##############################################
perl-5.32.0/win32/config_H.vc-1556-/* HAS_GETHOSTBYADDR:
perl-5.32.0/win32/config_H.vc:1557: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/win32/config_H.vc-1558- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/win32/config_H.vc-1603-/* HAS_GETNETBYADDR:
perl-5.32.0/win32/config_H.vc:1604: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/win32/config_H.vc-1605- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/win32/config_H.vc-4212- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/win32/config_H.vc:4213: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.vc-4214- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.vc-4220- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/win32/config_H.vc:4221: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.vc-4222- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.vc-4228- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/win32/config_H.vc:4229: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.vc-4230- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.vc-4236- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/win32/config_H.vc:4237: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.vc-4238- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.vc-4251- * This symbol holds the type used for the 1st argument
perl-5.32.0/win32/config_H.vc:4252: * to gethostbyaddr().
perl-5.32.0/win32/config_H.vc-4253- */
##############################################
perl-5.32.0/win32/config_H.vc-4255- * This symbol holds the type used for the 2nd argument
perl-5.32.0/win32/config_H.vc:4256: * to gethostbyaddr().
perl-5.32.0/win32/config_H.vc-4257- */
##############################################
perl-5.32.0/win32/config_H.vc-4263- * This symbol holds the type used for the 1st argument to
perl-5.32.0/win32/config_H.vc:4264: * getnetbyaddr().
perl-5.32.0/win32/config_H.vc-4265- */
##############################################
perl-5.32.0/win32/perlhost.h-1256-struct hostent*
perl-5.32.0/win32/perlhost.h:1257:PerlSockGethostbyaddr(struct IPerlSock* piPerl, const char* addr, int len, int type)
perl-5.32.0/win32/perlhost.h-1258-{
perl-5.32.0/win32/perlhost.h:1259: return win32_gethostbyaddr(addr, len, type);
perl-5.32.0/win32/perlhost.h-1260-}
##############################################
perl-5.32.0/win32/perlhost.h-1281-struct netent *
perl-5.32.0/win32/perlhost.h:1282:PerlSockGetnetbyaddr(struct IPerlSock* piPerl, long net, int type)
perl-5.32.0/win32/perlhost.h-1283-{
perl-5.32.0/win32/perlhost.h:1284: return win32_getnetbyaddr(net, type);
perl-5.32.0/win32/perlhost.h-1285-}
##############################################
perl-5.32.0/win32/perlhost.h-1352-unsigned long
perl-5.32.0/win32/perlhost.h:1353:PerlSockInetAddr(struct IPerlSock* piPerl, const char* cp)
perl-5.32.0/win32/perlhost.h-1354-{
perl-5.32.0/win32/perlhost.h:1355: return win32_inet_addr(cp);
perl-5.32.0/win32/perlhost.h-1356-}
##############################################
perl-5.32.0/win32/win32sck.c-763-struct hostent *
perl-5.32.0/win32/win32sck.c:764:win32_gethostbyaddr(const char *addr, int len, int type)
perl-5.32.0/win32/win32sck.c-765-{
##############################################
perl-5.32.0/win32/win32sck.c-767-
perl-5.32.0/win32/win32sck.c:768: SOCKET_TEST(r = gethostbyaddr(addr, len, type), NULL);
perl-5.32.0/win32/win32sck.c-769- return r;
##############################################
perl-5.32.0/win32/win32sck.c-872-unsigned long
perl-5.32.0/win32/win32sck.c:873:win32_inet_addr(const char FAR *cp)
perl-5.32.0/win32/win32sck.c-874-{
perl-5.32.0/win32/win32sck.c-875- StartSockets();
perl-5.32.0/win32/win32sck.c:876: return inet_addr(cp);
perl-5.32.0/win32/win32sck.c-877-}
##############################################
perl-5.32.0/win32/win32sck.c-922-struct netent *
perl-5.32.0/win32/win32sck.c:923:win32_getnetbyaddr(long net, int type)
perl-5.32.0/win32/win32sck.c-924-{
##############################################
perl-5.32.0/win32/include/sys/socket.h-66-u_short win32_htons (u_short hostshort);
perl-5.32.0/win32/include/sys/socket.h:67:unsigned long win32_inet_addr (const char * cp);
perl-5.32.0/win32/include/sys/socket.h-68-char * win32_inet_ntoa (struct in_addr in);
##############################################
perl-5.32.0/win32/include/sys/socket.h-86-
perl-5.32.0/win32/include/sys/socket.h:87:struct hostent * win32_gethostbyaddr(const char * addr, int len, int type);
perl-5.32.0/win32/include/sys/socket.h-88-struct hostent * win32_gethostbyname(const char * name);
##############################################
perl-5.32.0/win32/include/sys/socket.h-99-struct netent * win32_getnetbyname(char *name);
perl-5.32.0/win32/include/sys/socket.h:100:struct netent * win32_getnetbyaddr(long net, int type);
perl-5.32.0/win32/include/sys/socket.h-101-void win32_setprotoent(int stayopen);
##############################################
perl-5.32.0/win32/config_h.PL-127- {
perl-5.32.0/win32/config_h.PL:128: die "Cannot handle \`$cmd\`";
perl-5.32.0/win32/config_h.PL-129- }
##############################################
perl-5.32.0/win32/config_sh.PL-91- if ($opt{cc} =~ /\b(?:cl|icl)/) { #MSVC can come as clarm.exe, icl=Intel C
perl-5.32.0/win32/config_sh.PL:92: my $output = `$opt{cc} 2>&1`;
perl-5.32.0/win32/config_sh.PL-93- $opt{ccversion} = $output =~ /\b(\d+(?:\.\d+)+)\b/ ? $1 : '?';
##############################################
perl-5.32.0/win32/config_sh.PL-95- elsif ($opt{cc} =~ /\bgcc\b/) {
perl-5.32.0/win32/config_sh.PL:96: chomp($opt{gccversion} = `$opt{cc} -dumpversion`);
perl-5.32.0/win32/config_sh.PL-97- }
##############################################
perl-5.32.0/win32/config_H.gc-1488-/* HAS_DLADDR:
perl-5.32.0/win32/config_H.gc:1489: * This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/win32/config_H.gc-1490- * available to query dynamic linker information for an address.
##############################################
perl-5.32.0/win32/config_H.gc-1563-/* HAS_GETHOSTBYADDR:
perl-5.32.0/win32/config_H.gc:1564: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/win32/config_H.gc-1565- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/win32/config_H.gc-1610-/* HAS_GETNETBYADDR:
perl-5.32.0/win32/config_H.gc:1611: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/win32/config_H.gc-1612- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/win32/config_H.gc-4221- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/win32/config_H.gc:4222: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.gc-4223- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.gc-4229- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/win32/config_H.gc:4230: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.gc-4231- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.gc-4237- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/win32/config_H.gc:4238: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.gc-4239- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.gc-4245- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/win32/config_H.gc:4246: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/win32/config_H.gc-4247- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/win32/config_H.gc-4260- * This symbol holds the type used for the 1st argument
perl-5.32.0/win32/config_H.gc:4261: * to gethostbyaddr().
perl-5.32.0/win32/config_H.gc-4262- */
##############################################
perl-5.32.0/win32/config_H.gc-4264- * This symbol holds the type used for the 2nd argument
perl-5.32.0/win32/config_H.gc:4265: * to gethostbyaddr().
perl-5.32.0/win32/config_H.gc-4266- */
##############################################
perl-5.32.0/win32/config_H.gc-4272- * This symbol holds the type used for the 1st argument to
perl-5.32.0/win32/config_H.gc:4273: * getnetbyaddr().
perl-5.32.0/win32/config_H.gc-4274- */
##############################################
perl-5.32.0/pp_sys.c-4977-
perl-5.32.0/pp_sys.c:4978:/* also used for: pp_ghbyaddr() pp_ghbyname() */
perl-5.32.0/pp_sys.c-4979-
##############################################
perl-5.32.0/pp_sys.c-4987-#ifndef HAS_GETHOST_PROTOS /* XXX Do we need individual probes? */
perl-5.32.0/pp_sys.c:4988: struct hostent *gethostbyaddr(Netdb_host_t, Netdb_hlen_t, int);
perl-5.32.0/pp_sys.c-4989- struct hostent *gethostbyname(Netdb_name_t);
##############################################
perl-5.32.0/pp_sys.c-5010-
perl-5.32.0/pp_sys.c:5011: hent = PerlSock_gethostbyaddr(addr, (Netdb_hlen_t) addrlen, addrtype);
perl-5.32.0/pp_sys.c-5012-#else
##############################################
perl-5.32.0/pp_sys.c-5069-
perl-5.32.0/pp_sys.c:5070:/* also used for: pp_gnbyaddr() pp_gnbyname() */
perl-5.32.0/pp_sys.c-5071-
##############################################
perl-5.32.0/pp_sys.c-5078-#ifndef HAS_GETNET_PROTOS /* XXX Do we need individual probes? */
perl-5.32.0/pp_sys.c:5079: struct netent *getnetbyaddr(Netdb_net_t, int);
perl-5.32.0/pp_sys.c-5080- struct netent *getnetbyname(Netdb_name_t);
##############################################
perl-5.32.0/pp_sys.c-5096- const Netdb_net_t addr = (Netdb_net_t) (U32)POPu;
perl-5.32.0/pp_sys.c:5097: nent = PerlSock_getnetbyaddr(addr, addrtype);
perl-5.32.0/pp_sys.c-5098-#else
##############################################
perl-5.32.0/README.aix-488-
perl-5.32.0/README.aix:489: hent = PerlSock_gethostbyaddr(addr, (Netdb_hlen_t) addrlen, addrtype);
perl-5.32.0/README.aix-490-
perl-5.32.0/README.aix-491-in the "pp_ghostent" function, you may ignore it safely. The warning
perl-5.32.0/README.aix:492:is caused by the reentrant variant of gethostbyaddr() having a slightly
perl-5.32.0/README.aix-493-different prototype than its non-reentrant variant, but the difference
##############################################
perl-5.32.0/embedvar.h-371-#define PL_warnhook (vTHX->Iwarnhook)
perl-5.32.0/embedvar.h:372:#define PL_watchaddr (vTHX->Iwatchaddr)
perl-5.32.0/embedvar.h-373-#define PL_watchok (vTHX->Iwatchok)
##############################################
perl-5.32.0/embedvar.h-452-#endif
perl-5.32.0/embedvar.h:453:#define PL_ppaddr (my_vars->Gppaddr)
perl-5.32.0/embedvar.h:454:#define PL_Gppaddr (my_vars->Gppaddr)
perl-5.32.0/embedvar.h-455-#ifdef OS2
##############################################
perl-5.32.0/regen_perly.pl-71-
perl-5.32.0/regen_perly.pl:72:my $version = `$bison -V`;
perl-5.32.0/regen_perly.pl-73-unless ($version) { die <<EOF; }
##############################################
perl-5.32.0/regen_perly.pl-92-# creates $tmpc_file and $tmph_file
perl-5.32.0/regen_perly.pl:93:my_system("$bison -d -o $tmpc_file $y_file");
perl-5.32.0/regen_perly.pl-94-
##############################################
perl-5.32.0/run.c-40- PERL_DTRACE_PROBE_OP(op);
perl-5.32.0/run.c:41: while ((PL_op = op = op->op_ppaddr(aTHX))) {
perl-5.32.0/run.c-42- PERL_DTRACE_PROBE_OP(op);
##############################################
perl-5.32.0/inline.h-436- * on a 64-bit system */
perl-5.32.0/inline.h:437:# define PERL_IS_SUBWORD_ADDR(x) (1 & ( PTR2nat(x) \
perl-5.32.0/inline.h-438- | ( PTR2nat(x) >> 1) \
##############################################
perl-5.32.0/inline.h-450- /* This term is wordsize if subword; 0 if not */
perl-5.32.0/inline.h:451: + PERL_WORDSIZE * PERL_IS_SUBWORD_ADDR(x)
perl-5.32.0/inline.h-452-
##############################################
perl-5.32.0/inline.h-653- if ((STRLEN) (e - x) >= PERL_WORDSIZE
perl-5.32.0/inline.h:654: + PERL_WORDSIZE * PERL_IS_SUBWORD_ADDR(x)
perl-5.32.0/inline.h-655- - (PTR2nat(x) & PERL_WORD_BOUNDARY_MASK))
##############################################
perl-5.32.0/pp_ctl.c-3170- OP_NAME(PL_op)));
perl-5.32.0/pp_ctl.c:3171: PL_op->op_ppaddr(aTHX);
perl-5.32.0/pp_ctl.c-3172- }
##############################################
perl-5.32.0/runtests.SH-14-case "$0" in
perl-5.32.0/runtests.SH:15:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/runtests.SH-16-esac
##############################################
perl-5.32.0/op.c-7194- Copy(PL_partition_by_byte_length, t_array, len, UV);
perl-5.32.0/op.c:7195: invlist_set_len(t_invlist, len, *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7196- Newx(r_map, len + 1, UV);
##############################################
perl-5.32.0/op.c-7662- len,
perl-5.32.0/op.c:7663: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7664- }
##############################################
perl-5.32.0/op.c-7700- invlist_set_len(t_invlist, len,
perl-5.32.0/op.c:7701: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7702- }
##############################################
perl-5.32.0/op.c-7743- invlist_set_len(t_invlist, len,
perl-5.32.0/op.c:7744: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7745- }
##############################################
perl-5.32.0/op.c-7784- invlist_set_len(t_invlist, len,
perl-5.32.0/op.c:7785: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7786- }
##############################################
perl-5.32.0/op.c-7809- invlist_set_len(t_invlist, len,
perl-5.32.0/op.c:7810: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7811- }
##############################################
perl-5.32.0/op.c-7841- invlist_set_len(t_invlist, len,
perl-5.32.0/op.c:7842: *(get_invlist_offset_addr(t_invlist)));
perl-5.32.0/op.c-7843-
##############################################
perl-5.32.0/hints/os2.sh-43- IFS="$oifs"
perl-5.32.0/hints/os2.sh:44: tryman="`./UU/loc . /man $tryman`"
perl-5.32.0/hints/os2.sh:45: tryman="`echo $tryman | tr '\\\' '/'`"
perl-5.32.0/hints/os2.sh-46-
perl-5.32.0/hints/os2.sh-47- # indented to avoid having it *two* times at start
perl-5.32.0/hints/os2.sh:48: libemx="`./UU/loc os2.a /emx/lib $libemx`"
perl-5.32.0/hints/os2.sh-49-
perl-5.32.0/hints/os2.sh:50:usrinc="`./UU/loc stdlib.h /emx/include $usrinc`"
perl-5.32.0/hints/os2.sh:51:usrinc="`dirname $usrinc | tr '\\\' '/'`"
perl-5.32.0/hints/os2.sh:52:libemx="`dirname $libemx | tr '\\\' '/'`"
perl-5.32.0/hints/os2.sh-53-
##############################################
perl-5.32.0/hints/os2.sh-59-
perl-5.32.0/hints/os2.sh:60:emxpath="`dirname $libemx`"
perl-5.32.0/hints/os2.sh-61-if test ! -d "$emxpath"; then
##############################################
perl-5.32.0/hints/os2.sh-87-
perl-5.32.0/hints/os2.sh:88:rsx="`./UU/loc rsx.exe undef $pth`"
perl-5.32.0/hints/os2.sh-89-
##############################################
perl-5.32.0/hints/os2.sh-92-# Acute backslashitis:
perl-5.32.0/hints/os2.sh:93:libpth="`echo \"$LIBRARY_PATH\" | tr ';\\\' ' /'`"
perl-5.32.0/hints/os2.sh-94-libpth="$libpth $libemx/mt $libemx"
##############################################
perl-5.32.0/hints/os2.sh-297- if (patch -v || patch --version) 2>&1 >/dev/null; then
perl-5.32.0/hints/os2.sh:298: gnupatch="`./UU/loc patch.exe undef $pth`"
perl-5.32.0/hints/os2.sh-299- fi
##############################################
perl-5.32.0/hints/os2.sh-304- if test -z "$pager"; then
perl-5.32.0/hints/os2.sh:305: pager="`./UU/loc $f '' $pth`"
perl-5.32.0/hints/os2.sh-306- fi
##############################################
perl-5.32.0/hints/os2.sh-439-if test -z "$cryptlib"; then
perl-5.32.0/hints/os2.sh:440: cryptlib=`UU/loc crypt$lib_ext "" $libpth`
perl-5.32.0/hints/os2.sh-441- if $test -n "$cryptlib"; then
##############################################
perl-5.32.0/hints/os2.sh-443- else
perl-5.32.0/hints/os2.sh:444: cryptlib=`UU/loc ufc$lib_ext "" $libpth`
perl-5.32.0/hints/os2.sh-445- if $test -n "$cryptlib"; then
##############################################
perl-5.32.0/hints/dos_djgpp.sh-72-$define|true|[yY]*)
perl-5.32.0/hints/dos_djgpp.sh:73: set `echo X "$libswanted "| sed -e 's/ c / gthreads c /'`
perl-5.32.0/hints/dos_djgpp.sh-74- shift
##############################################
perl-5.32.0/hints/solaris_2.sh-41-# /lib is just a symlink to /usr/lib
perl-5.32.0/hints/solaris_2.sh:42:set `echo $glibpth | sed -e 's@/usr/ucblib@@' -e 's@ /lib @ @'`
perl-5.32.0/hints/solaris_2.sh-43-glibpth="$*"
##############################################
perl-5.32.0/hints/solaris_2.sh-50-# versions too? (A.D. 11/2007).
perl-5.32.0/hints/solaris_2.sh:51:case "`$run uname -r`" in
perl-5.32.0/hints/solaris_2.sh-52-5.[0-9]) ;;
##############################################
perl-5.32.0/hints/solaris_2.sh-62-# Thanks to Hallvard B. Furuseth <h.b.furuseth@usit.uio.no>
perl-5.32.0/hints/solaris_2.sh:63:set `echo " $libswanted " | sed -e 's@ ld @ @' -e 's@ malloc @ @' -e 's@ ucb @ @' -e 's@ sec @ @' -e 's@ crypt @ @'`
perl-5.32.0/hints/solaris_2.sh-64-libswanted="$*"
##############################################
perl-5.32.0/hints/solaris_2.sh-81-# Workshop compiler, given the command-line supplied in $tryworkshopcc.
perl-5.32.0/hints/solaris_2.sh:82:# Use thusly: loclibpth="`$getworkshoplibs` $loclibpth"
perl-5.32.0/hints/solaris_2.sh-83-#
##############################################
perl-5.32.0/hints/solaris_2.sh-121-
perl-5.32.0/hints/solaris_2.sh:122:case `type ${cc:-cc}` in
perl-5.32.0/hints/solaris_2.sh-123-*/usr/ucb/cc*) cat <<END >&4
##############################################
perl-5.32.0/hints/solaris_2.sh-187-if grep GNU make.vers > /dev/null 2>&1; then
perl-5.32.0/hints/solaris_2.sh:188: tmp=`type make | awk '{print $NF}' | sed 's/[()]//g'`
perl-5.32.0/hints/solaris_2.sh:189: case "`${ls:-'/usr/bin/ls'} -lL $tmp`" in
perl-5.32.0/hints/solaris_2.sh-190- ??????s*)
##############################################
perl-5.32.0/hints/solaris_2.sh-235- # Indent to avoid propagation to config.sh
perl-5.32.0/hints/solaris_2.sh:236: verbose=`${cc:-cc} $ccflags -v -o try try.c 2>&1`
perl-5.32.0/hints/solaris_2.sh-237-
##############################################
perl-5.32.0/hints/solaris_2.sh-263- # Recompute $verbose since we may have just changed $cc.
perl-5.32.0/hints/solaris_2.sh:264: verbose=`${cc:-cc} $ccflags -v -o try try.c 2>&1 | grep ld 2>&1`
perl-5.32.0/hints/solaris_2.sh-265-
##############################################
perl-5.32.0/hints/solaris_2.sh-286- # Recompute verbose with -Wl,-v to find GNU ld if present
perl-5.32.0/hints/solaris_2.sh:287: verbose=`${cc:-cc} $ccflags -Wl,-v -o try try.c 2>&1 | grep /ld 2>&1`
perl-5.32.0/hints/solaris_2.sh-288-
perl-5.32.0/hints/solaris_2.sh:289: myld=`echo $verbose | awk '/\/ld/ {print $1}'`
perl-5.32.0/hints/solaris_2.sh-290- # This assumes that gcc's output will not change, and that
##############################################
perl-5.32.0/hints/solaris_2.sh-340- if $tryworkshopcc >/dev/null 2>&1; then
perl-5.32.0/hints/solaris_2.sh:341: cc_name=`$run ./try`
perl-5.32.0/hints/solaris_2.sh-342- if test "$cc_name" = "workshop"; then
perl-5.32.0/hints/solaris_2.sh:343: ccversion="`${cc:-cc} -V 2>&1|sed -n -e '1s/^[Cc][Cc9]9*: //p'`"
perl-5.32.0/hints/solaris_2.sh-344- fi
perl-5.32.0/hints/solaris_2.sh-345- if test "$cc_name" = "workshop CC"; then
perl-5.32.0/hints/solaris_2.sh:346: ccversion="`${cc:-CC} -V 2>&1|sed -n -e '1s/^[Cc][C]: //p'`"
perl-5.32.0/hints/solaris_2.sh-347- fi
##############################################
perl-5.32.0/hints/solaris_2.sh-351- if test ! "$use64bitall_done"; then
perl-5.32.0/hints/solaris_2.sh:352: loclibpth="/usr/lib /usr/ccs/lib `$getworkshoplibs` $loclibpth"
perl-5.32.0/hints/solaris_2.sh-353- fi
##############################################
perl-5.32.0/hints/solaris_2.sh-421- # -lpthread overrides some lib C functions, so put it before c.
perl-5.32.0/hints/solaris_2.sh:422: set `echo X "$libswanted "| sed -e "s/ c / pthread c /"`
perl-5.32.0/hints/solaris_2.sh-423- shift
##############################################
perl-5.32.0/hints/solaris_2.sh-434- if test "$sched_yield" = "sched_yield"; then
perl-5.32.0/hints/solaris_2.sh:435: set `echo X "$libswanted "| sed -e "s/ pthread / rt pthread /"`
perl-5.32.0/hints/solaris_2.sh-436- shift
##############################################
perl-5.32.0/hints/solaris_2.sh-496-# Keep these in the left margin.
perl-5.32.0/hints/solaris_2.sh:497:ccflags_uselargefiles="`$run getconf LFS_CFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh:498:ldflags_uselargefiles="`$run getconf LFS_LDFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh:499:libswanted_uselargefiles="`$run getconf LFS_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g'`"
perl-5.32.0/hints/solaris_2.sh-500-
##############################################
perl-5.32.0/hints/solaris_2.sh-515-
perl-5.32.0/hints/solaris_2.sh:516:if test `$run uname -p` = i386; then
perl-5.32.0/hints/solaris_2.sh-517- case "$use64bitint" in
##############################################
perl-5.32.0/hints/solaris_2.sh-523-
perl-5.32.0/hints/solaris_2.sh:524:if test `$run uname -p` = sparc -o `$run uname -p` = i386; then
perl-5.32.0/hints/solaris_2.sh-525- cat > UU/use64bitint.cbu <<'EOCBU'
##############################################
perl-5.32.0/hints/solaris_2.sh-529-"$define"|true|[yY]*)
perl-5.32.0/hints/solaris_2.sh:530: case "`$run uname -r`" in
perl-5.32.0/hints/solaris_2.sh-531- 5.[0-4])
##############################################
perl-5.32.0/hints/solaris_2.sh-564-"$define-"|true-|[yY]*-)
perl-5.32.0/hints/solaris_2.sh:565: case "`$run uname -r`" in
perl-5.32.0/hints/solaris_2.sh-566- 5.[0-6])
##############################################
perl-5.32.0/hints/solaris_2.sh-573- esac
perl-5.32.0/hints/solaris_2.sh:574: processor=`$run uname -p`;
perl-5.32.0/hints/solaris_2.sh-575- if test "$processor" = sparc; then
##############################################
perl-5.32.0/hints/solaris_2.sh-589- echo 'int main() { return 0; }' > try.c
perl-5.32.0/hints/solaris_2.sh:590: case "`${cc:-cc} $ccflags -mcpu=v9 -m64 -S try.c 2>&1 | grep 'm64 is not supported by this configuration'`" in
perl-5.32.0/hints/solaris_2.sh-591- *"m64 is not supported"*)
##############################################
perl-5.32.0/hints/solaris_2.sh-612- # with gcc-3.x.x, please test with gcc -v. A.D. 20-Nov-2003
perl-5.32.0/hints/solaris_2.sh:613:# if test $processor = sparc -a X`$run getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null` != X; then
perl-5.32.0/hints/solaris_2.sh:614:# ccflags="$ccflags -Wa,`$run getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh-615-# fi
##############################################
perl-5.32.0/hints/solaris_2.sh-629- *)
perl-5.32.0/hints/solaris_2.sh:630: getconfccflags="`$run getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh:631: getconfldflags="`$run getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh:632: getconflddlflags="`$run getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
perl-5.32.0/hints/solaris_2.sh-633- echo "int main() { return(0); } " > try.c
perl-5.32.0/hints/solaris_2.sh:634: case "`${cc:-cc} $getconfccflags try.c 2>&1 | grep 'deprecated'`" in
perl-5.32.0/hints/solaris_2.sh-635- *" -xarch=generic64 is deprecated, use -m64 "*)
perl-5.32.0/hints/solaris_2.sh:636: getconfccflags=`echo $getconfccflags | sed -e 's/xarch=generic64/m64/'`
perl-5.32.0/hints/solaris_2.sh:637: getconfldflags=`echo $getconfldflags | sed -e 's/xarch=generic64/m64/'`
perl-5.32.0/hints/solaris_2.sh:638: getconflddlflags=`echo $getconflddlflags | sed -e 's/xarch=generic64/m64/'`
perl-5.32.0/hints/solaris_2.sh-639- ;;
##############################################
perl-5.32.0/hints/solaris_2.sh-649- fi
perl-5.32.0/hints/solaris_2.sh:650: loclibpth="`$getworkshoplibs` $loclibpth"
perl-5.32.0/hints/solaris_2.sh-651- ;;
##############################################
perl-5.32.0/hints/solaris_2.sh-705-if test "$d_unsetenv" = "$define" -a \
perl-5.32.0/hints/solaris_2.sh:706: `expr "$ccflags" : '.*-DPERL_USE_SAFE_PUTENV'` -eq 0; then
perl-5.32.0/hints/solaris_2.sh-707- ccflags="$ccflags -DPERL_USE_SAFE_PUTENV"
##############################################
perl-5.32.0/hints/irix_6_1.sh-21-# We don't want these libraries. Anyone know why?
perl-5.32.0/hints/irix_6_1.sh:22:set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ nsl / /' -e 's/ dl / /'`
perl-5.32.0/hints/irix_6_1.sh-23-shift
##############################################
perl-5.32.0/hints/irix_6_1.sh-40-# lddlflags="-shared"
perl-5.32.0/hints/irix_6_1.sh:41:# set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ sun / /' -e 's/ crypt / /' -e 's/ nsl / /' -e 's/ dl / /'`
perl-5.32.0/hints/irix_6_1.sh-42-# shift
##############################################
perl-5.32.0/hints/cxux.sh-57-#
perl-5.32.0/hints/cxux.sh:58:libswanted=`echo ' '$libswanted' ' | sed -e 's/ malloc / /'`
perl-5.32.0/hints/cxux.sh-59-
##############################################
perl-5.32.0/hints/unicos.sh-62-$define|true|[yY]*)
perl-5.32.0/hints/unicos.sh:63: set `echo X "$libswanted "| sed -e "s/ c / pthread c /"`
perl-5.32.0/hints/unicos.sh-64- shift
##############################################
perl-5.32.0/hints/gnu.sh-5-# XXX remove this once SUNRPC is implemented.
perl-5.32.0/hints/gnu.sh:6:set `echo X "$libswanted "| sed -e 's/ bsd / /' -e 's/ nsl / /' -e 's/ c / pthread /'`
perl-5.32.0/hints/gnu.sh-7-shift
##############################################
perl-5.32.0/hints/gnu.sh-50- if $test -e $p/$trylib; then
perl-5.32.0/hints/gnu.sh:51: libc=`ls -l $p/$trylib | awk '{print $NF}'`
perl-5.32.0/hints/gnu.sh-52- if $test "X$libc" != X; then
##############################################
perl-5.32.0/hints/gnu.sh-77- then
perl-5.32.0/hints/gnu.sh:78: set `echo X "$libswanted "| sed -e 's/ c / pthread c /'`
perl-5.32.0/hints/gnu.sh-79- shift
##############################################
perl-5.32.0/hints/netbsd.sh-157- fi
perl-5.32.0/hints/netbsd.sh:158: zzz=`ls $yyy/lib$xxx.so.* 2>/dev/null`
perl-5.32.0/hints/netbsd.sh-159- if test "X$zzz" != X; then
##############################################
perl-5.32.0/hints/netbsd.sh-221- echo 'int main() {}' > try.c
perl-5.32.0/hints/netbsd.sh:222: gcc=`${cc:-cc} -v -c try.c 2>&1|grep 'gcc version egcs-2'`
perl-5.32.0/hints/netbsd.sh-223- case "$gcc" in
##############################################
perl-5.32.0/hints/unicosmk.sh-40-$define|true|[yY]*)
perl-5.32.0/hints/unicosmk.sh:41: set `echo X "$libswanted "| sed -e "s/ c / pthread c /"`
perl-5.32.0/hints/unicosmk.sh-42- shift
##############################################
perl-5.32.0/hints/isc_2.sh-8-#
perl-5.32.0/hints/isc_2.sh:9:set `echo X "$libswanted "| sed -e 's/ c / /'`
perl-5.32.0/hints/isc_2.sh-10-shift
##############################################
perl-5.32.0/hints/midnightbsd.sh-5-esac
perl-5.32.0/hints/midnightbsd.sh:6:libswanted=`echo $libswanted | sed 's/ malloc / /'`
perl-5.32.0/hints/midnightbsd.sh-7-
##############################################
perl-5.32.0/hints/midnightbsd.sh-36- ldflags="-pthread $ldflags"
perl-5.32.0/hints/midnightbsd.sh:37: set `echo X "$libswanted "| sed -e 's/ c //'`
perl-5.32.0/hints/midnightbsd.sh-38- shift
##############################################
perl-5.32.0/hints/linux-android.sh-78-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:79:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-80-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-87-int main() {
perl-5.32.0/hints/linux-android.sh:88: struct netent* test = getnetbyaddr(127, AF_INET);
perl-5.32.0/hints/linux-android.sh-89- if (test == NULL) {
##############################################
perl-5.32.0/hints/linux-android.sh-95-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:96:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-97-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-107-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:108:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-109-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-124-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:125:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-126-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-141-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:142:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-143-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-152-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:153:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-154-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-169-$cc $ccflags try.c -o try
perl-5.32.0/hints/linux-android.sh:170:android_warn=`$run ./try 2>&1 | $egrep "$android_stub"`
perl-5.32.0/hints/linux-android.sh-171-if test "X$android_warn" != X; then
##############################################
perl-5.32.0/hints/linux-android.sh-246-
perl-5.32.0/hints/linux-android.sh:247:result_status=\`$cat output.status | $tr -d '\r'\`
perl-5.32.0/hints/linux-android.sh-248-
##############################################
perl-5.32.0/hints/linux-android.sh-316-
perl-5.32.0/hints/linux-android.sh:317:osvers="`$run getprop ro.build.version.release`"
perl-5.32.0/hints/linux-android.sh-318-
##############################################
perl-5.32.0/hints/ultrix_4.sh-49-*4.1*) ;;
perl-5.32.0/hints/ultrix_4.sh:50:*4.2*) libswanted=`echo $libswanted | sed 's/ malloc / /'` ;;
perl-5.32.0/hints/ultrix_4.sh-51-*4.3*) ;;
##############################################
perl-5.32.0/hints/openbsd.sh-61- lddlflags="-shared -fPIC $lddlflags"
perl-5.32.0/hints/openbsd.sh:62: libswanted=`echo $libswanted | sed 's/ dl / /'`
perl-5.32.0/hints/openbsd.sh-63- ;;
##############################################
perl-5.32.0/hints/openbsd.sh-67- # Without this, dlopen() is crippled.
perl-5.32.0/hints/openbsd.sh:68: ELF=`${cc:-cc} -dM -E - </dev/null | grep __ELF__`
perl-5.32.0/hints/openbsd.sh-69- test -n "$ELF" && ldflags="-Wl,-E $ldflags"
##############################################
perl-5.32.0/hints/openbsd.sh-84-# around for old NetBSD binaries.
perl-5.32.0/hints/openbsd.sh:85:libswanted=`echo $libswanted | sed 's/ crypt / /'`
perl-5.32.0/hints/openbsd.sh-86-
##############################################
perl-5.32.0/hints/openbsd.sh-114- # Change from -lc to -lc_r
perl-5.32.0/hints/openbsd.sh:115: set `echo "X $libswanted " | sed 's/ c / c_r /'`
perl-5.32.0/hints/openbsd.sh-116- shift
##############################################
perl-5.32.0/hints/openbsd.sh-147- useshrplib=true
perl-5.32.0/hints/openbsd.sh:148: libperl=`. ./shlib_version; echo libperl.so.${major}.${minor}`
perl-5.32.0/hints/openbsd.sh-149- fi
##############################################
perl-5.32.0/hints/svr5.sh-14- # Done too late in Configure if hinted
perl-5.32.0/hints/svr5.sh:15: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/svr5.sh-16- fi
##############################################
perl-5.32.0/hints/svr5.sh-65-else
perl-5.32.0/hints/svr5.sh:66: libswanted=`echo " $libswanted " | sed -e 's/ ucb / /'`
perl-5.32.0/hints/svr5.sh:67: glibpth=`echo " $glibpth " | sed -e 's/ \/usr\/ucblib / /'`
perl-5.32.0/hints/svr5.sh-68-
##############################################
perl-5.32.0/hints/svr5.sh-72- i_dbm='undef'
perl-5.32.0/hints/svr5.sh:73: libswanted=`echo " $libswanted " | sed -e 's/ dbm / /'`
perl-5.32.0/hints/svr5.sh-74- fi
##############################################
perl-5.32.0/hints/svr5.sh-78- i_gdbm='undef'
perl-5.32.0/hints/svr5.sh:79: libswanted=`echo " $libswanted " | sed -e 's/ gdbm / /'`
perl-5.32.0/hints/svr5.sh-80-fi
##############################################
perl-5.32.0/hints/svr5.sh-85-# libc: on UW7 don't want -lc explicitly as native cc gives warnings/errors
perl-5.32.0/hints/svr5.sh:86:libswanted=`echo " $libswanted " | sed -e 's/ malloc / /' -e 's/ c / /'`
perl-5.32.0/hints/svr5.sh-87-
##############################################
perl-5.32.0/hints/svr5.sh-89-# where runtime shared libc is
perl-5.32.0/hints/svr5.sh:90:glibpth=`echo " $glibpth " | sed -e 's/ \/shlib / /' -e 's/ \/lib / /'`
perl-5.32.0/hints/svr5.sh-91-
##############################################
perl-5.32.0/hints/svr5.sh-102- csh_cnt=`csh -f -c 'glob /*' 2>/dev/null | wc -c`
perl-5.32.0/hints/svr5.sh:103: csh_cnt=`expr 1 + $csh_cnt`
perl-5.32.0/hints/svr5.sh-104-if [ "$sh_cnt" -ne "$csh_cnt" ]; then
##############################################
perl-5.32.0/hints/minix.sh-94- fi
perl-5.32.0/hints/minix.sh:95: zzz=`ls $yyy/lib$xxx.so.* 2>/dev/null`
perl-5.32.0/hints/minix.sh-96- if test "X$zzz" != X; then
##############################################
perl-5.32.0/hints/dec_osf.sh-98-
perl-5.32.0/hints/dec_osf.sh:99:case "`$cc -v 2>&1 | grep cc`" in
perl-5.32.0/hints/dec_osf.sh-100-*gcc*) isgcc=gcc ;;
##############################################
perl-5.32.0/hints/dec_osf.sh-109- # Done too late in Configure if hinted
perl-5.32.0/hints/dec_osf.sh:110: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/dec_osf.sh-111- fi
##############################################
perl-5.32.0/hints/dec_osf.sh-150-EOF
perl-5.32.0/hints/dec_osf.sh:151: ccversion=`cc -V | awk '/(Compaq|DEC) C/ {print $3}' | grep '^V'`
perl-5.32.0/hints/dec_osf.sh-152- # the main point is the '-v' flag of 'cc'.
##############################################
perl-5.32.0/hints/dec_osf.sh-221- *-O*) # With both -O and -g, the -g must be -g3.
perl-5.32.0/hints/dec_osf.sh:222: optimize="`echo $optimize | sed 's/-g[1-4]*/-g3/'`"
perl-5.32.0/hints/dec_osf.sh-223- ;;
##############################################
perl-5.32.0/hints/dec_osf.sh-296-# dlopen() is in libc
perl-5.32.0/hints/dec_osf.sh:297:libswanted="`echo $libswanted | sed -e 's/ dl / /'`"
perl-5.32.0/hints/dec_osf.sh-298-
perl-5.32.0/hints/dec_osf.sh-299-# libPW contains nothing useful for perl
perl-5.32.0/hints/dec_osf.sh:300:libswanted="`echo $libswanted | sed -e 's/ PW / /'`"
perl-5.32.0/hints/dec_osf.sh-301-
perl-5.32.0/hints/dec_osf.sh-302-# libnet contains nothing useful for perl here, and doesn't work
perl-5.32.0/hints/dec_osf.sh:303:libswanted="`echo $libswanted | sed -e 's/ net / /'`"
perl-5.32.0/hints/dec_osf.sh-304-
perl-5.32.0/hints/dec_osf.sh-305-# libbsd contains nothing used by perl that is not already in libc
perl-5.32.0/hints/dec_osf.sh:306:libswanted="`echo $libswanted | sed -e 's/ bsd / /'`"
perl-5.32.0/hints/dec_osf.sh-307-
perl-5.32.0/hints/dec_osf.sh-308-# libc need not be separately listed
perl-5.32.0/hints/dec_osf.sh:309:libswanted="`echo $libswanted | sed -e 's/ c / /'`"
perl-5.32.0/hints/dec_osf.sh-310-
perl-5.32.0/hints/dec_osf.sh-311-# ndbm is already in libc
perl-5.32.0/hints/dec_osf.sh:312:libswanted="`echo $libswanted | sed -e 's/ ndbm / /'`"
perl-5.32.0/hints/dec_osf.sh-313-
##############################################
perl-5.32.0/hints/dec_osf.sh-540-*DEC_OSF1_3_X*SOCKADDR_LEN*)
perl-5.32.0/hints/dec_osf.sh:541: ccflags=`echo " $ccflags " | sed -e 's/ -D_SOCKADDR_LEN / /'`
perl-5.32.0/hints/dec_osf.sh-542- ;;
##############################################
perl-5.32.0/hints/svr4.sh-19-# Don't use problematic libraries:
perl-5.32.0/hints/svr4.sh:20:libswanted=`echo " $libswanted " | sed -e 's/ malloc / /'` # -e 's/ ucb / /'`
perl-5.32.0/hints/svr4.sh-21-# libmalloc.a - Probably using Perl's malloc() anyway.
##############################################
perl-5.32.0/hints/svr4.sh-61- csh_cnt=`csh -f -c 'glob /*' 2>/dev/null | wc -c`
perl-5.32.0/hints/svr4.sh:62: csh_cnt=`expr 1 + $csh_cnt`
perl-5.32.0/hints/svr4.sh-63-if [ "$sh_cnt" -ne "$csh_cnt" ]; then
##############################################
perl-5.32.0/hints/svr4.sh-149- # libcrypt contains nothing libc wouldn't have.
perl-5.32.0/hints/svr4.sh:150: libswanted=`echo " $libswanted " | sed -e 's/ crypt / /'`
perl-5.32.0/hints/svr4.sh-151- # With the NCR High Performance C Compiler R3.0c, miniperl fails
##############################################
perl-5.32.0/hints/bitrig.sh-35- lddlflags="-shared -fPIC $lddlflags"
perl-5.32.0/hints/bitrig.sh:36: libswanted=`echo $libswanted | sed 's/ dl / /'`
perl-5.32.0/hints/bitrig.sh-37- ;;
##############################################
perl-5.32.0/hints/bitrig.sh-41- # Without this, dlopen() is crippled.
perl-5.32.0/hints/bitrig.sh:42: ELF=`${cc:-cc} -dM -E - </dev/null | grep __ELF__`
perl-5.32.0/hints/bitrig.sh-43- test -n "$ELF" && ldflags="-Wl,-E $ldflags"
##############################################
perl-5.32.0/hints/bitrig.sh-55-# around for old NetBSD binaries.
perl-5.32.0/hints/bitrig.sh:56:libswanted=`echo $libswanted | sed 's/ crypt / /'`
perl-5.32.0/hints/bitrig.sh-57-
##############################################
perl-5.32.0/hints/bitrig.sh-99- useshrplib=true
perl-5.32.0/hints/bitrig.sh:100: libperl=`. $src/shlib_version; echo libperl.so.${major}.${minor}`
perl-5.32.0/hints/bitrig.sh-101- fi
##############################################
perl-5.32.0/hints/epix.sh-51-
perl-5.32.0/hints/epix.sh:52:libswanted=`echo " $libswanted " | sed -e 's/ malloc / /'` # -e 's/ ucb / /'`
perl-5.32.0/hints/epix.sh-53-# libmalloc.a - Probably using Perl's malloc() anyway.
##############################################
perl-5.32.0/hints/epix.sh-63-# We _do_ want the -L paths in ldflags, but we don't want the -non_shared.
perl-5.32.0/hints/epix.sh:64:lddlflags=`echo $lddlflags | sed 's/-non_shared//'`
perl-5.32.0/hints/epix.sh-65-
##############################################
perl-5.32.0/hints/freebsd.sh-88- esac
perl-5.32.0/hints/freebsd.sh:89: libswanted=`echo $libswanted | sed 's/ malloc / /'`
perl-5.32.0/hints/freebsd.sh:90: libswanted=`echo $libswanted | sed 's/ bind / /'`
perl-5.32.0/hints/freebsd.sh-91- # iconv gone in Perl 5.8.1, but if someone compiles 5.8.0 or earlier.
perl-5.32.0/hints/freebsd.sh:92: libswanted=`echo $libswanted | sed 's/ iconv / /'`
perl-5.32.0/hints/freebsd.sh-93- d_setregid='define'
##############################################
perl-5.32.0/hints/freebsd.sh-103- esac
perl-5.32.0/hints/freebsd.sh:104: libswanted=`echo $libswanted | sed 's/ malloc / /'`
perl-5.32.0/hints/freebsd.sh-105- ;;
##############################################
perl-5.32.0/hints/freebsd.sh-187- if $test -r $src/patchlevel.h;then
perl-5.32.0/hints/freebsd.sh:188: patchlevel=`awk '/define[ ]+PERL_VERSION/ {print $3}' $src/patchlevel.h`
perl-5.32.0/hints/freebsd.sh:189: subversion=`awk '/define[ ]+PERL_SUBVERSION/ {print $3}' $src/patchlevel.h`
perl-5.32.0/hints/freebsd.sh-190- else
##############################################
perl-5.32.0/hints/freebsd.sh-204-$define|true|[yY]*)
perl-5.32.0/hints/freebsd.sh:205: lc_r=`/sbin/ldconfig -r|grep ':-lc_r'|awk '{print $NF}'|sed -n '$p'`
perl-5.32.0/hints/freebsd.sh-206- case "$osvers" in
##############################################
perl-5.32.0/hints/freebsd.sh-273- [1-4]*)
perl-5.32.0/hints/freebsd.sh:274: set `echo X "$libswanted "| sed -e 's/ c / c_r /'`
perl-5.32.0/hints/freebsd.sh-275- shift
##############################################
perl-5.32.0/hints/freebsd.sh-278- *)
perl-5.32.0/hints/freebsd.sh:279: set `echo X "$libswanted "| sed -e 's/ c //'`
perl-5.32.0/hints/freebsd.sh-280- shift
##############################################
perl-5.32.0/hints/bsdos.sh-36-# we don't want to use -lnm, since exp() is busted (in 1.1 anyway)
perl-5.32.0/hints/bsdos.sh:37:set `echo X "$libswanted "| sed -e 's/ nm / /'`
perl-5.32.0/hints/bsdos.sh-38-shift
##############################################
perl-5.32.0/hints/cygwin.sh-17- plibpth=`gcc -print-file-name=libc.a`
perl-5.32.0/hints/cygwin.sh:18: plibpth=`dirname $plibpth`
perl-5.32.0/hints/cygwin.sh:19: plibpth=`cd $plibpth && pwd`
perl-5.32.0/hints/cygwin.sh-20-fi
##############################################
perl-5.32.0/hints/cygwin.sh-22-# - eliminate -lc, implied by gcc and a symlink to libcygwin.a
perl-5.32.0/hints/cygwin.sh:23:libswanted=`echo " $libswanted " | sed -e 's/ c / /g'`
perl-5.32.0/hints/cygwin.sh-24-# - eliminate -lm, symlink to libcygwin.a
perl-5.32.0/hints/cygwin.sh:25:libswanted=`echo " $libswanted " | sed -e 's/ m / /g'`
perl-5.32.0/hints/cygwin.sh-26-# - eliminate -lutil, symbols are all in libcygwin.a
perl-5.32.0/hints/cygwin.sh:27:libswanted=`echo " $libswanted " | sed -e 's/ util / /g'`
perl-5.32.0/hints/cygwin.sh-28-# - add libgdbm_compat $libswanted
##############################################
perl-5.32.0/hints/aix_4.sh-145- # Done too late in Configure if hinted
perl-5.32.0/hints/aix_4.sh:146: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/aix_4.sh-147- fi
##############################################
perl-5.32.0/hints/aix_4.sh-149-
perl-5.32.0/hints/aix_4.sh:150: *) ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -v '\.msg\.[A-Za-z_]*\.' | head -1 | awk '{print $1,$2}'`
perl-5.32.0/hints/aix_4.sh-151- case "$ccversion" in
perl-5.32.0/hints/aix_4.sh:152: '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$'`
perl-5.32.0/hints/aix_4.sh-153- ;;
##############################################
perl-5.32.0/hints/aix_4.sh-155- *.*.*.*.*.*.*) # Ahhrgg, more than one C compiler installed
perl-5.32.0/hints/aix_4.sh:156: first_cc_path=`which ${cc:-cc}`
perl-5.32.0/hints/aix_4.sh-157- case "$first_cc_path" in
##############################################
perl-5.32.0/hints/aix_4.sh-169- esac
perl-5.32.0/hints/aix_4.sh:170: ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -i $cc_type | head -1`
perl-5.32.0/hints/aix_4.sh-171- ;;
##############################################
perl-5.32.0/hints/aix_4.sh-176- esac
perl-5.32.0/hints/aix_4.sh:177: ccversion=`echo "$ccversion" | awk '{print $2}'`
perl-5.32.0/hints/aix_4.sh-178-
##############################################
perl-5.32.0/hints/aix_4.sh-251- libswanted="c128 $libswanted"
perl-5.32.0/hints/aix_4.sh:252: lddlflags=`echo "$lddlflags " | sed -e 's/ -lc / -lc128 -lc /'`
perl-5.32.0/hints/aix_4.sh-253- ;;
##############################################
perl-5.32.0/hints/aix_4.sh-293- 3.1.4.*|5.0.2.*) # libswanted "bind ... c ..." => "... c bind ..."
perl-5.32.0/hints/aix_4.sh:294: set `echo X "$libswanted "| sed -e 's/ bind\( .*\) \([cC]\) / \1 \2 bind /'`
perl-5.32.0/hints/aix_4.sh-295- shift
##############################################
perl-5.32.0/hints/aix_4.sh-348- # c_rify libswanted.
perl-5.32.0/hints/aix_4.sh:349: set `echo X "$libswanted "| sed -e 's/ \([cC]\) / \1_r /g'`
perl-5.32.0/hints/aix_4.sh-350- shift
##############################################
perl-5.32.0/hints/aix_4.sh-352- # c_rify lddlflags.
perl-5.32.0/hints/aix_4.sh:353: set `echo X "$lddlflags "| sed -e 's/ \(-l[cC]\) / \1_r /g'`
perl-5.32.0/hints/aix_4.sh-354- shift
##############################################
perl-5.32.0/hints/aix_4.sh-357- # Insert pthreads to libswanted, before any libc or libC.
perl-5.32.0/hints/aix_4.sh:358: set `echo X "$libswanted "| sed -e 's/ \([cC]_r\) / pthreads \1 /'`
perl-5.32.0/hints/aix_4.sh-359- shift
##############################################
perl-5.32.0/hints/aix_4.sh-361- # Insert pthreads to lddlflags, before any libc or libC.
perl-5.32.0/hints/aix_4.sh:362: set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]_r\) / -lpthreads \1 /'`
perl-5.32.0/hints/aix_4.sh-363- shift
##############################################
perl-5.32.0/hints/aix_4.sh-395- # the whatever it was that AIX managed to break. --jhi
perl-5.32.0/hints/aix_4.sh:396: ldflags_uselargefiles="`echo $ldflags_uselargefiles`"
perl-5.32.0/hints/aix_4.sh-397- if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
##############################################
perl-5.32.0/hints/aix_4.sh-415- *) # Remove xlc-specific -qflags.
perl-5.32.0/hints/aix_4.sh:416: ccflags="`echo $ccflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix_4.sh:417: ldflags="`echo $ldflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix_4.sh-418- # Move xlc-specific -bflags.
perl-5.32.0/hints/aix_4.sh:419: ccflags="`echo $ccflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_4.sh:420: ldflags="`echo ' '$ldflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_4.sh:421: lddlflags="`echo ' '$lddlflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_4.sh:422: lddlflags="`echo ' '$lddlflags | sed -e 's@ -G @ -Wl,-G @g'`"
perl-5.32.0/hints/aix_4.sh-423- ld='gcc'
##############################################
perl-5.32.0/hints/aix_4.sh-508- # do any harm, I didn't pursue it. -- sh
perl-5.32.0/hints/aix_4.sh:509: qaldflags="`echo $qaldflags`"
perl-5.32.0/hints/aix_4.sh-510- qalibs="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g'`"
##############################################
perl-5.32.0/hints/aix_4.sh-512- # Remove them.
perl-5.32.0/hints/aix_4.sh:513: ccflags="`echo $ccflags | sed -e 's@-q32@@'`"
perl-5.32.0/hints/aix_4.sh:514: ldflags="`echo $ldflags | sed -e 's@-b32@@'`"
perl-5.32.0/hints/aix_4.sh-515- # Tell archiver to use large format. Unless we remove 'ar'
##############################################
perl-5.32.0/hints/aix_4.sh-518- # to figure out.
perl-5.32.0/hints/aix_4.sh:519: trylist="`echo $trylist | sed -e 's@^ar @@' -e 's@ ar @ @g' -e 's@ ar$@@'`"
perl-5.32.0/hints/aix_4.sh-520- ar="ar -X64"
##############################################
perl-5.32.0/hints/aix_4.sh-563- # usethreads.cbu, if needed.
perl-5.32.0/hints/aix_4.sh:564: if test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then
perl-5.32.0/hints/aix_4.sh-565- # Cify libswanted.
perl-5.32.0/hints/aix_4.sh:566: set `echo X "$libswanted "| sed -e 's/ c / C c /'`
perl-5.32.0/hints/aix_4.sh-567- shift
##############################################
perl-5.32.0/hints/aix_4.sh-569- # Cify lddlflags.
perl-5.32.0/hints/aix_4.sh:570: set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'`
perl-5.32.0/hints/aix_4.sh-571- shift
##############################################
perl-5.32.0/hints/aix_4.sh-593-EOF
perl-5.32.0/hints/aix_4.sh:594: set `echo " $libswanted " | sed -e 's@ bind @ @' -e 's@ nsl @ @' -e 's@ util @ @'`
perl-5.32.0/hints/aix_4.sh-595- shift
##############################################
perl-5.32.0/hints/irix_5.sh-31-# contribute an explanation?
perl-5.32.0/hints/irix_5.sh:32:set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ nsl / /' -e 's/ dl / /'`
perl-5.32.0/hints/irix_5.sh-33-shift
##############################################
perl-5.32.0/hints/dynix.sh-2-d_castneg=undef
perl-5.32.0/hints/dynix.sh:3:libswanted=`echo $libswanted | sed -e 's/socket /socket seq /'`
perl-5.32.0/hints/dynix.sh-4-
##############################################
perl-5.32.0/hints/aix_3.sh-93- # Done too late in Configure if hinted
perl-5.32.0/hints/aix_3.sh:94: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/aix_3.sh-95- fi
##############################################
perl-5.32.0/hints/aix_3.sh-97-
perl-5.32.0/hints/aix_3.sh:98: *) ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -v '\.msg\.[A-Za-z_]*\.' | head -1 | awk '{print $1,$2}'`
perl-5.32.0/hints/aix_3.sh-99- case "$ccversion" in
perl-5.32.0/hints/aix_3.sh:100: '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$'`
perl-5.32.0/hints/aix_3.sh-101- ;;
##############################################
perl-5.32.0/hints/aix_3.sh-103- *.*.*.*.*.*.*) # Ahhrgg, more than one C compiler installed
perl-5.32.0/hints/aix_3.sh:104: first_cc_path=`which ${cc:-cc}`
perl-5.32.0/hints/aix_3.sh-105- case "$first_cc_path" in
##############################################
perl-5.32.0/hints/aix_3.sh-118- esac
perl-5.32.0/hints/aix_3.sh:119: ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -i $cc_type | head -1`
perl-5.32.0/hints/aix_3.sh-120- ;;
##############################################
perl-5.32.0/hints/aix_3.sh-125-
perl-5.32.0/hints/aix_3.sh:126: ccversion=`echo "$ccversion" | awk '{print $2}'`
perl-5.32.0/hints/aix_3.sh-127- case "$ccversion" in
##############################################
perl-5.32.0/hints/aix_3.sh-181- libswanted="c128 $libswanted"
perl-5.32.0/hints/aix_3.sh:182: lddlflags=`echo "$lddlflags " | sed -e 's/ -lc / -lc128 -lc /'`
perl-5.32.0/hints/aix_3.sh-183- ;;
##############################################
perl-5.32.0/hints/aix_3.sh-258- # c_rify libswanted.
perl-5.32.0/hints/aix_3.sh:259: set `echo X "$libswanted "| sed -e 's/ \([cC]\) / \1_r /g'`
perl-5.32.0/hints/aix_3.sh-260- shift
##############################################
perl-5.32.0/hints/aix_3.sh-262- # c_rify lddlflags.
perl-5.32.0/hints/aix_3.sh:263: set `echo X "$lddlflags "| sed -e 's/ \(-l[cC]\) / \1_r /g'`
perl-5.32.0/hints/aix_3.sh-264- shift
##############################################
perl-5.32.0/hints/aix_3.sh-267- # Insert pthreads to libswanted, before any libc or libC.
perl-5.32.0/hints/aix_3.sh:268: set `echo X "$libswanted "| sed -e 's/ \([cC]_r\) / pthreads \1 /'`
perl-5.32.0/hints/aix_3.sh-269- shift
##############################################
perl-5.32.0/hints/aix_3.sh-271- # Insert pthreads to lddlflags, before any libc or libC.
perl-5.32.0/hints/aix_3.sh:272: set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]_r\) / -lpthreads \1 /'`
perl-5.32.0/hints/aix_3.sh-273- shift
##############################################
perl-5.32.0/hints/aix_3.sh-311- *) # Remove xlc-specific -qflags.
perl-5.32.0/hints/aix_3.sh:312: ccflags="`echo $ccflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix_3.sh:313: ldflags="`echo $ldflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix_3.sh-314- # Move xlc-specific -bflags.
perl-5.32.0/hints/aix_3.sh:315: ccflags="`echo $ccflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_3.sh:316: ldflags="`echo ' '$ldflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_3.sh:317: lddlflags="`echo ' '$lddlflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix_3.sh-318- ld='gcc'
##############################################
perl-5.32.0/hints/aix_3.sh-340- # usethreads.cbu, if needed.
perl-5.32.0/hints/aix_3.sh:341: if test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then
perl-5.32.0/hints/aix_3.sh-342- # Cify libswanted.
perl-5.32.0/hints/aix_3.sh:343: set `echo X "$libswanted "| sed -e 's/ c / C c /'`
perl-5.32.0/hints/aix_3.sh-344- shift
##############################################
perl-5.32.0/hints/aix_3.sh-346- # Cify lddlflags.
perl-5.32.0/hints/aix_3.sh:347: set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'`
perl-5.32.0/hints/aix_3.sh-348- shift
##############################################
perl-5.32.0/hints/sco.sh-177-# it can't find libdl.a ! Bug or feature ? :-)
perl-5.32.0/hints/sco.sh:178:libswanted=`echo " $libswanted " | sed -e 's/ dl / /'`
perl-5.32.0/hints/sco.sh-179-set X $libswanted
##############################################
perl-5.32.0/hints/sco.sh-184-# Remove libbind because it conflicts with libsocket.
perl-5.32.0/hints/sco.sh:185:libswanted=`echo " $libswanted " | sed -e 's/ bind / /'`
perl-5.32.0/hints/sco.sh-186-set X $libswanted
##############################################
perl-5.32.0/hints/sco.sh-196-if test -f /usr/lib/libdbm.nfs.a ; then
perl-5.32.0/hints/sco.sh:197: libswanted=`echo "dbm.nfs $libswanted " | sed -e 's/ dbm / /'`
perl-5.32.0/hints/sco.sh-198- set X $libswanted
##############################################
perl-5.32.0/hints/sco.sh-220-# We don't want Xenix cross-development libraries
perl-5.32.0/hints/sco.sh:221:glibpth=`echo $glibpth | sed -e 's! /usr/lib/386 ! !' -e 's! /lib/386 ! !'`
perl-5.32.0/hints/sco.sh-222-xlibpth=''
##############################################
perl-5.32.0/hints/sco_2_3_2.sh-1-yacc='/usr/bin/yacc -Sm25000'
perl-5.32.0/hints/sco_2_3_2.sh:2:libswanted=`echo " $libswanted "| sed 's/ x / /'`
##############################################
perl-5.32.0/hints/catamount.sh-3-# cross-compilation host is a SuSE x86_64-linux,
perl-5.32.0/hints/catamount.sh:4:# execution at the target with the 'yod' utility,
perl-5.32.0/hints/catamount.sh-5-# linux.sh will run this hints file when necessary.
##############################################
perl-5.32.0/hints/catamount.sh-114-yod -sz 1 "$@" 2> .yod$$e > .yod$$o
perl-5.32.0/hints/catamount.sh:115:status=`awk '/^cata: exe .* pid [0-9][0-9]* (main|exit|_exit) [0-9][0-9]*$/ {print $NF}' .yod$$o|tail -1`
perl-5.32.0/hints/catamount.sh-116-grep -v "sz is 1" .yod$$e
##############################################
perl-5.32.0/hints/catamount.sh-247-egrep -v 'catamount target|'$$'\.c:$' .cc$$e 1>&2
perl-5.32.0/hints/catamount.sh:248:case "`grep "is not implemented" .cc$$e`" in
perl-5.32.0/hints/catamount.sh-249-*"will always fail"*) status=1 ;;
##############################################
perl-5.32.0/hints/catamount.sh-256-esac
perl-5.32.0/hints/catamount.sh:257:objt=`echo $srct|sed -e 's/\.c$/.o/'`
perl-5.32.0/hints/catamount.sh:258:objo=`echo $srco|sed -e 's/\.c$/.o/'`
perl-5.32.0/hints/catamount.sh-259-if test -n "$objt" -a -f "$objt"
##############################################
perl-5.32.0/hints/darwin.sh-10-# Configure hasn't figured out the version number yet. Bummer.
perl-5.32.0/hints/darwin.sh:11:perl_revision=`awk '/define[ ]+PERL_REVISION/ {print $3}' $src/patchlevel.h`
perl-5.32.0/hints/darwin.sh:12:perl_version=`awk '/define[ ]+PERL_VERSION/ {print $3}' $src/patchlevel.h`
perl-5.32.0/hints/darwin.sh:13:perl_subversion=`awk '/define[ ]+PERL_SUBVERSION/ {print $3}' $src/patchlevel.h`
perl-5.32.0/hints/darwin.sh-14-version="${perl_revision}.${perl_version}.${perl_subversion}"
##############################################
perl-5.32.0/hints/darwin.sh-87-if [ -z "${optimize}" ]; then
perl-5.32.0/hints/darwin.sh:88: case "`${cc:-gcc} -v 2>&1`" in
perl-5.32.0/hints/darwin.sh-89- *"gcc version 3."*) optimize='-Os' ;;
##############################################
perl-5.32.0/hints/darwin.sh-131-# Avoid Apple's cpp precompiler, better for extensions
perl-5.32.0/hints/darwin.sh:132:if [ "X`echo | ${cc} -no-cpp-precomp -E - 2>&1 >/dev/null`" = "X" ]; then
perl-5.32.0/hints/darwin.sh-133- cppflags="${cppflags} -no-cpp-precomp"
##############################################
perl-5.32.0/hints/darwin.sh-327- # "ProductVersion: 10.11" "10.11"
perl-5.32.0/hints/darwin.sh:328: prodvers=`sw_vers|awk '/^ProductVersion:/{print $2}'|awk -F. '{print $1"."$2}'`
perl-5.32.0/hints/darwin.sh-329- case "$prodvers" in
##############################################
perl-5.32.0/hints/darwin.sh-517-if test "$d_unsetenv" = "$define" -a \
perl-5.32.0/hints/darwin.sh:518: `expr "$ccflags" : '.*-DPERL_USE_SAFE_PUTENV'` -eq 0; then
perl-5.32.0/hints/darwin.sh-519- ccflags="$ccflags -DPERL_USE_SAFE_PUTENV"
##############################################
perl-5.32.0/hints/aix.sh-116- # Done too late in Configure if hinted
perl-5.32.0/hints/aix.sh:117: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/aix.sh-118- fi
##############################################
perl-5.32.0/hints/aix.sh-120-
perl-5.32.0/hints/aix.sh:121: *) ccversion=`lslpp -ql -Ou vac.C | grep -v '^Path' | head -1 | awk '{print $1,$2}'`
perl-5.32.0/hints/aix.sh-122- case "$ccversion" in
perl-5.32.0/hints/aix.sh:123: '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$'` ;;
perl-5.32.0/hints/aix.sh-124-
perl-5.32.0/hints/aix.sh-125- *.*.*.*.*.*.*) # Ahhrgg, more than one C compiler installed
perl-5.32.0/hints/aix.sh:126: first_cc_path=`which ${cc:-cc}`
perl-5.32.0/hints/aix.sh-127- case "$first_cc_path" in
##############################################
perl-5.32.0/hints/aix.sh-140- esac
perl-5.32.0/hints/aix.sh:141: ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -i $cc_type | head -1`
perl-5.32.0/hints/aix.sh-142- ;;
##############################################
perl-5.32.0/hints/aix.sh-148-
perl-5.32.0/hints/aix.sh:149: ccversion=`echo "$ccversion" | awk '{print $2}'`
perl-5.32.0/hints/aix.sh-150- # Redbooks state AIX-5 only supports vac-5.0.2.0 and up
##############################################
perl-5.32.0/hints/aix.sh-184- libswanted="c128 $libswanted"
perl-5.32.0/hints/aix.sh:185: lddlflags=`echo "$lddlflags " | sed -e 's/ -lc / -lc128 -lc /'`
perl-5.32.0/hints/aix.sh-186- ;;
##############################################
perl-5.32.0/hints/aix.sh-258- # Insert pthreads to libswanted, before any libc or libC.
perl-5.32.0/hints/aix.sh:259: set `echo X "$libswanted "| sed -e 's/ \([cC]\) / pthreads \1 /'`
perl-5.32.0/hints/aix.sh-260- shift
##############################################
perl-5.32.0/hints/aix.sh-262- # Insert pthreads to lddlflags, before any libc or libC.
perl-5.32.0/hints/aix.sh:263: set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]\) / -lpthreads \1 /'`
perl-5.32.0/hints/aix.sh-264- shift
##############################################
perl-5.32.0/hints/aix.sh-343- # but that's no longer needed with an explicit -qextc99.
perl-5.32.0/hints/aix.sh:344: ccflags="`echo $ccflags | sed -e 's@ -qlonglong@@'`"
perl-5.32.0/hints/aix.sh-345- ;;
perl-5.32.0/hints/aix.sh-346- *) # Remove xlc-specific -qflags.
perl-5.32.0/hints/aix.sh:347: ccflags="`echo $ccflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix.sh:348: ldflags="`echo $ldflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
perl-5.32.0/hints/aix.sh-349- # Move xlc-specific -bflags.
perl-5.32.0/hints/aix.sh:350: ccflags="`echo $ccflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix.sh:351: ldflags="`echo ' '$ldflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix.sh:352: lddlflags="`echo ' '$lddlflags | sed -e 's@ -b@ -Wl,-b@g'`"
perl-5.32.0/hints/aix.sh:353: lddlflags="`echo ' '$lddlflags | sed -e 's@ -G @ -Wl,-G @g'`"
perl-5.32.0/hints/aix.sh-354-
##############################################
perl-5.32.0/hints/aix.sh-424- # do any harm, I didn't pursue it. -- sh
perl-5.32.0/hints/aix.sh:425: qaldflags="`echo $qaldflags`"
perl-5.32.0/hints/aix.sh-426- qalibs="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g'`"
##############################################
perl-5.32.0/hints/aix.sh-428- # Remove them.
perl-5.32.0/hints/aix.sh:429: ccflags="`echo $ccflags | sed -e 's@-q32@@'`"
perl-5.32.0/hints/aix.sh:430: ldflags="`echo $ldflags | sed -e 's@-b32@@'`"
perl-5.32.0/hints/aix.sh-431- case "$cc" in
perl-5.32.0/hints/aix.sh-432- *gcc*|*g++*)
perl-5.32.0/hints/aix.sh:433: ccflags="`echo $ccflags | sed -e 's@-q64@-maix64@'`"
perl-5.32.0/hints/aix.sh:434: ccflags_uselargefiles="`echo $ccflags_uselargefiles | sed -e 's@-q64@-maix64@'`"
perl-5.32.0/hints/aix.sh:435: qacflags="`echo $qacflags | sed -e 's@-q64@-maix64@'`"
perl-5.32.0/hints/aix.sh-436- ;;
##############################################
perl-5.32.0/hints/aix.sh-441- # to figure out.
perl-5.32.0/hints/aix.sh:442: trylist="`echo $trylist | sed -e 's@^ar @@' -e 's@ ar @ @g' -e 's@ ar$@@'`"
perl-5.32.0/hints/aix.sh-443- ar="ar -X64"
##############################################
perl-5.32.0/hints/aix.sh-479- esac
perl-5.32.0/hints/aix.sh:480:elif test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then
perl-5.32.0/hints/aix.sh-481- # If the C++ libraries, libC and libC_r, are available we will
##############################################
perl-5.32.0/hints/aix.sh-488- # Cify libswanted.
perl-5.32.0/hints/aix.sh:489: set `echo X "$libswanted "| sed -e 's/ c / C c /'`
perl-5.32.0/hints/aix.sh-490- shift
##############################################
perl-5.32.0/hints/aix.sh-492- # Cify lddlflags.
perl-5.32.0/hints/aix.sh:493: set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'`
perl-5.32.0/hints/aix.sh-494- shift
##############################################
perl-5.32.0/hints/aix.sh-514-EOF
perl-5.32.0/hints/aix.sh:515: set `echo " $libswanted " | sed -e 's@ bind @ @' -e 's@ nsl @ @' -e 's@ util @ @'`
perl-5.32.0/hints/aix.sh-516- shift
##############################################
perl-5.32.0/hints/aix.sh-531-# remove libbsd.a from wanted libraries
perl-5.32.0/hints/aix.sh:532:libswanted=`echo " $libswanted " | sed -e 's/ bsd / /'`
perl-5.32.0/hints/aix.sh:533:libswanted=`echo " $libswanted " | sed -e 's/ BSD / /'`
perl-5.32.0/hints/aix.sh-534-d_flock='undef'
##############################################
perl-5.32.0/hints/aix.sh-541- echo "GDBM support disabled because your GDBM package contains extraneous headers - see README.aix."
perl-5.32.0/hints/aix.sh:542: libswanted=`echo " $libswanted " | sed -e 's/ gdbm / /'`
perl-5.32.0/hints/aix.sh-543- i_gdbm='undef'
##############################################
perl-5.32.0/hints/aix.sh-598- $cc -qlongdouble -o inf$$ inf$$.c -lm
perl-5.32.0/hints/aix.sh:599: case `./inf$$` in
perl-5.32.0/hints/aix.sh-600- INF) echo "Your infinity is working correctly with long doubles." >&4 ;;
##############################################
perl-5.32.0/hints/aix.sh-610- uselongdouble="$undef"
perl-5.32.0/hints/aix.sh:611: ccflags=`echo " $ccflags " | sed -e 's/ -qlongdouble / /'`
perl-5.32.0/hints/aix.sh:612: libswanted=`echo " $libswanted " | sed -e 's/ c128/ /'`
perl-5.32.0/hints/aix.sh:613: lddlflags=`echo " $lddlflags " | sed -e 's/ -lc128 / /'`
perl-5.32.0/hints/aix.sh-614- ;;
##############################################
perl-5.32.0/hints/aix.sh-640- esac
perl-5.32.0/hints/aix.sh:641: case `./powl$$` in
perl-5.32.0/hints/aix.sh-642- 9) echo "Your powl() is working correctly." >&4 ;;
##############################################
perl-5.32.0/hints/aix.sh-666- $cc -qlongdouble -o fmodl$$ fmodl$$.c -lm
perl-5.32.0/hints/aix.sh:667: case `./fmodl$$` in
perl-5.32.0/hints/aix.sh-668- 2147483648) echo "Your fmodl() is working correctly." >&4 ;;
##############################################
perl-5.32.0/hints/aix.sh-670- $cc -q64 -qlongdouble -o fmodl$$ fmodl$$.c -lm
perl-5.32.0/hints/aix.sh:671: case `./fmodl$$` in
perl-5.32.0/hints/aix.sh-672- 2147483648)
perl-5.32.0/hints/aix.sh-673- echo "The -q64 did the trick, will use it." >& 4
perl-5.32.0/hints/aix.sh:674: ccflags="`echo $ccflags | sed -e 's@-q32@@g'`"
perl-5.32.0/hints/aix.sh:675: ldflags="`echo $ldflags | sed -e 's@-q32@@g'`"
perl-5.32.0/hints/aix.sh-676- ccflags="$ccflags -q64"
##############################################
perl-5.32.0/hints/aix.sh-681- uselongdouble="$undef"
perl-5.32.0/hints/aix.sh:682: ccflags=`echo " $ccflags " | sed -e 's/ -qlongdouble / /'`
perl-5.32.0/hints/aix.sh:683: libswanted=`echo " $libswanted " | sed -e 's/ c128/ /'`
perl-5.32.0/hints/aix.sh:684: lddlflags=`echo " $lddlflags " | sed -e 's/ -lc128 / /'`
perl-5.32.0/hints/aix.sh-685- ;;
##############################################
perl-5.32.0/hints/isc.sh-17-
perl-5.32.0/hints/isc.sh:18:set `echo X "$libswanted "| sed -e 's/ c / /' -e 's/ x / /'`
perl-5.32.0/hints/isc.sh-19-shift
##############################################
perl-5.32.0/hints/linux.sh-41-then
perl-5.32.0/hints/linux.sh:42: case "`${cc:-cc} -V 2>&1`" in
perl-5.32.0/hints/linux.sh-43- *catamount*) . hints/catamount.sh; return ;;
##############################################
perl-5.32.0/hints/linux.sh-55-# bind causes issues with several reentrant functions
perl-5.32.0/hints/linux.sh:56:set `echo X "$libswanted "| sed -e 's/ bsd / /' -e 's/ net / /' -e 's/ bind / /'`
perl-5.32.0/hints/linux.sh-57-shift
##############################################
perl-5.32.0/hints/linux.sh-82-
perl-5.32.0/hints/linux.sh:83:uname_minus_m="`$run uname -m 2>/dev/null`"
perl-5.32.0/hints/linux.sh-84-uname_minus_m="${uname_minus_m:-"$targetarch"}"
##############################################
perl-5.32.0/hints/linux.sh-86-# Check if we're about to use Intel's ICC compiler
perl-5.32.0/hints/linux.sh:87:case "`${cc:-cc} -V 2>&1`" in
perl-5.32.0/hints/linux.sh-88-*"Intel(R) C++ Compiler"*|*"Intel(R) C Compiler"*)
##############################################
perl-5.32.0/hints/linux.sh-92- # followed by a copyright on the second line
perl-5.32.0/hints/linux.sh:93: ccversion=`${cc:-cc} --version | sed -n -e 's/^icp\?c \((ICC) \)\?//p'`
perl-5.32.0/hints/linux.sh-94- # This is needed for Configure's prototype checks to work correctly
##############################################
perl-5.32.0/hints/linux.sh-142- # RT #37156 for a discussion of the problem.
perl-5.32.0/hints/linux.sh:143: case "`${cc:-gcc} -v 2>&1`" in
perl-5.32.0/hints/linux.sh-144- *"version 3.2"*|*"version 3.3"*|*"version 3.4"*)
##############################################
perl-5.32.0/hints/linux.sh-201-"$define")
perl-5.32.0/hints/linux.sh:202: for d in `LANG=C LC_ALL=C $gcc $ccflags $ldflags -print-search-dirs | grep libraries | cut -f2- -d= | tr ':' $trnl | grep 'gcc' | sed -e 's:/$::'`
perl-5.32.0/hints/linux.sh-203- do
perl-5.32.0/hints/linux.sh:204: case `ls $d/*libquadmath*$so* 2>/dev/null` in
perl-5.32.0/hints/linux.sh-205- $d/*libquadmath*$so*) xlibpth="$xlibpth $d" ;;
##############################################
perl-5.32.0/hints/linux.sh-223- if $test -e $p/$trylib; then
perl-5.32.0/hints/linux.sh:224: libc=`ls -l $p/$trylib | awk '{print $NF}'`
perl-5.32.0/hints/linux.sh-225- if $test "X$libc" != X; then
##############################################
perl-5.32.0/hints/linux.sh-273-else
perl-5.32.0/hints/linux.sh:274: if xxx=`./UU/loc tcsh blurfl $pth`; $test -f "$xxx"; then
perl-5.32.0/hints/linux.sh-275- echo "Found tcsh. I'll use it for globbing."
##############################################
perl-5.32.0/hints/linux.sh-306- case "$cccdlflags" in
perl-5.32.0/hints/linux.sh:307: *-fpic*) cccdlflags="`echo $cccdlflags|sed 's/-fpic/-fPIC/'`" ;;
perl-5.32.0/hints/linux.sh-308- *-fPIC*) ;;
##############################################
perl-5.32.0/hints/linux.sh-333- echo 'Your shared -lndbm is not a real library.'
perl-5.32.0/hints/linux.sh:334: set `echo X "$libswanted "| sed -e 's/ ndbm / /'`
perl-5.32.0/hints/linux.sh-335- shift
##############################################
perl-5.32.0/hints/linux.sh-376- then
perl-5.32.0/hints/linux.sh:377: set `echo X "$libswanted "| sed -e 's/ c / pthread c /'`
perl-5.32.0/hints/linux.sh-378- shift
##############################################
perl-5.32.0/hints/linux.sh-414-$define|true|[yY]*)
perl-5.32.0/hints/linux.sh:415: set `echo X "$libswanted "| sed -e 's/ c / /'`
perl-5.32.0/hints/linux.sh-416- shift
##############################################
perl-5.32.0/hints/qnx.sh-108-#----------------------------------------------------------------
perl-5.32.0/hints/qnx.sh:109:set X `$run uname -a`
perl-5.32.0/hints/qnx.sh-110-shift
##############################################
perl-5.32.0/hints/qnx.sh-270- # This will change those to plain x86 and armle-v7, respectively.
perl-5.32.0/hints/qnx.sh:271: case "`$run uname -m`" in
perl-5.32.0/hints/qnx.sh-272- *x86*) targetarch=x86;;
##############################################
perl-5.32.0/hints/qnx.sh-301-
perl-5.32.0/hints/qnx.sh:302: libswanted=`echo " $libswanted "| sed 's/ malloc / /'`
perl-5.32.0/hints/qnx.sh-303-
##############################################
perl-5.32.0/hints/hpux.sh-8- xxOsRevMinor=`uname -r | sed -e 's/^[^0-9]*//' | cut -d. -f2`;
perl-5.32.0/hints/hpux.sh:9: xxOsRev=`expr 100 \* $xxOsRevMajor + $xxOsRevMinor`
perl-5.32.0/hints/hpux.sh-10-if [ "$xxOsRevMajor" -ge 10 ]; then
##############################################
perl-5.32.0/hints/hpux.sh-21- xxcpu=`getconf CPU_VERSION`; # Get the number.
perl-5.32.0/hints/hpux.sh:22: xxcpu=`printf '0x%x' $xxcpu`; # convert to hex
perl-5.32.0/hints/hpux.sh-23- archname=`sed -n -e "s/^#[[:space:]]*define[[:space:]]*CPU_//p" /usr/include/sys/unistd.h |
##############################################
perl-5.32.0/hints/hpux.sh-56-# The libraries crypt, malloc, ndir, and net are empty.
perl-5.32.0/hints/hpux.sh:57:set `echo "X $libswanted " | sed -e 's/ ld / /' -e 's/ dbm / /' -e 's/ BSD / /' -e 's/ PW / /'`
perl-5.32.0/hints/hpux.sh-58-shift
##############################################
perl-5.32.0/hints/hpux.sh-64-
perl-5.32.0/hints/hpux.sh:65:set `echo "X $ccflags " | sed -e 's/ -A[ea] / /' -e 's/ -D_HPUX_SOURCE / /'`
perl-5.32.0/hints/hpux.sh-66-shift
##############################################
perl-5.32.0/hints/hpux.sh-75- gnu_ld=no
perl-5.32.0/hints/hpux.sh:76:case `$cc -v 2>&1`"" in
perl-5.32.0/hints/hpux.sh-77- *gcc*) ccisgcc="$define"
##############################################
perl-5.32.0/hints/hpux.sh-80- # Done too late in Configure if hinted
perl-5.32.0/hints/hpux.sh:81: gccversion=`$cc -dumpversion`
perl-5.32.0/hints/hpux.sh-82- fi
##############################################
perl-5.32.0/hints/hpux.sh-107- *) # gcc with gas will not accept +DA2.0
perl-5.32.0/hints/hpux.sh:108: case "`$cc -c -Wa,+DA2.0 try.c 2>&1`" in
perl-5.32.0/hints/hpux.sh-109- *"+DA2.0"*) # gas
##############################################
perl-5.32.0/hints/hpux.sh-118- # gcc with gld will not accept +vnocompatwarnings
perl-5.32.0/hints/hpux.sh:119: case "`$cc -o try -Wl,+vnocompatwarnings try.c 2>&1`" in
perl-5.32.0/hints/hpux.sh-120- *"+vnocompat"*) # gld
##############################################
perl-5.32.0/hints/hpux.sh-140- cc_found=""
perl-5.32.0/hints/hpux.sh:141: for p in `echo $PATH | tr : ' ''` ; do
perl-5.32.0/hints/hpux.sh-142- x="$p/cc"
##############################################
perl-5.32.0/hints/hpux.sh-144- if [ -h $x ]; then
perl-5.32.0/hints/hpux.sh:145: l=`ls -l $x | sed 's,.*-> ,,'`
perl-5.32.0/hints/hpux.sh-146- case $l in
##############################################
perl-5.32.0/hints/hpux.sh-150- fi
perl-5.32.0/hints/hpux.sh:151: x=`echo $x | sed 's,/\./,/,g'`
perl-5.32.0/hints/hpux.sh-152- case $x in
##############################################
perl-5.32.0/hints/hpux.sh-159- what $cc_found >&4
perl-5.32.0/hints/hpux.sh:160: ccversion=`what $cc_found | awk '/Compiler/{print $2}/Itanium/{print $6,$7}/for Integrity/{print $6,$7}'`
perl-5.32.0/hints/hpux.sh-161- case "$ccflags" in
##############################################
perl-5.32.0/hints/hpux.sh-333- # (NOTE: on IA64, this doesn't work with .a files.)
perl-5.32.0/hints/hpux.sh:334: libscheck='case "`/usr/bin/file $xxx`" in
perl-5.32.0/hints/hpux.sh-335- *ELF-64*|*LP64*|*PA-RISC2.0*) ;;
##############################################
perl-5.32.0/hints/hpux.sh-413- "") optimize="-g -O" ;;
perl-5.32.0/hints/hpux.sh:414: *O[3456789]*) optimize=`echo "$optimize" | sed -e 's/O[3-9]/O2/'` ;;
perl-5.32.0/hints/hpux.sh-415- esac
##############################################
perl-5.32.0/hints/hpux.sh-424- echo "main(){}">try.c
perl-5.32.0/hints/hpux.sh:425: case "`$cc $optimize -c try.c 2>&1`" in
perl-5.32.0/hints/hpux.sh-426- *"-g option disabled"*)
perl-5.32.0/hints/hpux.sh:427: set `echo "X $optimize " | sed -e 's/ -g / /'`
perl-5.32.0/hints/hpux.sh-428- shift
##############################################
perl-5.32.0/hints/hpux.sh-436- *O2*)
perl-5.32.0/hints/hpux.sh:437: opt=`echo "$optimize" | sed -e 's/O2/O1/'`
perl-5.32.0/hints/hpux.sh-438- toke_cflags="$toke_cflags;optimize=\"$opt\""
##############################################
perl-5.32.0/hints/hpux.sh-447- "") optimize="+O2 +Onolimit" ;;
perl-5.32.0/hints/hpux.sh:448: *O[3456789]*) optimize=`echo "$optimize" | sed -e 's/O[3-9]/O2/'` ;;
perl-5.32.0/hints/hpux.sh-449- esac
##############################################
perl-5.32.0/hints/hpux.sh-451- *-O*|\
perl-5.32.0/hints/hpux.sh:452: *O2*) opt=`echo "$optimize" | sed -e 's/-O/+O2/' -e 's/O2/O1/' -e 's/ *+Onolimit//'`
perl-5.32.0/hints/hpux.sh-453- ;;
##############################################
perl-5.32.0/hints/hpux.sh-466- *O[12]*)
perl-5.32.0/hints/hpux.sh:467: opt=`echo "$optimize" | sed -e 's/O2/O1/' -e 's/ *+Onolimit//'`
perl-5.32.0/hints/hpux.sh-468- opmini_cflags="optimize=\"$opt\""
##############################################
perl-5.32.0/hints/hpux.sh-499- op_cflags="optimize=\"$opt\""
perl-5.32.0/hints/hpux.sh:500: #opt=`echo "$optimize" | sed -e 's/O1/O0/'`
perl-5.32.0/hints/hpux.sh-501- globals_cflags="optimize=\"$opt\"" ;;
##############################################
perl-5.32.0/hints/hpux.sh-550- if $cc -o t001 -O $ccflags $ldflags -lm ../hints/t001.c; then
perl-5.32.0/hints/hpux.sh:551: gccbug=`$run ./t001`
perl-5.32.0/hints/hpux.sh-552- case "$gccbug" in
##############################################
perl-5.32.0/hints/hpux.sh-597- echo "when compiling in 32bit mode. The optimizer will be disabled." >&4
perl-5.32.0/hints/hpux.sh:598: optimize=`echo "$optimize" | sed -e 's/[-+]O[0-9]*//' -e 's/+Onolimit//' -e 's/^ *//'`
perl-5.32.0/hints/hpux.sh-599- ;;
##############################################
perl-5.32.0/hints/hpux.sh-610- *-LP64*:undef:define)
perl-5.32.0/hints/hpux.sh:611: archname=`echo "$archname" | sed 's/-LP64/-64int/'`
perl-5.32.0/hints/hpux.sh-612- echo "Archname changed to $archname"
##############################################
perl-5.32.0/hints/hpux.sh-628- # The strict ANSI mode (-Aa) doesn't like large files.
perl-5.32.0/hints/hpux.sh:629: ccflags=`echo " $ccflags "|sed 's@ -Aa @ @g'`
perl-5.32.0/hints/hpux.sh-630- case "$ccflags" in
##############################################
perl-5.32.0/hints/hpux.sh-745- ccflags=" -D_POSIX_C_SOURCE=199506L -D_REENTRANT $ccflags"
perl-5.32.0/hints/hpux.sh:746: set `echo X "$libswanted "| sed -e 's/ c / pthread c /'`
perl-5.32.0/hints/hpux.sh-747- shift
##############################################
perl-5.32.0/hints/altos486.sh-1-: have heard of problems with -lc_s on Altos 486
perl-5.32.0/hints/altos486.sh:2:set `echo " $libswanted " | sed "s/ c_s / /"`
perl-5.32.0/hints/altos486.sh-3-libswanted="$*"
##############################################
perl-5.32.0/hints/dynixptx.sh-16-
perl-5.32.0/hints/dynixptx.sh:17:libswanted=`echo $libswanted | sed -e 's/ inet / /'`
perl-5.32.0/hints/dynixptx.sh-18-
##############################################
perl-5.32.0/hints/irix_6_0.sh-21-# We don't want these libraries. Anyone know why?
perl-5.32.0/hints/irix_6_0.sh:22:set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ nsl / /' -e 's/ dl / /'`
perl-5.32.0/hints/irix_6_0.sh-23-shift
##############################################
perl-5.32.0/hints/irix_6_0.sh-40-# lddlflags="-shared"
perl-5.32.0/hints/irix_6_0.sh:41:# set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ sun / /' -e 's/ crypt / /' -e 's/ nsl / /' -e 's/ dl / /'`
perl-5.32.0/hints/irix_6_0.sh-42-# shift
##############################################
perl-5.32.0/hints/dcosx.sh-12-# Avoid all libraries in /usr/ucblib.
perl-5.32.0/hints/dcosx.sh:13:set `echo $glibpth | sed -e 's@/usr/ucblib@@'`
perl-5.32.0/hints/dcosx.sh-14-glibpth="$*"
##############################################
perl-5.32.0/hints/dcosx.sh-17-# -lucb contains incompatible routines.
perl-5.32.0/hints/dcosx.sh:18:set `echo " $libswanted " | sed -e 's@ ucb @ @'`
perl-5.32.0/hints/dcosx.sh-19-libswanted="$*"
##############################################
perl-5.32.0/hints/dcosx.sh-70- tmp=`/usr/bin/ksh -c "whence make"`
perl-5.32.0/hints/dcosx.sh:71: case "`/usr/bin/ls -l $tmp`" in
perl-5.32.0/hints/dcosx.sh-72- ??????s*)
##############################################
perl-5.32.0/hints/dcosx.sh-93-# Watch out in case they have not set $cc.
perl-5.32.0/hints/dcosx.sh:94:case "`${cc:-cc} -v 2>&1`" in
perl-5.32.0/hints/dcosx.sh-95-*gcc*)
##############################################
perl-5.32.0/hints/dcosx.sh-102- echo 'main() { return 0; }' > try.c
perl-5.32.0/hints/dcosx.sh:103: verbose=`${cc:-cc} -v -o try try.c 2>&1`
perl-5.32.0/hints/dcosx.sh-104- rm -f try try.c
##############################################
perl-5.32.0/hints/esix4.sh-17-ccflags="$ccflags -I/usr/include -I/usr/ucbinclude"
perl-5.32.0/hints/esix4.sh:18:libswanted=`echo " $libswanted " | sed -e 's/ malloc / /' `
perl-5.32.0/hints/esix4.sh-19-d_index='undef'
##############################################
perl-5.32.0/hints/nonstopux.sh-17-
perl-5.32.0/hints/nonstopux.sh:18:libswanted=`echo " $libswanted " | sed -e 's/ ucb / /'`
perl-5.32.0/hints/nonstopux.sh:19:glibpth=`echo " $glibpth " | sed -e 's/ \/usr\/ucblib / /'`
perl-5.32.0/hints/nonstopux.sh-20-
##############################################
perl-5.32.0/hints/irix_6.sh-129- libscheck='case "$xxx" in
perl-5.32.0/hints/irix_6.sh:130:*.a) /bin/ar p $xxx `/bin/ar t $xxx | sed q` >$$.o;
perl-5.32.0/hints/irix_6.sh:131: case "`/usr/bin/file $$.o`" in
perl-5.32.0/hints/irix_6.sh-132- *N32*) rm -f $$.o ;;
##############################################
perl-5.32.0/hints/irix_6.sh-134- esac ;;
perl-5.32.0/hints/irix_6.sh:135:*) case "`/usr/bin/file $xxx`" in
perl-5.32.0/hints/irix_6.sh-136- *N32*) ;;
##############################################
perl-5.32.0/hints/irix_6.sh-173- loclibpth="$loclibpth /usr/lib64"
perl-5.32.0/hints/irix_6.sh:174: libscheck='case "`/usr/bin/file $xxx`" in
perl-5.32.0/hints/irix_6.sh-175-*64-bit*) ;;
##############################################
perl-5.32.0/hints/irix_6.sh-254- # Check for which version of the compiler we're running
perl-5.32.0/hints/irix_6.sh:255: case "`$cc -version 2>&1`" in
perl-5.32.0/hints/irix_6.sh-256- *7.0*) # Mongoose 7.0
##############################################
perl-5.32.0/hints/irix_6.sh-333-# unfortunately - Allen
perl-5.32.0/hints/irix_6.sh:334:case "`$cc -version 2>&1`" in
perl-5.32.0/hints/irix_6.sh-335-*7.2.*)
##############################################
perl-5.32.0/hints/irix_6.sh-390-# librt contains nothing we need (some places need it for Time::HiRes) --jhi
perl-5.32.0/hints/irix_6.sh:391:set `echo X "$libswanted "|sed -e 's/ socket / /' -e 's/ nsl / /' -e 's/ dl / /' -e 's/ rt / /'`
perl-5.32.0/hints/irix_6.sh-392-shift
##############################################
perl-5.32.0/hints/irix_6.sh-414-
perl-5.32.0/hints/irix_6.sh:415:set `echo X "$libswanted "|sed -e 's/ sun / /' -e 's/ crypt / /' -e 's/ bsd / /' -e 's/ PW / /' -e 's/ malloc / /'`
perl-5.32.0/hints/irix_6.sh-416-shift
##############################################
perl-5.32.0/hints/irix_6.sh-427-6.5)
perl-5.32.0/hints/irix_6.sh:428: set `echo X "$libswanted "|sed -e 's/ bind / /'`
perl-5.32.0/hints/irix_6.sh-429- shift
##############################################
perl-5.32.0/hints/irix_6.sh-488- fi
perl-5.32.0/hints/irix_6.sh:489: set `echo X "$libswanted "| sed -e 's/ c / pthread /'`
perl-5.32.0/hints/irix_6.sh-490- shift
##############################################
perl-5.32.0/hints/dragonfly.sh-13- esac
perl-5.32.0/hints/dragonfly.sh:14: libswanted=`echo $libswanted | sed 's/ malloc / /'`
perl-5.32.0/hints/dragonfly.sh-15- ;;
##############################################
perl-5.32.0/lib/Net/hostent.t-44-
perl-5.32.0/lib/Net/hostent.t:45:my $i = gethostbyaddr(inet_aton("127.0.0.1"));
perl-5.32.0/lib/Net/hostent.t:46:ok(defined $i, "gethostbyaddr('127.0.0.1')") ||
perl-5.32.0/lib/Net/hostent.t-47- DIE("Can't continue without working gethostbyaddr: $!");
##############################################
perl-5.32.0/lib/Net/netent.pm-44-
perl-5.32.0/lib/Net/netent.pm:45:sub getnetbyaddr ($;$) {
perl-5.32.0/lib/Net/netent.pm-46- my ($net, $addrtype);
##############################################
perl-5.32.0/lib/Net/netent.pm-49- $addrtype = @_ ? shift : Socket::AF_INET();
perl-5.32.0/lib/Net/netent.pm:50: populate(CORE::getnetbyaddr($net, $addrtype))
perl-5.32.0/lib/Net/netent.pm-51-}
##############################################
perl-5.32.0/lib/Net/netent.pm-55- require Socket;
perl-5.32.0/lib/Net/netent.pm:56: &getnetbyaddr(Socket::inet_aton(shift));
perl-5.32.0/lib/Net/netent.pm-57- } else {
##############################################
perl-5.32.0/lib/Net/netent.pm-86-This module's default exports override the core getnetbyname() and
perl-5.32.0/lib/Net/netent.pm:87:getnetbyaddr() functions, replacing them with versions that return
perl-5.32.0/lib/Net/netent.pm-88-"Net::netent" objects. This object has methods that return the similarly
##############################################
perl-5.32.0/lib/Net/netent.pm-101-The getnet() function is a simple front-end that forwards a numeric
perl-5.32.0/lib/Net/netent.pm:102:argument to getnetbyaddr(), and the rest
perl-5.32.0/lib/Net/netent.pm-103-to getnetbyname().
##############################################
perl-5.32.0/lib/Net/netent.pm-156-
perl-5.32.0/lib/Net/netent.pm:157: if ($n = getnetbyaddr($n->net)) {
perl-5.32.0/lib/Net/netent.pm-158- if (lc($n->name) ne lc($net)) {
##############################################
perl-5.32.0/lib/Net/hostent.pm-51-
perl-5.32.0/lib/Net/hostent.pm:52:sub gethostbyaddr ($;$) {
perl-5.32.0/lib/Net/hostent.pm-53- my ($addr, $addrtype);
##############################################
perl-5.32.0/lib/Net/hostent.pm-56- $addrtype = @_ ? shift : Socket::AF_INET();
perl-5.32.0/lib/Net/hostent.pm:57: populate(CORE::gethostbyaddr($addr, $addrtype))
perl-5.32.0/lib/Net/hostent.pm-58-}
##############################################
perl-5.32.0/lib/Net/hostent.pm-62- require Socket;
perl-5.32.0/lib/Net/hostent.pm:63: &gethostbyaddr(Socket::inet_aton(shift));
perl-5.32.0/lib/Net/hostent.pm-64- } else {
##############################################
perl-5.32.0/lib/Net/hostent.pm-82-This module's default exports override the core gethostbyname() and
perl-5.32.0/lib/Net/hostent.pm:83:gethostbyaddr() functions, replacing them with versions that return
perl-5.32.0/lib/Net/hostent.pm-84-"Net::hostent" objects. This object has methods that return the similarly
##############################################
perl-5.32.0/lib/Net/hostent.pm-99-The gethost() function is a simple front-end that forwards a numeric
perl-5.32.0/lib/Net/hostent.pm:100:argument to gethostbyaddr() by way of Socket::inet_aton, and the rest
perl-5.32.0/lib/Net/hostent.pm-101-to gethostbyname().
##############################################
perl-5.32.0/lib/Net/hostent.pm-132- my $i;
perl-5.32.0/lib/Net/hostent.pm:133: for $addr ( @{$h->addr_list} ) {
perl-5.32.0/lib/Net/hostent.pm-134- printf "\taddr #%d is [%s]\n", $i++, inet_ntoa($addr);
##############################################
perl-5.32.0/lib/Net/hostent.pm-139-
perl-5.32.0/lib/Net/hostent.pm:140: if ($h = gethostbyaddr($h->addr)) {
perl-5.32.0/lib/Net/hostent.pm-141- if (lc($h->name) ne lc($host)) {
##############################################
perl-5.32.0/lib/ExtUtils/t/Embed.t-134- #print "# $lncmd\n";
perl-5.32.0/lib/ExtUtils/t/Embed.t:135: $libperl_copied = 1 unless system($lncmd);
perl-5.32.0/lib/ExtUtils/t/Embed.t-136- }
##############################################
perl-5.32.0/lib/ExtUtils/t/Embed.t-143-print "# $cmd\n";
perl-5.32.0/lib/ExtUtils/t/Embed.t:144:my @out = `$cmd`;
perl-5.32.0/lib/ExtUtils/t/Embed.t-145-$status = $?;
##############################################
perl-5.32.0/lib/ExtUtils/t/Embed.t-156-print "# embed_test = $embed_test\n";
perl-5.32.0/lib/ExtUtils/t/Embed.t:157:$status = system($embed_test);
perl-5.32.0/lib/ExtUtils/t/Embed.t-158-print (($status? 'not ':'')."ok 10 # system returned $status\n");
##############################################
perl-5.32.0/lib/Benchmark.pm-698- $subcode = "sub { for (1 .. $n) { local \$_; package $pack; $c;} }";
perl-5.32.0/lib/Benchmark.pm:699: $subref = _doeval($subcode);
perl-5.32.0/lib/Benchmark.pm-700- }
##############################################
perl-5.32.0/lib/overload.pm-971-references point to the same thing) then you may be better off using
perl-5.32.0/lib/overload.pm:972:C<Scalar::Util::refaddr()>, which is faster.
perl-5.32.0/lib/overload.pm-973-
##############################################
perl-5.32.0/lib/B/Deparse.t-133-
perl-5.32.0/lib/B/Deparse.t:134:$a = `$^X $path "-MO=Deparse" -anlwi.bak -e 1 2>&1`;
perl-5.32.0/lib/B/Deparse.t-135-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-151-
perl-5.32.0/lib/B/Deparse.t:152:$a = `$^X $path "-MO=Deparse" -e "use constant PI => 4" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-153-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-156-
perl-5.32.0/lib/B/Deparse.t:157:$a = `$^X $path "-MO=Deparse" -e "sub foo(){1}" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-158-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-213-# Exotic sub declarations
perl-5.32.0/lib/B/Deparse.t:214:$a = `$^X $path "-MO=Deparse" -e "sub ::::{}sub ::::::{}" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-215-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-225-# [perl #117311]
perl-5.32.0/lib/B/Deparse.t:226:$a = `$^X $path "-MO=Deparse,-l" -e "map{ eval(0) }()" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-227-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-249-$a =
perl-5.32.0/lib/B/Deparse.t:250: `$^X $path "-MO=Deparse" -e "BEGIN{*CORE::GLOBAL::require=sub{1}}" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-251-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-262-$a =
perl-5.32.0/lib/B/Deparse.t:263: `$^X $path "-MO=Deparse" -e "BEGIN{*Acme::Acme:: = *Acme::}" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-264-like($a, qr/-e syntax OK/,
##############################################
perl-5.32.0/lib/B/Deparse.t-279-$a =
perl-5.32.0/lib/B/Deparse.t:280: `$^X $path "-MO=Deparse" -e "use strict; print;" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-281-unlike($a, qr/BEGIN/,
##############################################
perl-5.32.0/lib/B/Deparse.t-300-# multiple statements on format lines
perl-5.32.0/lib/B/Deparse.t:301:$a = `$^X $path "-MO=Deparse" -e "format =" -e "\@" -e "x();z()" -e. 2>&1`;
perl-5.32.0/lib/B/Deparse.t-302-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-340-# CORE::format
perl-5.32.0/lib/B/Deparse.t:341:$a = readpipe qq`$^X $path "-MO=Deparse" -e "use feature q|:all|;`
perl-5.32.0/lib/B/Deparse.t-342- .qq` my sub format; CORE::format =" -e. 2>&1`;
##############################################
perl-5.32.0/lib/B/Deparse.t-353-# For a short while the output included 'While deparsing'
perl-5.32.0/lib/B/Deparse.t:354:$a = `$^X $path "-MO=Deparse" -e "foo()" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-355-$a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-389-# CORE::no
perl-5.32.0/lib/B/Deparse.t:390:$a = readpipe qq`$^X $path "-MO=Deparse" -Xe `
perl-5.32.0/lib/B/Deparse.t-391- .qq`"use feature q|:all|; my sub no; CORE::no less" 2>&1`;
##############################################
perl-5.32.0/lib/B/Deparse.t-395-# CORE::use
perl-5.32.0/lib/B/Deparse.t:396:$a = readpipe qq`$^X $path "-MO=Deparse" -Xe `
perl-5.32.0/lib/B/Deparse.t-397- .qq`"use feature q|:all|; my sub use; CORE::use less" 2>&1`;
##############################################
perl-5.32.0/lib/B/Deparse.t-401-# CORE::__DATA__
perl-5.32.0/lib/B/Deparse.t:402:$a = readpipe qq`$^X $path "-MO=Deparse" -Xe `
perl-5.32.0/lib/B/Deparse.t-403- .qq`"use feature q|:all|; my sub __DATA__; `
##############################################
perl-5.32.0/lib/B/Deparse.t-408-# sub declarations
perl-5.32.0/lib/B/Deparse.t:409:$a = readpipe qq`$^X $path "-MO=Deparse" -e "sub foo{}" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-410-like($a, qr/sub foo\s*\{\s+\}/, 'sub declarations');
##############################################
perl-5.32.0/lib/B/Deparse.t-441- $prog =~ s/\n//g;
perl-5.32.0/lib/B/Deparse.t:442: $a = readpipe qq`$^X $path "-MO=Deparse" -e "$prog" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-443- $a =~ s/-e syntax OK\n//g;
##############################################
perl-5.32.0/lib/B/Deparse.t-496-my $prog = 'use constant FOO => do { 1 }; no overloading; die';
perl-5.32.0/lib/B/Deparse.t:497:$a = readpipe qq`$^X $path "-MO=-qq,Deparse" -e "$prog" 2>&1`;
perl-5.32.0/lib/B/Deparse.t-498-is($a, <<'EOCODK', '[perl #115066] use statements accidentally nested');
##############################################
perl-5.32.0/lib/B/Deparse.t-2911-our $x;
perl-5.32.0/lib/B/Deparse.t:2912:$x = `$a-$b`;
perl-5.32.0/lib/B/Deparse.t-2913-####
##############################################
perl-5.32.0/lib/B/Deparse-core.t-269-
perl-5.32.0/lib/B/Deparse-core.t:270:testit exec => 'CORE::exec($foo $bar);';
perl-5.32.0/lib/B/Deparse-core.t-271-
##############################################
perl-5.32.0/lib/B/Deparse-core.t-319-
perl-5.32.0/lib/B/Deparse-core.t:320:testit system => 'CORE::system($foo $bar);';
perl-5.32.0/lib/B/Deparse-core.t-321-
##############################################
perl-5.32.0/lib/vmsish.t-29-#========== vmsish status ==========
perl-5.32.0/lib/vmsish.t:30:`$Invoke_Perl -e 1`; # Avoid system() from a pipe from harness. Mutter.
perl-5.32.0/lib/vmsish.t-31-is($?,0,"simple Perl invocation: POSIX success status");
##############################################
perl-5.32.0/lib/h2xs.t-60-# You might also wish to bail out if your perl platform does not
perl-5.32.0/lib/h2xs.t:61:# do `$^X -e 'warn "Writing h2xst"' 2>&1`; duplicity.
perl-5.32.0/lib/h2xs.t-62-
##############################################
perl-5.32.0/lib/h2xs.t-183- my $prog = "$^X $lib $extracted_program $args $dupe";
perl-5.32.0/lib/h2xs.t:184: @result = `$prog`;
perl-5.32.0/lib/h2xs.t-185- cmp_ok ($?, "==", 0, "running $prog ");
##############################################
perl-5.32.0/lib/filetest.t-70- }
perl-5.32.0/lib/filetest.t:71: system($chflags, "uchg", $tstfile);
perl-5.32.0/lib/filetest.t-72- die "Can't exec $chflags uchg" if $? != 0;
##############################################
perl-5.32.0/lib/filetest.t-96- # cleanup
perl-5.32.0/lib/filetest.t:97: system($chflags, "nouchg", $tstfile);
perl-5.32.0/lib/filetest.t-98- unlink $tstfile;
##############################################
perl-5.32.0/lib/Pod/t/Usage.t-68-
perl-5.32.0/lib/Pod/t/Usage.t:69: is( system( @cmd ) >> 8, $exit, 'Exit status of pod2usage()' );
perl-5.32.0/lib/Pod/t/Usage.t-70-}
##############################################
perl-5.32.0/lib/Unicode/UCD.t-1454- my $diff = File::Temp->new();
perl-5.32.0/lib/Unicode/UCD.t:1455: system("$ENV{PERL_TEST_DIFF} $off $gend > $diff");
perl-5.32.0/lib/Unicode/UCD.t-1456-
##############################################
perl-5.32.0/lib/unicore/mktables-1494-
perl-5.32.0/lib/unicore/mktables:1495:sub objaddr($addr) {
perl-5.32.0/lib/unicore/mktables-1496- # Returns the address of the blessed input object.
##############################################
perl-5.32.0/lib/charnames.t-16-# Because \N{} is compile time, any warnings will get generated before
perl-5.32.0/lib/charnames.t:17:# execution, so have to have an array, and arrange things so no warning
perl-5.32.0/lib/charnames.t-18-# is generated twice to verify that in fact a warning did happen
##############################################
perl-5.32.0/lib/overloading.t-32- is( "$y", overload::StrVal($y), "no stringification of qr//" );
perl-5.32.0/lib/overloading.t:33: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t:34: is( cos($x), cos(refaddr($x)), "no cosinusfication" );
perl-5.32.0/lib/overloading.t-35-
##############################################
perl-5.32.0/lib/overloading.t-39- is( "$y", overload::StrVal($y), "no stringification of qr//" );
perl-5.32.0/lib/overloading.t:40: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t:41: is( cos($x), cos(refaddr($x)), "no cosinusfication" );
perl-5.32.0/lib/overloading.t-42- }
##############################################
perl-5.32.0/lib/overloading.t-66- is( "$y", overload::StrVal($y), "no stringification of qr//" );
perl-5.32.0/lib/overloading.t:67: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t:68: is( cos($x), cos(refaddr($x)), "no cosinusfication" );
perl-5.32.0/lib/overloading.t-69- }
##############################################
perl-5.32.0/lib/overloading.t-80- is( "$y", $ystr, "stringifies qr//" );
perl-5.32.0/lib/overloading.t:81: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t-82- is( cos($x), "far side of overload table", "cosinusfies" );
##############################################
perl-5.32.0/lib/overloading.t-87- is( "$y", overload::StrVal($y), "no stringification of qr//" );
perl-5.32.0/lib/overloading.t:88: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t-89- is( cos($x), "far side of overload table", "cosinusfies" );
##############################################
perl-5.32.0/lib/overloading.t-101- is( "$y", $ystr, "stringifies qr//" );
perl-5.32.0/lib/overloading.t:102: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t-103- is( cos($x), "far side of overload table", "cosinusfies" );
##############################################
perl-5.32.0/lib/overloading.t-107- is( "$y", $ystr, "stringifies qr//" );
perl-5.32.0/lib/overloading.t:108: is( 0 + $x, refaddr($x), "no numification" );
perl-5.32.0/lib/overloading.t:109: is( cos($x), cos(refaddr($x)), "no cosinusfication" );
perl-5.32.0/lib/overloading.t-110-
##############################################
perl-5.32.0/lib/perl5db.pl-3959- # We resume execution when the shell terminates.
perl-5.32.0/lib/perl5db.pl:3960: DB::_db_system( $ENV{SHELL} || "/bin/sh" );
perl-5.32.0/lib/perl5db.pl-3961- next CMD;
##############################################
perl-5.32.0/lib/perl5db.pl-3964- # System it.
perl-5.32.0/lib/perl5db.pl:3965: DB::_db_system($1);
perl-5.32.0/lib/perl5db.pl-3966- next CMD;
##############################################
perl-5.32.0/lib/perl5db.pl-3968- elsif ($my_cmd =~ m#\G\s*(.*)#cgms) {
perl-5.32.0/lib/perl5db.pl:3969: DB::_db_system( $ENV{SHELL} || "/bin/sh", "-c", $1 );
perl-5.32.0/lib/perl5db.pl-3970- next CMD;
##############################################
perl-5.32.0/lib/perl5db.pl-5614- if ($subrange) {
perl-5.32.0/lib/perl5db.pl:5615: if ( eval($subrange) < -$window ) {
perl-5.32.0/lib/perl5db.pl-5616- $subrange =~ s/-.*/+/;
##############################################
perl-5.32.0/lib/perl5db.pl-8991- unless ($page) {
perl-5.32.0/lib/perl5db.pl:8992: _db_system("$doccmd $doccmd");
perl-5.32.0/lib/perl5db.pl-8993- return;
##############################################
perl-5.32.0/lib/perl5db.pl-8998- if ( $doccmd ne 'man' ) {
perl-5.32.0/lib/perl5db.pl:8999: _db_system("$doccmd $page");
perl-5.32.0/lib/perl5db.pl-9000- return;
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-71- grep defined, @_);
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm:72: return $self->SUPER::do_system($cmd);
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-73-}
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-127- while ( my $cmd = shift @cmds ) {
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm:128: $self->do_system( @$cmd )
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-129- or die "error building $cf->{dlext} file from '$args{source}'";
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-219- while ( my $cmd = shift @cmds ) {
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm:220: $self->do_system( @$cmd );
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows.pm-221- }
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/os2.pm-21- my $libname = "$1$self->{config}{lib_ext}"; # Put .LIB file near .DEF file
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/os2.pm:22: $self->do_system('emximp', '-o', $libname, $res[0]) or die "emxexp: res=$?";
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/os2.pm-23- return (@res, $libname);
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm-183-
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm:184: $self->do_system(@cc, @flags, $args{source})
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm-185- or die "error building $object_file from '$args{source}'";
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm-331-
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm:332: $self->do_system(@shrp, @ld, @output, @$objects, @linker_flags)
perl-5.32.0/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Base.pm-333- or die "error building $out from @$objects";
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-66- # Try the executable
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t:67: my $ec = my_system($exe_file);
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-68- is( $ec, 11, "got expected exit code from executable" )
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-89- # because we're running under "use vmsish";
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t:90: $ec = system("mcr $cmd");
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-91- return $ec;
##############################################
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-93- else {
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t:94: $ec = system($cmd);
perl-5.32.0/dist/ExtUtils-CBuilder/t/02-link.t-95- return $ec == -1 ? -1 : $ec >> 8;
##############################################
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-171- if(defined $raddr) {
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm:172: @raddr = $sock->_get_addr($raddr, $arg->{MultiHomed});
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-173- return _error($sock, $EINVAL, "Bad hostname '",$arg->{PeerAddr},"'")
##############################################
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-266-sub sockaddr {
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm:267: @_ == 1 or croak 'usage: $sock->sockaddr()';
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-268- my($sock) = @_;
##############################################
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-287-sub peeraddr {
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm:288: @_ == 1 or croak 'usage: $sock->peeraddr()';
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-289- my($sock) = @_;
##############################################
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-421-
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm:422:=item sockaddr ()
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-423-
##############################################
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-434-
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm:435:=item peeraddr ()
perl-5.32.0/dist/IO/lib/IO/Socket/INET.pm-436-
##############################################
perl-5.32.0/dist/IO/t/io_utf8.t-9-
perl-5.32.0/dist/IO/t/io_utf8.t:10:require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/io_utf8.t-11-
##############################################
perl-5.32.0/dist/IO/t/io_utf8argv.t-7- }
perl-5.32.0/dist/IO/t/io_utf8argv.t:8: require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/io_utf8argv.t-9-}
##############################################
perl-5.32.0/dist/IO/t/io_utf8argv.t-24-if ($::IS_EBCDIC) {
perl-5.32.0/dist/IO/t/io_utf8argv.t:25: require($ENV{PERL_CORE} ? "../../t/charset_tools.pl" : "./t/charset_tools.pl");
perl-5.32.0/dist/IO/t/io_utf8argv.t-26- $bytes = byte_utf8a_to_utf8n($bytes)
##############################################
perl-5.32.0/dist/IO/t/io_dup.t-39-$cmd = sprintf $echo, 4;
perl-5.32.0/dist/IO/t/io_dup.t:40:print `$cmd`;
perl-5.32.0/dist/IO/t/io_dup.t-41-
##############################################
perl-5.32.0/dist/IO/t/io_dup.t-43-$cmd = sprintf $echo, 5 if $^O eq 'MacOS';
perl-5.32.0/dist/IO/t/io_dup.t:44:print `$cmd`;
perl-5.32.0/dist/IO/t/io_dup.t-45-
##############################################
perl-5.32.0/dist/IO/t/io_udp.t-3-BEGIN {
perl-5.32.0/dist/IO/t/io_udp.t:4: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/IO/t/io_udp.t-5-
##############################################
perl-5.32.0/dist/IO/t/io_udp.t-58-
perl-5.32.0/dist/IO/t/io_udp.t:59:ok(compare_addr($udpa->peername,$udpb->sockname, 'peername', 'sockname'));
perl-5.32.0/dist/IO/t/io_udp.t-60-
perl-5.32.0/dist/IO/t/io_udp.t-61-my $buf;
perl-5.32.0/dist/IO/t/io_udp.t:62:my $where = $udpb->recv($buf="", 4);
perl-5.32.0/dist/IO/t/io_udp.t-63-is($buf, 'BORK');
##############################################
perl-5.32.0/dist/IO/t/io_udp.t-66-
perl-5.32.0/dist/IO/t/io_udp.t:67:if (! ok(compare_addr($where,$udpa->sockname, 'recv name', 'sockname'))) {
perl-5.32.0/dist/IO/t/io_udp.t-68- @xtra = (0, $udpa->sockname);
##############################################
perl-5.32.0/dist/IO/t/io_dir.t-3-BEGIN {
perl-5.32.0/dist/IO/t/io_dir.t:4: require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/io_dir.t-5- plan(16);
##############################################
perl-5.32.0/dist/IO/t/io_file_export.t-7-BEGIN{
perl-5.32.0/dist/IO/t/io_file_export.t:8: require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/io_file_export.t-9- plan(tests => 3);
##############################################
perl-5.32.0/dist/IO/t/io_multihomed.t-3-BEGIN {
perl-5.32.0/dist/IO/t/io_multihomed.t:4: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/IO/t/io_multihomed.t-5-
##############################################
perl-5.32.0/dist/IO/t/io_multihomed.t-38- my($sock,$addr_str, $multi) = @_;
perl-5.32.0/dist/IO/t/io_multihomed.t:39: #print "_get_addr($sock, $addr_str, $multi)\n";
perl-5.32.0/dist/IO/t/io_multihomed.t-40-
##############################################
perl-5.32.0/dist/IO/t/io_file.t-3-use strict;
perl-5.32.0/dist/IO/t/io_file.t:4:require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/io_file.t-5-plan(tests => ($^O =~ /MSWin32/ ? 9 : 6));
##############################################
perl-5.32.0/dist/IO/t/IO.t-15-use File::Spec;
perl-5.32.0/dist/IO/t/IO.t:16:require($ENV{PERL_CORE} ? "../../t/test.pl" : "./t/test.pl");
perl-5.32.0/dist/IO/t/IO.t-17-plan(tests => 18);
##############################################
perl-5.32.0/dist/Time-HiRes/Makefile.PL-92- close CMDFILE;
perl-5.32.0/dist/Time-HiRes/Makefile.PL:93: system("\@ $tmp.com");
perl-5.32.0/dist/Time-HiRes/Makefile.PL-94- $ok = $?==0;
##############################################
perl-5.32.0/dist/Time-HiRes/Makefile.PL-102- printf "cccmd = $cccmd\n" if $VERBOSE;
perl-5.32.0/dist/Time-HiRes/Makefile.PL:103: my $res = system($cccmd);
perl-5.32.0/dist/Time-HiRes/Makefile.PL-104- $ok = defined($res) && $res == 0 && -s $tmp_exe && -x _;
##############################################
perl-5.32.0/dist/Time-HiRes/HiRes.xs-1715- PL_op = &fakeop;
perl-5.32.0/dist/Time-HiRes/HiRes.xs:1716: (void)fakeop.op_ppaddr(aTHX);
perl-5.32.0/dist/Time-HiRes/HiRes.xs-1717- SPAGAIN;
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-126- require Scalar::Util;
perl-5.32.0/dist/Data-Dumper/Dumper.pm:127: pack "J", Scalar::Util::refaddr(shift);
perl-5.32.0/dist/Data-Dumper/Dumper.pm-128-};
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-142- require Scalar::Util;
perl-5.32.0/dist/Data-Dumper/Dumper.pm:143: sprintf $refaddr_format, Scalar::Util::refaddr(shift);
perl-5.32.0/dist/Data-Dumper/Dumper.pm-144- }
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-160- if (ref $v) {
perl-5.32.0/dist/Data-Dumper/Dumper.pm:161: $id = format_refaddr($v);
perl-5.32.0/dist/Data-Dumper/Dumper.pm-162- if ($k =~ /^[*](.*)$/) {
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-306- my $realtype = $realpack ? Scalar::Util::reftype($val) : ref $val;
perl-5.32.0/dist/Data-Dumper/Dumper.pm:307: $id = format_refaddr($val);
perl-5.32.0/dist/Data-Dumper/Dumper.pm-308-
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-514- if ($name ne '') {
perl-5.32.0/dist/Data-Dumper/Dumper.pm:515: $id = format_refaddr($ref);
perl-5.32.0/dist/Data-Dumper/Dumper.pm-516- if (exists $s->{seen}{$id}) {
##############################################
perl-5.32.0/dist/Data-Dumper/Dumper.pm-1280-
perl-5.32.0/dist/Data-Dumper/Dumper.pm:1281: $bar = eval(Dumper($boo));
perl-5.32.0/dist/Data-Dumper/Dumper.pm-1282- print($@) if $@;
##############################################
perl-5.32.0/dist/Data-Dumper/t/bless.t-32-is($dt, $o, "package name in bless is escaped if needed");
perl-5.32.0/dist/Data-Dumper/t/bless.t:33:is_deeply(scalar eval($dt), $t, "eval reverts dump");
perl-5.32.0/dist/Data-Dumper/t/bless.t-34-}
##############################################
perl-5.32.0/dist/Data-Dumper/t/bless.t-43-is($dt, $o, "package name in bless is escaped if needed");
perl-5.32.0/dist/Data-Dumper/t/bless.t:44:is_deeply(scalar eval($dt), $t, "eval reverts dump");
perl-5.32.0/dist/Data-Dumper/t/bless.t-45-}
##############################################
perl-5.32.0/dist/Locale-Maketext/lib/Locale/Maketext.pm-35-# checking will be done on the legality of tokens passed to the
perl-5.32.0/dist/Locale-Maketext/lib/Locale/Maketext.pm:36:# eval("use $module_name") in _try_use. If you turn this off, you have
perl-5.32.0/dist/Locale-Maketext/lib/Locale/Maketext.pm-37-# to do your own taint checking.
##############################################
perl-5.32.0/dist/Storable/stacksize-108-my $cmd = array_cmd(1);
perl-5.32.0/dist/Storable/stacksize:109:unless ((my $output = `$cmd`) =~ /\bok\b/) {
perl-5.32.0/dist/Storable/stacksize-110- die "Cannot run probe: '$output', aborting...\n";
##############################################
perl-5.32.0/dist/Storable/stacksize-120- #print "$cmd\n" unless $QUIET;
perl-5.32.0/dist/Storable/stacksize:121: if (`$cmd` =~ /\bok\b/) {
perl-5.32.0/dist/Storable/stacksize-122- $n = good($n);
##############################################
perl-5.32.0/dist/Storable/stacksize-140- #print "$cmd\n" unless $QUIET;
perl-5.32.0/dist/Storable/stacksize:141: if (`$cmd` =~ /\bok\b/) {
perl-5.32.0/dist/Storable/stacksize-142- $n = good($n);
##############################################
perl-5.32.0/dist/Storable/Storable.pm-1187- local $Storable::Deparse = 1;
perl-5.32.0/dist/Storable/Storable.pm:1188: local $Storable::Eval = sub { $safe->reval($_[0]) };
perl-5.32.0/dist/Storable/Storable.pm-1189- my $serialized = freeze(sub { 42 });
##############################################
perl-5.32.0/dist/Storable/t/compat06.t-128-#
perl-5.32.0/dist/Storable/t/compat06.t:129:M`P,````%!`(````&"(%8"(!8"'U8"@@M,RXQ-#$U.5@)```!R%@*`S0N-5A8
perl-5.32.0/dist/Storable/t/compat06.t:130:M6`````-N=6T$`P````(*!'9A;#%8````!&ME>3$*!'9A;#)8````!&ME>3)B
perl-5.32.0/dist/Storable/t/compat06.t-131-M"51)141?2$%32%A8`````6@$`@````,*!G-T<FEN9U@$``````I8!```````
perl-5.32.0/dist/Storable/t/compat06.t:132:M6%A8`````6$$`@````4$`@````$(@%AB!E-)35!,15A8!`(````!"(%88@93
perl-5.32.0/dist/Storable/t/compat06.t:133:M24U03$586`0"`````0B"6&(&4TE-4$Q%6%@$`@````$(@UAB!E-)35!,15A8
perl-5.32.0/dist/Storable/t/compat06.t:134:M!`(````!"(188@9324U03$586%A8`````V]B:@0,!``````*6%A8`````W)E
perl-5.32.0/dist/Storable/t/compat06.t-135-(9F($4D]/5%@`
##############################################
perl-5.32.0/dist/Storable/t/compat06.t-139-#
perl-5.32.0/dist/Storable/t/compat06.t:140:#M!0,1!-G6UN,#````!00,!!$)X\G%Q&W(P>+(`P````(*!*6!D_$````$DH6H
perl-5.32.0/dist/Storable/t/compat06.t-141-#M\0H$I8&3\@````22A:CR`````YF%A@0"````!@B!"(`(?0H(8/-+\?3Q]?D)
perl-5.32.0/dist/Storable/t/compat06.t:142:#M```!R`H#]$OU`````Y6DE`0"````!001!N+)U-?3Q0(````!"(`$$@("````
perl-5.32.0/dist/Storable/t/compat06.t:143:#M`0B!!!("`@````$(@@02`@(````!"(,$$@("`````0B$`````Y:"D00`````
perl-5.32.0/dist/Storable/t/compat06.t-144-#E!`````&(!`(````#"@:BHYF)E8<$``````0$```````````!@0``
##############################################
perl-5.32.0/dist/Storable/t/interwork56.t-166-begin 101 Lillput,4,4,4,8
perl-5.32.0/dist/Storable/t/interwork56.t:167:M!`0$,3(S-`0$!`@"!`````HQ5&AI<R!F:6QE('=A<R!W<FET=&5N('=I=&@@
perl-5.32.0/dist/Storable/t/interwork56.t-168-M,2XP,30@;VX@<&5R;"`U+C`P-C`P,0H33&EL;'!U="!W87,@8V]R<F5C=`8"
perl-5.32.0/dist/Storable/t/interwork56.t:169:0````````@`H'5&AE($5N9```
perl-5.32.0/dist/Storable/t/interwork56.t-170-
##############################################
perl-5.32.0/dist/Storable/t/interwork56.t-178-begin 101 Belfuscu,4,4,4,8
perl-5.32.0/dist/Storable/t/interwork56.t:179:M!`0$-#,R,00$!`@"````!`HQ5&AI<R!F:6QE('=A<R!W<FET=&5N('=I=&@@
perl-5.32.0/dist/Storable/t/interwork56.t-180-M,2XP,30@;VX@<&5R;"`U+C`P-C`P,0H40F5L9G5S8W4@=V%S(&-O<G)E8W0&
##############################################
perl-5.32.0/dist/Storable/t/interwork56.t-190-begin 101 Lillput,4,4,4,12
perl-5.32.0/dist/Storable/t/interwork56.t:191:M!`0$,3(S-`0$!`P"!`````HQ5&AI<R!F:6QE('=A<R!W<FET=&5N('=I=&@@
perl-5.32.0/dist/Storable/t/interwork56.t-192-M,2XP,30@;VX@<&5R;"`U+C`P-C`P,0H33&EL;'!U="!W87,@8V]R<F5C=`8"
perl-5.32.0/dist/Storable/t/interwork56.t:193:0````````@`H'5&AE($5N9```
perl-5.32.0/dist/Storable/t/interwork56.t-194-
##############################################
perl-5.32.0/dist/Storable/t/code.t-265- my $safe = new MySafe;
perl-5.32.0/dist/Storable/t/code.t:266: local $Storable::Eval = sub { $safe->reval($_[0]) };
perl-5.32.0/dist/Storable/t/code.t-267-
##############################################
perl-5.32.0/dist/Storable/t/file_magic.t-19- print " [\n";
perl-5.32.0/dist/Storable/t/file_magic.t:20: print " " . dump(substr(`cat $f`, 0, 32) . "...") , ",\n";
perl-5.32.0/dist/Storable/t/file_magic.t-21-
##############################################
perl-5.32.0/dist/Storable/t/malice.t-193- "byte order");
perl-5.32.0/dist/Storable/t/malice.t:194: $where = $file_magic + 3 + length $header->{byteorder};
perl-5.32.0/dist/Storable/t/malice.t-195- foreach (['intsize', "Integer"],
##############################################
perl-5.32.0/dist/Storable/t/malice.t-205- } else {
perl-5.32.0/dist/Storable/t/malice.t:206: $where = $file_magic + $network_magic;
perl-5.32.0/dist/Storable/t/malice.t-207- }
##############################################
perl-5.32.0/dist/Storable/t/freeze.t-89- 'SELECT table_name, table_owner, num_rows FROM iitables
perl-5.32.0/dist/Storable/t/freeze.t:90: where table_owner != \'$ingres\' and table_owner != \'DBA\''
perl-5.32.0/dist/Storable/t/freeze.t-91-];
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-267-begin 101 Locked hash
perl-5.32.0/dist/Storable/t/downgrade.t:268:8!049`0````$*!7)U;&5S!`````1P97)L
perl-5.32.0/dist/Storable/t/downgrade.t-269-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-277-begin 101 Locked keys
perl-5.32.0/dist/Storable/t/downgrade.t:278:8!049`0````$*!7)U;&5S``````1P97)L
perl-5.32.0/dist/Storable/t/downgrade.t-279-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-356-begin 101 Hash with utf8 flag but no utf8 keys
perl-5.32.0/dist/Storable/t/downgrade.t:357:8!049``````$*!7)U;&5S``````1P97)L
perl-5.32.0/dist/Storable/t/downgrade.t-358-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-385-begin 301 Locked hash
perl-5.32.0/dist/Storable/t/downgrade.t:386:8!049`0````$*!9FDDX6B!`````27A9F3
perl-5.32.0/dist/Storable/t/downgrade.t-387-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-395-begin 301 Locked keys
perl-5.32.0/dist/Storable/t/downgrade.t:396:8!049`0````$*!9FDDX6B``````27A9F3
perl-5.32.0/dist/Storable/t/downgrade.t-397-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-480-begin 301 Hash with utf8 flag but no utf8 keys
perl-5.32.0/dist/Storable/t/downgrade.t:481:8!049``````$*!9FDDX6B``````27A9F3
perl-5.32.0/dist/Storable/t/downgrade.t-482-
##############################################
perl-5.32.0/dist/Storable/t/downgrade.t-503-begin 301 Hash with utf8 keys for 5.6
perl-5.32.0/dist/Storable/t/downgrade.t:504:M!049``````0*!H.!HJ.3A0`````&@X&BHY.%"@>#B$>CA8&D``````>#B$>C
perl-5.32.0/dist/Storable/t/downgrade.t-505-FA8&D%P?B@XB3EHMS`@````;B@XB3EM\7!-QD<E4`````!-QD<E4`
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl-361-
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl:362: run_or_die(q{sed -i -e "s:\\*/\\*) finc=\\"-I\\`echo \\$file | sed 's#/\\[^/\\]\\*\\$##\\`\\" ;;:*/*) finc=\\"-I\\`echo \\$file | sed 's#/[^/]\\*\\$##'\\`\\" ;;:" makedepend.SH});
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl-363-
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl-468-+ sed '1,/^#include <\.\.\.>/d;/^End of search list/,$d;s/^ //'` ; do
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl:469:+ locincpth=`echo $locincpth | sed s!$incdir!!`
perl-5.32.0/dist/Devel-PPPort/devel/buildperl.pl-470-+ done
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/scanprov-55-# @provided is set to everthing provided
perl-5.32.0/dist/Devel-PPPort/devel/scanprov:56:my @provided = map { /^(\w+)/ ? $1 : () } `$^X ppport.h --list-provided`;
perl-5.32.0/dist/Devel-PPPort/devel/scanprov-57-
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/scanprov-201- # Get the hdr files associated with this version
perl-5.32.0/dist/Devel-PPPort/devel/scanprov:202: my $archlib = `$p->{path} -MConfig -l -e 'print \$Config{archlib}'`;
perl-5.32.0/dist/Devel-PPPort/devel/scanprov-203- chomp $archlib;
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl-58-
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl:59:my $fullperl = `which $opt{perl}`;
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl-60-chomp $fullperl;
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl-86-my %sym;
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl:87:for (`$Config{nm} $fullperl`) {
perl-5.32.0/dist/Devel-PPPort/devel/mktodo.pl-88- chomp;
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/mkppport_fnc.pl-76-
perl-5.32.0/dist/Devel-PPPort/devel/mkppport_fnc.pl:77:my @provided = map { /^(\w+)/ ? $1 : () } `$^X ppport.h --list-provided`;
perl-5.32.0/dist/Devel-PPPort/devel/mkppport_fnc.pl-78-
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/regenerate-89- my %provided = map { /^(\w+)/ ? ( $1 => 1 ) : () }
perl-5.32.0/dist/Devel-PPPort/devel/regenerate:90: `$blead ppport.h --list-provided`;
perl-5.32.0/dist/Devel-PPPort/devel/regenerate-91-
##############################################
perl-5.32.0/dist/Devel-PPPort/devel/devtools.pl-175- for (my $i = 0; $i < @perls; $i++) {
perl-5.32.0/dist/Devel-PPPort/devel/devtools.pl:176: my $version = `$perls[$i] -e 'print \$]'`;
perl-5.32.0/dist/Devel-PPPort/devel/devtools.pl-177- my $file = int_parse_version($version);
##############################################
perl-5.32.0/dist/Devel-PPPort/soak-117- $rep->vsay("\n Running [$cmd]");
perl-5.32.0/dist/Devel-PPPort/soak:118: my $output = `$cmd 2>&1`;
perl-5.32.0/dist/Devel-PPPort/soak-119- $output = "\n" unless defined $output;
##############################################
perl-5.32.0/dist/Devel-PPPort/soak-202- my $perl = shift;
perl-5.32.0/dist/Devel-PPPort/soak:203: my $ver = `$perl -e 'print \$]' 2>&1`;
perl-5.32.0/dist/Devel-PPPort/soak-204- return $? == 0 && $ver =~ /^\d+\.\d+/ && $ver >= 5 ? $ver : 0;
##############################################
perl-5.32.0/dist/Devel-PPPort/parts/inc/ppphtest-93- $run .= ' 2>&1' unless $isMAC;
perl-5.32.0/dist/Devel-PPPort/parts/inc/ppphtest:94: my @out = `$run`;
perl-5.32.0/dist/Devel-PPPort/parts/inc/ppphtest-95- my $out = join '', @out;
##############################################
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables-364-void
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables:365:PL_ppaddr(string)
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables-366- char *string
##############################################
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables-450-ok(defined &Devel::PPPort::PL_hints());
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables:451:is(&Devel::PPPort::PL_ppaddr("mhx"), "MHX");
perl-5.32.0/dist/Devel-PPPort/parts/inc/variables-452-
##############################################
perl-5.32.0/dist/Devel-PPPort/t/variables.t-65-ok(defined &Devel::PPPort::PL_hints());
perl-5.32.0/dist/Devel-PPPort/t/variables.t:66:is(&Devel::PPPort::PL_ppaddr("mhx"), "MHX");
perl-5.32.0/dist/Devel-PPPort/t/variables.t-67-
##############################################
perl-5.32.0/dist/Devel-PPPort/t/ppphtest.t-134- $run .= ' 2>&1' unless $isMAC;
perl-5.32.0/dist/Devel-PPPort/t/ppphtest.t:135: my @out = `$run`;
perl-5.32.0/dist/Devel-PPPort/t/ppphtest.t-136- my $out = join '', @out;
##############################################
perl-5.32.0/dist/Carp/lib/Carp.pm-20- # the proper API.
perl-5.32.0/dist/Carp/lib/Carp.pm:21: if(!defined($warnings::VERSION) || eval($warnings::VERSION) < 1.06) {
perl-5.32.0/dist/Carp/lib/Carp.pm-22- ${^WARNING_BITS} = "";
##############################################
perl-5.32.0/dist/Carp/lib/Carp.pm-97- "$]" >= 5.007_003 ?
perl-5.32.0/dist/Carp/lib/Carp.pm:98: eval(q(sub ($) {
perl-5.32.0/dist/Carp/lib/Carp.pm-99- my $u = utf8::native_to_unicode($_[0]);
##############################################
perl-5.32.0/dist/Carp/t/Carp.t-113-my $eval = "use Carp; return Carp::caller_info(0);";
perl-5.32.0/dist/Carp/t/Carp.t:114:my %info = eval($eval);
perl-5.32.0/dist/Carp/t/Carp.t-115-is( $info{sub_name}, "eval '$eval'", 'caller_info API' );
##############################################
perl-5.32.0/dist/Carp/t/Carp.t-377- my $package = 'XA';
perl-5.32.0/dist/Carp/t/Carp.t:378: my $where = $bodge_job == 1 ? ' in &main::__ANON__' : '';
perl-5.32.0/dist/Carp/t/Carp.t-379- my $warning
##############################################
perl-5.32.0/dist/threads/lib/threads.pm-977- my $msg = 'hello';
perl-5.32.0/dist/threads/lib/threads.pm:978: system("FOO=$msg; echo \$FOO"); # Outputs 'hello' to STDOUT
perl-5.32.0/dist/threads/lib/threads.pm-979-
##############################################
perl-5.32.0/dist/threads/t/libc.t-4-BEGIN {
perl-5.32.0/dist/threads/t/libc.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/libc.t-6-
##############################################
perl-5.32.0/dist/threads/t/kill3.t-4-BEGIN {
perl-5.32.0/dist/threads/t/kill3.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/kill3.t-6-
##############################################
perl-5.32.0/dist/threads/t/thread.t-4-BEGIN {
perl-5.32.0/dist/threads/t/thread.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/thread.t-6-
##############################################
perl-5.32.0/dist/threads/t/exit.t-4-BEGIN {
perl-5.32.0/dist/threads/t/exit.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/exit.t-6-
##############################################
perl-5.32.0/dist/threads/t/free.t-7- package Test;
perl-5.32.0/dist/threads/t/free.t:8: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/free.t-9- }
##############################################
perl-5.32.0/dist/threads/t/kill2.t-4-BEGIN {
perl-5.32.0/dist/threads/t/kill2.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/kill2.t-6-
##############################################
perl-5.32.0/dist/threads/t/free2.t-7- package Test;
perl-5.32.0/dist/threads/t/free2.t:8: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/free2.t-9- }
##############################################
perl-5.32.0/dist/threads/t/err.t-4-BEGIN {
perl-5.32.0/dist/threads/t/err.t:5: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads/t/err.t-6-
##############################################
perl-5.32.0/dist/PathTools/Cwd.pm-203-
perl-5.32.0/dist/PathTools/Cwd.pm:204: my $cwd = `$pwd_cmd`;
perl-5.32.0/dist/PathTools/Cwd.pm-205- # Belt-and-suspenders in case someone said "undef $/".
##############################################
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm-172- elsif ($] < 5.007) { # No ${^TAINT} before 5.8
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm:173: @dirlist = grep { !defined($_) || eval { eval('1'.substr $_,0,0) } }
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm-174- @dirlist;
##############################################
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm-189- $taint ? ! Scalar::Util::tainted($_) :
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm:190: $] < 5.007 ? eval { eval('1'.substr $_,0,0) } : 1
perl-5.32.0/dist/PathTools/lib/File/Spec/Unix.pm-191- } $self->rel2abs($tmpdir), $tmpdir;
##############################################
perl-5.32.0/dist/PathTools/t/cwd.t-94- my ($pwd_cmd_untainted) = $pwd_cmd =~ /^(.+)$/; # Untaint.
perl-5.32.0/dist/PathTools/t/cwd.t:95: chomp(my $start = `$pwd_cmd_untainted`);
perl-5.32.0/dist/PathTools/t/cwd.t-96-
##############################################
perl-5.32.0/dist/PathTools/t/taint.t-13- plan(
perl-5.32.0/dist/PathTools/t/taint.t:14: !eval { eval("1".substr($^X,0,0)) }
perl-5.32.0/dist/PathTools/t/taint.t-15- ? (tests => 21)
##############################################
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t-39-# command interpreter considers special, so we can't use the obvious
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t:40:# `$perl -le "print 'ok'"`. And, for portability, we can't use fork().
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t-41-sub sayok{
##############################################
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t-45- or die "Can't open scratch file rel2abs2rel$$.tmp -- $!\n";
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t:46: system($perl, "rel2abs2rel$$.pl");
perl-5.32.0/dist/PathTools/t/rel2abs2rel.t-47- open(STDOUT, '>&STDOUTDUP');
##############################################
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t-150- print "# $runperl \"-I$inlib\" $module--$$\n";
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t:151: ($output{$module} = `$runperl "-I$inlib" $module--$$`)
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t-152- =~ s/\'s foo//;
##############################################
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t-191- print "# $runperl \"-I$lib\" $module--$$\n";
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t:192: ($output{$module} = `$runperl "-I$lib" $module--$$`)
perl-5.32.0/dist/Devel-SelfStubber/t/Devel-SelfStubber.t-193- =~ s/\'s foo//;
##############################################
perl-5.32.0/dist/Term-ReadLine/lib/Term/ReadLine.pm-12- while ( defined ($_ = $term->readline($prompt)) ) {
perl-5.32.0/dist/Term-ReadLine/lib/Term/ReadLine.pm:13: my $res = eval($_);
perl-5.32.0/dist/Term-ReadLine/lib/Term/ReadLine.pm-14- warn $@ if $@;
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-321- ) = @_;
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:322: my ($ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-323- $h # resolved hash
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-423- or ($^O eq 'VMS'
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:424: and (`write sys\$output f\$privilege("SYSPRV")` =~ m/FALSE/))) {
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-425- return 0;
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-555- ) = @_;
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:556: my ($ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-557- $ret, # The return value
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-614- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:615: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-616- $timeout, # Seconds after which ping times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-675- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:676: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-677- $timeout # Seconds after which ping times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-876- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:877: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-878- $timeout # Seconds after which ping times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-898- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:899: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-900- $timeout # Seconds after which connect times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1148- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:1149: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1150- $timeout # Seconds after which ping times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1173- ) = @_;
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:1174: my $ip; # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1175- $host = $self->{host} unless defined $host;
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1252- my ($self,
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:1253: $ip, # Hash of addr (string), addr_in (packed), family
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1254- $timeout # Seconds after which ping times out
##############################################
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1853- if (defined($h{port}) && (($h{port} !~ /^\d{1,5}$/) || ($h{port} < 1) || ($h{port} > 65535))) {
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm:1854: croak("Invalid port `$h{port}' in `$name'");
perl-5.32.0/dist/Net-Ping/lib/Net/Ping.pm-1855- return undef;
##############################################
perl-5.32.0/dist/Net-Ping/t/500_ping_icmp.t-46- if ($is_devel and
perl-5.32.0/dist/Net-Ping/t/500_ping_icmp.t:47: system("sudo -n $env \"$^X\" $lib $file") == 0)
perl-5.32.0/dist/Net-Ping/t/500_ping_icmp.t-48- {
##############################################
perl-5.32.0/dist/Net-Ping/t/501_ping_icmpv6.t-37- if ($is_devel and
perl-5.32.0/dist/Net-Ping/t/501_ping_icmpv6.t:38: system("sudo -n $env \"$^X\" $lib $file") == 0) {
perl-5.32.0/dist/Net-Ping/t/501_ping_icmpv6.t-39- exit;
##############################################
perl-5.32.0/dist/Safe/Safe.pm-418- # wrap code ref $sub with _safe_call_sv so that, when called, the
perl-5.32.0/dist/Safe/Safe.pm:419: # execution will happen with the compartment fully 'in effect'.
perl-5.32.0/dist/Safe/Safe.pm-420-
##############################################
perl-5.32.0/dist/Safe/Safe.pm-483-
perl-5.32.0/dist/Safe/Safe.pm:484: $result = $compartment->reval($unsafe_code);
perl-5.32.0/dist/Safe/Safe.pm-485-
##############################################
perl-5.32.0/dist/Safe/t/safe1.t-43-
perl-5.32.0/dist/Safe/t/safe1.t:44: is($cpt->reval('$foo'), 9);
perl-5.32.0/dist/Safe/t/safe1.t:45: is($cpt->reval('$::foo'), 9, "check 'main' has been changed");
perl-5.32.0/dist/Safe/t/safe1.t:46: is($cpt->reval('$main::foo'), 9, "check 'main' has been changed");
perl-5.32.0/dist/Safe/t/safe1.t:47: is($cpt->reval('$test::foo'), undef,
perl-5.32.0/dist/Safe/t/safe1.t-48- "check we can't see our test package");
perl-5.32.0/dist/Safe/t/safe1.t:49: is($cpt->reval('${"test::foo"}'), undef,
perl-5.32.0/dist/Safe/t/safe1.t-50- "check we can't see our test package");
##############################################
perl-5.32.0/dist/Safe/t/safe1.t-52- $cpt->erase;
perl-5.32.0/dist/Safe/t/safe1.t:53: is($cpt->reval('$foo'), undef,
perl-5.32.0/dist/Safe/t/safe1.t-54- 'erasing the compartment deleted all variables');
##############################################
perl-5.32.0/dist/Safe/t/safe3.t-24-# Attempt to change the opmask from within the safe compartment
perl-5.32.0/dist/Safe/t/safe3.t:25:$safe->reval( qq{\$_[1] = qq/\0/ x } . $masksize );
perl-5.32.0/dist/Safe/t/safe3.t-26-
perl-5.32.0/dist/Safe/t/safe3.t-27-# Check that it didn't work
perl-5.32.0/dist/Safe/t/safe3.t:28:$safe->reval( q{$x + $y} );
perl-5.32.0/dist/Safe/t/safe3.t-29-# Written this way to keep the Test::More that comes with perl 5.6.2 happy
##############################################
perl-5.32.0/dist/Safe/t/safe3.t-41-$safe2->rdo('./nasty.pl');
perl-5.32.0/dist/Safe/t/safe3.t:42:$safe2->reval( q{$x + $y} );
perl-5.32.0/dist/Safe/t/safe3.t-43-# Written this way to keep the Test::More that comes with perl 5.6.2 happy
##############################################
perl-5.32.0/dist/Safe/t/safeload.t-35-# perl version in 5.10-.
perl-5.32.0/dist/Safe/t/safeload.t:36:ok !$c->reval(q{use 5.012; $undeclared; 1}),
perl-5.32.0/dist/Safe/t/safeload.t-37- 'reval does not prevent use 5.012 from enabling strict';
##############################################
perl-5.32.0/dist/Safe/t/safeops.t-50- $c->deny_only($op);
perl-5.32.0/dist/Safe/t/safeops.t:51: $c->reval($code);
perl-5.32.0/dist/Safe/t/safeops.t-52- like($@, qr/'\Q$opname\E' trapped by operation mask/, $op);
##############################################
perl-5.32.0/dist/Safe/t/safeutf8.t-30-
perl-5.32.0/dist/Safe/t/safeutf8.t:31:ok $safe->reval( $trigger ), 'trigger expression should return true';
perl-5.32.0/dist/Safe/t/safeutf8.t-32-is $@, '', 'trigger expression should not die';
##############################################
perl-5.32.0/dist/Safe/t/saferegexp.t-19-$c = new Safe;
perl-5.32.0/dist/Safe/t/saferegexp.t:20:$r = $c->reval($snippet);
perl-5.32.0/dist/Safe/t/saferegexp.t-21-is( $r, "Safe::Root0::Regexp" );
##############################################
perl-5.32.0/dist/Safe/t/saferegexp.t-25-# (where DESTROY has been cleaned up)
perl-5.32.0/dist/Safe/t/saferegexp.t:26:$r = $c->reval($snippet);
perl-5.32.0/dist/Safe/t/saferegexp.t-27-is( $r, "Safe::Root0::Regexp" );
##############################################
perl-5.32.0/dist/Safe/t/saferegexp.t-31-$c = new Safe;
perl-5.32.0/dist/Safe/t/saferegexp.t:32:$r = $c->reval($snippet);
perl-5.32.0/dist/Safe/t/saferegexp.t-33-is( $r, "Safe::Root1::Regexp" );
##############################################
perl-5.32.0/dist/Safe/t/safe2.t-114-++$test;
perl-5.32.0/dist/Safe/t/safe2.t:115:my $t_scalar = $cpt->reval("print wantarray ? 'not ok $test\n' : 'ok $test\n'");
perl-5.32.0/dist/Safe/t/safe2.t-116-++$test;
perl-5.32.0/dist/Safe/t/safe2.t:117:my @t_array = $cpt->reval("print wantarray ? 'ok $test\n' : 'not ok $test\n'; (2,3,4)");
perl-5.32.0/dist/Safe/t/safe2.t-118-$TB->current_test($test);
##############################################
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-103- # (this takes care of circular refs as well)
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:104: my $addr = refaddr($item);
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-105- if (exists($cloned->{$addr})) {
##############################################
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-146- # Special handling for $x = \$x
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:147: if ($addr == refaddr($$item)) {
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-148- $copy = \$copy;
##############################################
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-339-returns the variable's internal ID (similar to
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:340:C<refaddr()> (see L<Scalar::Util>). Otherwise, returns C<undef>.
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-341-
##############################################
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-600-
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:601:Using C<refaddr()> is unreliable for testing
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-602-whether or not two shared references are equivalent (e.g., when testing for
##############################################
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-609- # If ref is shared, use threads::shared's internal ID.
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:610: # Otherwise, use refaddr().
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:611: my $addr1 = is_shared($ref1) || refaddr($ref1);
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm:612: my $addr2 = is_shared($ref2) || refaddr($ref2);
perl-5.32.0/dist/threads-shared/lib/threads/shared.pm-613-
##############################################
perl-5.32.0/dist/threads-shared/t/waithires.t-7- package Test;
perl-5.32.0/dist/threads-shared/t/waithires.t:8: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads-shared/t/waithires.t-9- }
##############################################
perl-5.32.0/dist/threads-shared/t/wait.t-7- package Test;
perl-5.32.0/dist/threads-shared/t/wait.t:8: require($ENV{PERL_CORE} ? '../../t/test.pl' : './t/test.pl');
perl-5.32.0/dist/threads-shared/t/wait.t-9- }
##############################################
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-47-my $len = OS2::Prf::GetLength($ini,'aaa', 'bbb');
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:48:print( $len == 3 ? "ok 5\n" : "not ok 5# len: `$len' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-49-
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-50-my $val = OS2::Prf::Get($ini,'aaa', 'bbb');
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:51:print( $val eq 'xyz' ? "ok 6\n" : "not ok 6# val: `$val' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-52-
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-53-$val = OS2::Prf::Get($ini,'aaa', undef);
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:54:print( $val eq "bbb\0" ? "ok 7\n" : "not ok 7# val: `$val' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-55-
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-56-$val = OS2::Prf::Get($ini, undef, undef);
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:57:print( $val eq "aaa\0" ? "ok 8\n" : "not ok 8# val: `$val' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-58-
##############################################
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-62-$val = OS2::Prf::Get($ini, undef, undef);
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:63:print( (! defined $val) ? "ok 10\n" : "not ok 10# val: `$val' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-64-
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-65-$val = OS2::Prf::Get($ini,'aaa', undef);
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:66:print( (! defined $val) ? "ok 11\n" : "not ok 11# val: `$val' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-67-
##############################################
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-71-print( (defined $files) ? "ok 13\n" : "not ok 13# err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t:72:print( (@$files == 2) ? "ok 14\n" : "not ok 14# `@$files' err: `$^E'\n");
perl-5.32.0/os2/OS2/OS2-PrfDB/t/os2_prfdb.t-73-print "# `@$files'\n";
##############################################
perl-5.32.0/os2/OS2/OS2-REXX/DLL/DLL.pm-104- $err =~ s/\s+at\s+\S+\s+line\s+\S+\s*\z//;
perl-5.32.0/os2/OS2/OS2-REXX/DLL/DLL.pm:105: croak "Can't find symbol `$name' in DLL `$file': $err";
perl-5.32.0/os2/OS2/OS2-REXX/DLL/DLL.pm-106-}
##############################################
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_tiesql.test-32- my ($stmt) = stmt(@_);
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_tiesql.test:33: return 0 if $db2->SqlExec($stmt);
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_tiesql.test-34- return $sqlcode >= 0;
##############################################
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t-29- } else {
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t:30: print "not ok $n\n# `$name' => `$value'\n" ;
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t-31- }
##############################################
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t-33- print "ok $n\n" if $value eq sqrt(2);
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t:34: } else { print "not ok 7\n# name `$name', value `$value'\n" }
perl-5.32.0/os2/OS2/OS2-REXX/t/rx_varset.t-35- }
##############################################
perl-5.32.0/os2/OS2/OS2-Process/Process.pm-816- do { close($in2), ($out1 != $in2 and close($out1)),
perl-5.32.0/os2/OS2/OS2-Process/Process.pm:817: die "system $sysf, $^X: kid=$kpid, \$!=`$!', \$^E=`$^E'" }
perl-5.32.0/os2/OS2/OS2-Process/Process.pm-818- unless $kpid > 0 or $kpid == 0 and $opt{writepid};
##############################################
perl-5.32.0/os2/OS2/OS2-Process/Process.pm-1740-as $addr, and having the same memory flags as $addr. $flags is the value of
perl-5.32.0/os2/OS2/OS2-Process/Process.pm:1741:the memory flag of $addr (see docs of DosQueryMem(3) for details). If
perl-5.32.0/os2/OS2/OS2-Process/Process.pm-1742-optional argument $size_lim is given, the search is restricted to the region
##############################################
perl-5.32.0/os2/OS2/OS2-Process/Process.xs-684- croak("Cannot load SESMGR: no `%s'", buf);
perl-5.32.0/os2/OS2/OS2-Process/Process.xs:685: if (CheckOSError(DosQueryProcAddr(hdosc, 0, "DOSSMSETTITLE",
perl-5.32.0/os2/OS2/OS2-Process/Process.xs-686- (PFN*)&pDosSmSetTitle)))
##############################################
perl-5.32.0/os2/Makefile.SHs-13-
perl-5.32.0/os2/Makefile.SHs:14:dll_post="`echo $perl_fullversion | sum | sed -e 's/^0*//' | awk '{print $1}'`"
perl-5.32.0/os2/Makefile.SHs:15:dll_post="`printf '%x' $dll_post | tr '[a-z]' '[A-Z]'`"
perl-5.32.0/os2/Makefile.SHs-16-
##############################################
perl-5.32.0/os2/Makefile.SHs-19-for xxx in $aout_extra_static_ext; do
perl-5.32.0/os2/Makefile.SHs:20: aout_extra_dir=`echo "$xxx" | sed -e 's/::/\//g'`
perl-5.32.0/os2/Makefile.SHs:21: aout_extra_lib="lib/auto/$aout_extra_dir/"`basename "$aout_extra_dir"`
perl-5.32.0/os2/Makefile.SHs-22- aout_extra_libs="$aout_extra_libs$aout_extra_sep$aout_extra_lib$aout_lib_ext"
##############################################
perl-5.32.0/os2/Makefile.SHs-145-miniperl: $(perllib_objs) perl$(OBJ_EXT) miniperlmain$(OBJ_EXT) opmini$(OBJ_EXT)
perl-5.32.0/os2/Makefile.SHs:146: $(CC) $(CLDFLAGS) -o miniperl miniperlmain$(OBJ_EXT) perl$(OBJ_EXT) `echo $(perllib_objs)|sed -e 's/\bop\./opmini./g'` $(libs) -Zmap -Zlinker /map/PM:VIO
perl-5.32.0/os2/Makefile.SHs-147- @./miniperl -w -Ilib -MExporter -e '<?>' || $(MAKE) minitest
##############################################
perl-5.32.0/os2/Makefile.SHs-257-perl_$(EXE_EXT) perl_: $& miniperl_ aout_perlmain$(AOUT_OBJ_EXT) $(AOUT_LIBPERL) $(AOUT_DYNALOADER) $(aout_static_ext) ext.libs aout_extlist
perl-5.32.0/os2/Makefile.SHs:258: $(CC) $(AOUT_CLDFLAGS) $(CCDLFLAGS) $(OPTIMIZE) -o perl_ aout_perlmain$(AOUT_OBJ_EXT) `cat aout_extlist` $(AOUT_LIBPERL) `cat ext.libs` $(libs)
perl-5.32.0/os2/Makefile.SHs-259-
##############################################
perl-5.32.0/os2/Makefile.SHs-307- echo "LIBRARY 'perlrexx' INITINSTANCE TERMINSTANCE" > $@
perl-5.32.0/os2/Makefile.SHs:308: echo "DESCRIPTION '@#perl5-porters@perl.org:`miniperl -Ilib -MConfig -e 'print \$$]'`#@ REXX to Perl `miniperl -Ilib -MConfig -e 'print \$$Config{version}'` interface'" >> $@
perl-5.32.0/os2/Makefile.SHs-309- echo "EXPORTS" >> $@
##############################################
perl-5.32.0/os2/Makefile.SHs-452- # Remove the leading component ext/
perl-5.32.0/os2/Makefile.SHs:453: dd=`dirname $d`
perl-5.32.0/os2/Makefile.SHs:454: pp=`basename $dd`
perl-5.32.0/os2/Makefile.SHs:455: p=$pp/`basename $d`
perl-5.32.0/os2/Makefile.SHs-456- $spitshell >>Makefile <<!GROK!THIS!
##############################################
perl-5.32.0/os2/Makefile.SHs-469-do
perl-5.32.0/os2/Makefile.SHs:470: p=`basename $d`
perl-5.32.0/os2/Makefile.SHs-471- $spitshell >>Makefile <<!GROK!THIS!
##############################################
perl-5.32.0/os2/dl_os2.c-65-/* {&doscalls_handle, NULL, 360}, */ /* DosQueryModFromEIP */
perl-5.32.0/os2/dl_os2.c:66: rc = DosQueryProcAddr(doscalls_h, 360, 0, (PFN*)&pDosQueryModFromEIP);
perl-5.32.0/os2/dl_os2.c-67- if (rc)
##############################################
perl-5.32.0/os2/dl_os2.c-151- fail[0] = 0;
perl-5.32.0/os2/dl_os2.c:152: rc = DosQueryProcAddr((HMODULE)handle, 0, symbol, &addr);
perl-5.32.0/os2/dl_os2.c-153- if (rc == 0) {
##############################################
perl-5.32.0/os2/os2.c-718- return 0; /* Possible with FAIL==0 only */
perl-5.32.0/os2/os2.c:719: if (CheckOSError(DosQueryProcAddr(loadOrdinals[ord].dll->handle,
perl-5.32.0/os2/os2.c-720- loadOrdinals[ord].entrypoint,
##############################################
perl-5.32.0/regen/reentr.pl-938- /* socklen_t is what Posix 2001 says this should be */
perl-5.32.0/regen/reentr.pl:939: retptr = gethostbyaddr(host_addr, (socklen_t) asize, anint); break;
perl-5.32.0/regen/reentr.pl-940- case KEY_gethostbyname:
##############################################
perl-5.32.0/regen/reentr.pl-1008- anint = va_arg(ap, int);
perl-5.32.0/regen/reentr.pl:1009: retptr = getnetbyaddr(net, anint); break;
perl-5.32.0/regen/reentr.pl-1010- case KEY_getnetbyname:
##############################################
perl-5.32.0/regen/mph.pl-407- my @tests= sort keys %$tests_hash;
perl-5.32.0/regen/mph.pl:408: print $ofh "\@res=`./mph_test '$tests[0]/should-not-match' 'should-not-match/$tests[0]'`;\n";
perl-5.32.0/regen/mph.pl-409- print $ofh "ok( \$res[0] =~ /got: 0/,'proper prefix does not match');\n";
##############################################
perl-5.32.0/regen/mph.pl-413- my $batch_args= join " ", map { "'$_'" } @batch;
perl-5.32.0/regen/mph.pl:414: print $ofh "\@res=`./mph_test $batch_args`;\n";
perl-5.32.0/regen/mph.pl-415- foreach my $i (0..$#batch) {
##############################################
perl-5.32.0/regen/mk_invlists.pl-712- # enum exception list
perl-5.32.0/regen/mk_invlists.pl:713: my $where = (exists $where_to_define_enums{$name})
perl-5.32.0/regen/mk_invlists.pl-714- ? $where_to_define_enums{$name}
##############################################
perl-5.32.0/regen/uconfig_h.pl-22-my $command = 'sh ./config_h.SH';
perl-5.32.0/regen/uconfig_h.pl:23:system $command and die "`$command` failed, \$?=$?";
perl-5.32.0/regen/uconfig_h.pl-24-
##############################################
perl-5.32.0/regcomp.c-9170-
perl-5.32.0/regcomp.c:9171: bool* offset = get_invlist_offset_addr(invlist);
perl-5.32.0/regcomp.c-9172- UV* zero_addr = (UV *) SvPVX(invlist);
##############################################
perl-5.32.0/regcomp.c-9194- const UV src_len = _invlist_len(src);
perl-5.32.0/regcomp.c:9195: const bool src_offset = *get_invlist_offset_addr(src);
perl-5.32.0/regcomp.c-9196- const STRLEN src_byte_len = SvLEN(src);
##############################################
perl-5.32.0/regcomp.c-9225- /* Finish up copying over the other fields in an inversion list */
perl-5.32.0/regcomp.c:9226: *get_invlist_offset_addr(dest) = src_offset;
perl-5.32.0/regcomp.c-9227- invlist_set_len(dest, src_len, src_offset);
perl-5.32.0/regcomp.c:9228: *get_invlist_previous_index_addr(dest) = 0;
perl-5.32.0/regcomp.c-9229- invlist_iterfinish(dest);
##############################################
perl-5.32.0/regcomp.c-9232-PERL_STATIC_INLINE IV*
perl-5.32.0/regcomp.c:9233:S_get_invlist_previous_index_addr(SV* invlist)
perl-5.32.0/regcomp.c-9234-{
##############################################
perl-5.32.0/regcomp.c-9250-
perl-5.32.0/regcomp.c:9251: return *get_invlist_previous_index_addr(invlist);
perl-5.32.0/regcomp.c-9252-}
##############################################
perl-5.32.0/regcomp.c-9262-
perl-5.32.0/regcomp.c:9263: *get_invlist_previous_index_addr(invlist) = index;
perl-5.32.0/regcomp.c-9264-}
##############################################
perl-5.32.0/regcomp.c-9299-
perl-5.32.0/regcomp.c:9300: return *(get_invlist_iter_addr(invlist)) < (STRLEN) UV_MAX;
perl-5.32.0/regcomp.c-9301-}
##############################################
perl-5.32.0/regcomp.c-9334-
perl-5.32.0/regcomp.c:9335: *get_invlist_previous_index_addr(invlist) = 0;
perl-5.32.0/regcomp.c-9336- SvPOK_on(invlist); /* This allows B to extract the PV */
##############################################
perl-5.32.0/regcomp.c-9397-
perl-5.32.0/regcomp.c:9398: *(get_invlist_offset_addr(invlist)) = offset;
perl-5.32.0/regcomp.c-9399-
##############################################
perl-5.32.0/regcomp.c-9455- * extended range. */
perl-5.32.0/regcomp.c:9456: offset = *get_invlist_offset_addr(invlist);
perl-5.32.0/regcomp.c-9457- if (array[final_element] == start) {
##############################################
perl-5.32.0/regcomp.c-9851- if (len_u != _invlist_len(u)) {
perl-5.32.0/regcomp.c:9852: invlist_set_len(u, len_u, *get_invlist_offset_addr(u));
perl-5.32.0/regcomp.c-9853- invlist_trim(u);
##############################################
perl-5.32.0/regcomp.c-10085- if (len_r != _invlist_len(r)) {
perl-5.32.0/regcomp.c:10086: invlist_set_len(r, len_r, *get_invlist_offset_addr(r));
perl-5.32.0/regcomp.c-10087- invlist_trim(r);
##############################################
perl-5.32.0/regcomp.c-10273- len - 2,
perl-5.32.0/regcomp.c:10274: *(get_invlist_offset_addr(invlist)));
perl-5.32.0/regcomp.c-10275- return invlist;
##############################################
perl-5.32.0/regcomp.c-10309- if (UNLIKELY(end == UV_MAX)) {
perl-5.32.0/regcomp.c:10310: invlist_set_len(invlist, i_s + 1, *(get_invlist_offset_addr(invlist)));
perl-5.32.0/regcomp.c-10311- return invlist;
##############################################
perl-5.32.0/regcomp.c-10354- array[i_e+2] = end + 1;
perl-5.32.0/regcomp.c:10355: invlist_set_len(invlist, len + 2, *(get_invlist_offset_addr(invlist)));
perl-5.32.0/regcomp.c-10356- return invlist;
##############################################
perl-5.32.0/regcomp.c-10365- len - i_e + i_s,
perl-5.32.0/regcomp.c:10366: *(get_invlist_offset_addr(invlist)));
perl-5.32.0/regcomp.c-10367-
##############################################
perl-5.32.0/regcomp.c-10392- invlist = add_cp_to_invlist(invlist, element0);
perl-5.32.0/regcomp.c:10393: offset = *get_invlist_offset_addr(invlist);
perl-5.32.0/regcomp.c-10394-
##############################################
perl-5.32.0/regcomp.c-10419-
perl-5.32.0/regcomp.c:10420: *get_invlist_offset_addr(invlist) = ! *get_invlist_offset_addr(invlist);
perl-5.32.0/regcomp.c-10421-}
##############################################
perl-5.32.0/regcomp.c-10430- const STRLEN physical_length = SvCUR(invlist);
perl-5.32.0/regcomp.c:10431: const bool offset = *(get_invlist_offset_addr(invlist));
perl-5.32.0/regcomp.c-10432-
##############################################
perl-5.32.0/regcomp.c-10442-
perl-5.32.0/regcomp.c:10443: *(get_invlist_offset_addr(new_invlist)) = offset;
perl-5.32.0/regcomp.c-10444- invlist_set_len(new_invlist, nominal_length, offset);
##############################################
perl-5.32.0/make_patchnum.pl-94- if (wantarray) {
perl-5.32.0/make_patchnum.pl:95: my @result= `$subcd $command`;
perl-5.32.0/make_patchnum.pl-96- #warn "$subcd $command: \$?=$?\n" if $?;
##############################################
perl-5.32.0/make_patchnum.pl-100- } else {
perl-5.32.0/make_patchnum.pl:101: my $result= `$subcd $command`;
perl-5.32.0/make_patchnum.pl-102- $result="" if ! defined $result;
##############################################
perl-5.32.0/installhtml-126- --htmldir - directory to store resulting html files in relative
perl-5.32.0/installhtml:127: to the filesystem (\$podroot/html by default).
perl-5.32.0/installhtml-128- --htmlroot - http-server base directory from which all relative paths
##############################################
perl-5.32.0/installhtml-390- unless -f $splitter;
perl-5.32.0/installhtml:391: system($perl, $splitter, "../$filename") &&
perl-5.32.0/installhtml-392- warn "$0: error running '$splitter ../$filename'"
##############################################
perl-5.32.0/util.h-103-
perl-5.32.0/util.h:104: /* We could use Dl_info (as used by dladdr()) for many of these but
perl-5.32.0/util.h-105- * that would be naughty towards non-dlfcn systems (hi there, Win32). */
##############################################
perl-5.32.0/util.h-132-
perl-5.32.0/util.h:133: /* Win32 notes: as moral equivalents of backtrace() + dladdr(),
perl-5.32.0/util.h-134- * one could possibly first use GetCurrentProcess() +
perl-5.32.0/util.h-135- * SymInitialize(), and then CaptureStackBackTrace() +
perl-5.32.0/util.h:136: * SymFromAddr(). */
perl-5.32.0/util.h-137-
##############################################
perl-5.32.0/util.h-145- * Note, however, that on some platforms (e.g. OSX + clang (cc))
perl-5.32.0/util.h:146: * backtrace() + dladdr() works fine without -g. */
perl-5.32.0/util.h-147-
##############################################
perl-5.32.0/Cross/cflags-cross-arm-44-
perl-5.32.0/Cross/cflags-cross-arm:45:set `echo "$* " | sed -e 's/\.[oc] / /g' -e "s/\.${CROSS_NAME}o / /g" -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
perl-5.32.0/Cross/cflags-cross-arm-46-
##############################################
perl-5.32.0/Cross/cflags-cross-arm-121- do
perl-5.32.0/Cross/cflags-cross-arm:122: ccflags=`echo $ccflags|sed 's/$f/ /'`
perl-5.32.0/Cross/cflags-cross-arm-123- done
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-28-case "$0" in
perl-5.32.0/Cross/Makefile-cross-SH:29:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/Cross/Makefile-cross-SH-30-esac
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-88- shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
perl-5.32.0/Cross/Makefile-cross-SH:89: linklibperl="-L $archlibexp/CORE -L `pwd | sed 's/\/UU$//'` -lperl"
perl-5.32.0/Cross/Makefile-cross-SH-90- ;;
perl-5.32.0/Cross/Makefile-cross-SH-91- hpux*)
perl-5.32.0/Cross/Makefile-cross-SH:92: linklibperl="-L `pwd | sed 's/\/UU$//'` -Wl,+s -Wl,+b$archlibexp/CORE -lperl"
perl-5.32.0/Cross/Makefile-cross-SH-93- ;;
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-111- # Strip off any trailing :'s
perl-5.32.0/Cross/Makefile-cross-SH:112: ldlibpth=`echo $ldlibpth | sed 's/:*$//'`
perl-5.32.0/Cross/Makefile-cross-SH-113- ;;
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-117- # Protect any spaces
perl-5.32.0/Cross/Makefile-cross-SH:118: *" "*) ldlibpth=`echo $ldlibpth|sed 's/ /\\\\ /g'` ;;
perl-5.32.0/Cross/Makefile-cross-SH-119- esac
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-157- : the dependency named here will never exist
perl-5.32.0/Cross/Makefile-cross-SH:158: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Cross/Makefile-cross-SH-159- this_target="lib/auto/$f/$base.$dlext"
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-172-for f in $static_ext; do
perl-5.32.0/Cross/Makefile-cross-SH:173: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Cross/Makefile-cross-SH-174- static_list="$static_list lib/auto/$f/$base\$(LIB_EXT)"
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-178-for f in $nonxs_ext; do
perl-5.32.0/Cross/Makefile-cross-SH:179: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Cross/Makefile-cross-SH-180- nonxs_list="$nonxs_list ext/$f/pm_to_blib"
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-313-
perl-5.32.0/Cross/Makefile-cross-SH:314:CCCMD = \`sh \$(shellflags) cflags-cross-${CROSS_NAME} "optimize='\$(OPTIMIZE)'" \$@\`
perl-5.32.0/Cross/Makefile-cross-SH-315-
perl-5.32.0/Cross/Makefile-cross-SH:316:CCCMDSRC = \`sh \$(shellflags) cflags-cross-${CROSS_NAME} "optimize='\$(OPTIMIZE)'" \$<\`
perl-5.32.0/Cross/Makefile-cross-SH-317-
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-503-# extensions *after* Perl has been built and installed)
perl-5.32.0/Cross/Makefile-cross-SH:504:CCDLFLAGS = `echo $ccdlflags|sed -e 's@-bE:.*/perl\.exp@-bE:perl.exp@'`
perl-5.32.0/Cross/Makefile-cross-SH-505-
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-750- -@for x in `grep -l '^=[a-z]' README.* | grep -v README.vms` ; do \
perl-5.32.0/Cross/Makefile-cross-SH:751: nx=`echo $$x | sed -e "s/README\.//"`; \
perl-5.32.0/Cross/Makefile-cross-SH-752- cd pod ; $(LNS) ../$$x "perl"$$nx".pod" ; cd .. ; \
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-760-extras.make: perl$(EXE_EXT)
perl-5.32.0/Cross/Makefile-cross-SH:761: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(LDLIBPTH) ./perl -Ilib -MCPAN -e '@ARGV&&make(@ARGV)' `cat extras.lst`
perl-5.32.0/Cross/Makefile-cross-SH-762-
perl-5.32.0/Cross/Makefile-cross-SH-763-extras.test: perl$(EXE_EXT)
perl-5.32.0/Cross/Makefile-cross-SH:764: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(LDLIBPTH) ./perl -Ilib -MCPAN -e '@ARGV&&test(@ARGV)' `cat extras.lst`
perl-5.32.0/Cross/Makefile-cross-SH-765-
perl-5.32.0/Cross/Makefile-cross-SH-766-extras.install: perl$(EXE_EXT)
perl-5.32.0/Cross/Makefile-cross-SH:767: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(LDLIBPTH) ./perl -Ilib -MCPAN -e '@ARGV&&install(@ARGV)' `cat extras.lst`
perl-5.32.0/Cross/Makefile-cross-SH-768-
##############################################
perl-5.32.0/Cross/Makefile-cross-SH-922-printconfig:
perl-5.32.0/Cross/Makefile-cross-SH:923: @eval `$(LDLIBPTH) ./perl -Ilib -V:$(CONFIGVAR)`; echo $$$(CONFIGVAR)
perl-5.32.0/Cross/Makefile-cross-SH-924-
##############################################
perl-5.32.0/Cross/generate_config_sh-74- if ($ENV{$envvar}) {
perl-5.32.0/Cross/generate_config_sh:75: my $rawtext = `$callbacks->{$key}->[1][1]`;
perl-5.32.0/Cross/generate_config_sh-76- chomp($rawtext);
##############################################
perl-5.32.0/Cross/installperl.patch-17- }
perl-5.32.0/Cross/installperl.patch:18:- system("strip", @opts, $file);
perl-5.32.0/Cross/installperl.patch:19:+ system("XXSTRIPXX-strip", @opts, $file);
perl-5.32.0/Cross/installperl.patch-20- } else {
##############################################
perl-5.32.0/Cross/Makefile.SH.patch-62- $(CC) -o miniperl $(CLDFLAGS) \
perl-5.32.0/Cross/Makefile.SH.patch:63: `echo $(obj) | sed 's/ op$(OBJ_EXT) / /'` \
perl-5.32.0/Cross/Makefile.SH.patch-64- miniperlmain$(OBJ_EXT) opmini$(OBJ_EXT) perl$(OBJ_EXT) $(libs)
##############################################
perl-5.32.0/Cross/Makefile.SH.patch-71- miniperl: $& miniperlmain$(OBJ_EXT) $(LIBPERL) opmini$(OBJ_EXT)
perl-5.32.0/Cross/Makefile.SH.patch:72: $(CC) -o miniperl `echo $(obj) | sed 's/ op$(OBJ_EXT) / /'` \
perl-5.32.0/Cross/Makefile.SH.patch-73- miniperlmain$(OBJ_EXT) opmini$(OBJ_EXT) perl$(OBJ_EXT) $(libs)
##############################################
perl-5.32.0/myconfig.SH-19-case "$0" in
perl-5.32.0/myconfig.SH:20:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/myconfig.SH-21-esac
##############################################
perl-5.32.0/iperlsys.h-1297- (*PL_Sock->pEndservent)(PL_Sock)
perl-5.32.0/iperlsys.h:1298:#define PerlSock_gethostbyaddr(a, l, t) \
perl-5.32.0/iperlsys.h-1299- (*PL_Sock->pGethostbyaddr)(PL_Sock, a, l, t)
##############################################
perl-5.32.0/iperlsys.h-1305- (*PL_Sock->pGethostname)(PL_Sock, n, l)
perl-5.32.0/iperlsys.h:1306:#define PerlSock_getnetbyaddr(n, t) \
perl-5.32.0/iperlsys.h-1307- (*PL_Sock->pGetnetbyaddr)(PL_Sock, n, t)
##############################################
perl-5.32.0/iperlsys.h-1329- (*PL_Sock->pGetsockopt)(PL_Sock, s, l, n, v, i)
perl-5.32.0/iperlsys.h:1330:#define PerlSock_inet_addr(c) \
perl-5.32.0/iperlsys.h-1331- (*PL_Sock->pInetAddr)(PL_Sock, c)
##############################################
perl-5.32.0/iperlsys.h-1377-
perl-5.32.0/iperlsys.h:1378:#define PerlSock_gethostbyaddr(a, l, t) gethostbyaddr(a, l, t)
perl-5.32.0/iperlsys.h-1379-#define PerlSock_gethostbyname(n) gethostbyname(n)
##############################################
perl-5.32.0/iperlsys.h-1383-
perl-5.32.0/iperlsys.h:1384:#define PerlSock_getnetbyaddr(n, t) getnetbyaddr(n, t)
perl-5.32.0/iperlsys.h-1385-#define PerlSock_getnetbyname(n) getnetbyname(n)
##############################################
perl-5.32.0/iperlsys.h-1401-#define PerlSock_getsockopt(s,l,n,v,i) getsockopt(s, l, n, v, i)
perl-5.32.0/iperlsys.h:1402:#define PerlSock_inet_addr(c) inet_addr(c)
perl-5.32.0/iperlsys.h-1403-#define PerlSock_inet_ntoa(i) inet_ntoa(i)
##############################################
perl-5.32.0/Policy_sh.SH-165- # Can we assume all sed's have greedy matching?
perl-5.32.0/Policy_sh.SH:166: man1ext) dflt=`echo $man1dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
perl-5.32.0/Policy_sh.SH:167: man3ext) dflt=`echo $man3dir | sed -e 's!.*man!!' -e 's!^\.!!'` ;;
perl-5.32.0/Policy_sh.SH-168-
##############################################
perl-5.32.0/autodoc.pl-202-
perl-5.32.0/autodoc.pl:203: my $inline_where = $flags =~ /A/ ? 'api' : 'guts';
perl-5.32.0/autodoc.pl-204-
##############################################
perl-5.32.0/symbian/makesis.pl-198-
perl-5.32.0/symbian/makesis.pl:199: system("makesis $pkg") == 0
perl-5.32.0/symbian/makesis.pl-200- || die "$0: makesis $pkg failed: $!\n";
##############################################
perl-5.32.0/symbian/sisify.pl-161- my $dir = dirname($file);
perl-5.32.0/symbian/sisify.pl:162: do_system("mkdir $tempdir\\$dir") unless $dir eq '.';
perl-5.32.0/symbian/sisify.pl:163: do_system("copy $file $tempdir");
perl-5.32.0/symbian/sisify.pl-164-}
perl-5.32.0/symbian/sisify.pl-165-if (@SisPl) {
perl-5.32.0/symbian/sisify.pl:166: do_system("copy $SisPl[0] $tempdir\\default.pl")
perl-5.32.0/symbian/sisify.pl-167- unless $SisPl[0] eq "default.pl";
##############################################
perl-5.32.0/symbian/sisify.pl-170- print "[copying directory '$dir']\n" if $Debug;
perl-5.32.0/symbian/sisify.pl:171: do_system("copy $dir $tempdir");
perl-5.32.0/symbian/sisify.pl-172-}
##############################################
perl-5.32.0/symbian/sisify.pl-324- do_system("dir");
perl-5.32.0/symbian/sisify.pl:325: do_system("makesis $fn");
perl-5.32.0/symbian/sisify.pl-326- unless (-f $sis) {
##############################################
perl-5.32.0/symbian/sisify.pl-328- }
perl-5.32.0/symbian/sisify.pl:329: do_system("copy $AppName.sis $OWD");
perl-5.32.0/symbian/sisify.pl-330- chdir($OWD);
perl-5.32.0/symbian/sisify.pl:331: system("dir $sis");
perl-5.32.0/symbian/sisify.pl-332- print "\n=== Now transfer $sis to your device ===\n";
##############################################
perl-5.32.0/symbian/xsbuild.pl-152- print "xsbuild: ", $cmd, "\n";
perl-5.32.0/symbian/xsbuild.pl:153: return system($cmd);
perl-5.32.0/symbian/xsbuild.pl-154-}
##############################################
perl-5.32.0/perlapi.h-172-#undef PL_ppaddr
perl-5.32.0/perlapi.h:173:#define PL_ppaddr (*Perl_Gppaddr_ptr(NULL))
perl-5.32.0/perlapi.h-174-#undef PL_sh_path
##############################################
perl-5.32.0/proto.h-1150-
perl-5.32.0/proto.h:1151:PERL_CALLCONV PPADDR_t* Perl_get_ppaddr(pTHX)
perl-5.32.0/proto.h-1152- __attribute__warn_unused_result__
##############################################
perl-5.32.0/proto.h-4304-#ifndef PERL_NO_INLINE_FUNCTIONS
perl-5.32.0/proto.h:4305:PERL_STATIC_INLINE IV* S_get_invlist_previous_index_addr(SV* invlist)
perl-5.32.0/proto.h-4306- __attribute__warn_unused_result__;
##############################################
perl-5.32.0/proto.h-6030-#ifndef PERL_NO_INLINE_FUNCTIONS
perl-5.32.0/proto.h:6031:PERL_STATIC_INLINE STRLEN* S_get_invlist_iter_addr(SV* invlist)
perl-5.32.0/proto.h-6032- __attribute__warn_unused_result__;
##############################################
perl-5.32.0/proto.h-6102-#ifndef PERL_NO_INLINE_FUNCTIONS
perl-5.32.0/proto.h:6103:PERL_STATIC_INLINE bool* S_get_invlist_offset_addr(SV* invlist)
perl-5.32.0/proto.h-6104- __attribute__warn_unused_result__;
##############################################
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm-897-
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm:898: my( $eval_result, $eval_error ) = _eval($code);
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm-899- my $ok = $tb->ok( $eval_result, "require $module;" );
##############################################
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm-1008-
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm:1009: my ($eval_result, $eval_error) = _eval($code, \@imports, $warn);
perl-5.32.0/cpan/Test-Simple/lib/Test/More.pm-1010- my $ok = $tb->ok( $eval_result, "use $module;" );
##############################################
perl-5.32.0/cpan/Test-Simple/t/Legacy/exit.t-99- my $file = File::Spec->catfile($lib, $test_name);
perl-5.32.0/cpan/Test-Simple/t/Legacy/exit.t:100: my $wait_stat = system(qq{$Perl -"I../blib/lib" -"I../lib" -"I../t/lib" $file});
perl-5.32.0/cpan/Test-Simple/t/Legacy/exit.t-101- my $actual_exit = exitstatus($wait_stat);
##############################################
perl-5.32.0/cpan/Memoize/Memoize.pm-127- } else {
perl-5.32.0/cpan/Memoize/Memoize.pm:128: croak "Unrecognized option to `${context}_CACHE': `$cache_opt' should be one of (@CONTEXT_TAGS); aborting";
perl-5.32.0/cpan/Memoize/Memoize.pm-129- }
##############################################
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm-308- ) {
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm:309: return `$cmd 2>&1`;
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm-310- }
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm-311- else {
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm:312: return `$cmd`;
perl-5.32.0/cpan/ExtUtils-Install/t/lib/MakeMaker/Test/Utils.pm-313- }
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-126- my $core = $ENV{PERL_CORE} ? ' PERL_CORE=1' : '';
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:127: my @perlout = `$perl Makefile.PL $core`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-128- if ($?) {
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-175- print "# make = '$make'\n";
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:176: @makeout = `$make`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-177- if ($?) {
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-192- print "# make = '$makeperl'\n";
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:193: @makeout = `$makeperl`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-194- if ($?) {
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-206-
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:207: @makeout = `$maketest`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-208-
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-238- close XS; close REGENTMP;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:239: $regen = `$perl regentmp`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-240- unlink 'regentmp';
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-242- else {
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:243: $regen = `$perl -x $package.xs`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-244- }
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-268- print "# make = '$makeclean'\n";
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:269: @makeout = `$makeclean`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-270- if ($?) {
##############################################
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-287- print "# make = '$makedistclean'\n";
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t:288: @makeout = `$makedistclean`;
perl-5.32.0/cpan/ExtUtils-Constant/t/Constant.t-289- if ($?) {
##############################################
perl-5.32.0/cpan/Digest-MD5/hints/irix_6.pl-3-
perl-5.32.0/cpan/Digest-MD5/hints/irix_6.pl:4:if ($Config{cc} =~ /64|n32/ && `$Config{cc} -version 2>&1` =~ /\s7\.1/) {
perl-5.32.0/cpan/Digest-MD5/hints/irix_6.pl-5- $self->{OPTIMIZE} = "-O1";
##############################################
perl-5.32.0/cpan/Digest-MD5/t/md5-aaa.t-32-#
perl-5.32.0/cpan/Digest-MD5/t/md5-aaa.t:33:# perl -e 'for (1..256) { system("md5sum --string=" . ("a" x $_)); }'
perl-5.32.0/cpan/Digest-MD5/t/md5-aaa.t-34-#
##############################################
perl-5.32.0/cpan/Socket/Socket.pm-630-This function performs the work of the legacy functions unpack_sockaddr_in(),
perl-5.32.0/cpan/Socket/Socket.pm:631:inet_ntoa(), gethostbyaddr() and getservbyport().
perl-5.32.0/cpan/Socket/Socket.pm-632-
##############################################
perl-5.32.0/cpan/Socket/Socket.pm-1053- my @ret;
perl-5.32.0/cpan/Socket/Socket.pm:1054: foreach my $addr ( @addrs ) {
perl-5.32.0/cpan/Socket/Socket.pm-1055- foreach my $portspec ( @ports ) {
##############################################
perl-5.32.0/cpan/Socket/Socket.pm-1107- else {
perl-5.32.0/cpan/Socket/Socket.pm:1108: $node = gethostbyaddr( $inetaddr, $family );
perl-5.32.0/cpan/Socket/Socket.pm-1109- if( !defined $node ) {
##############################################
perl-5.32.0/cpan/Socket/Socket.xs-468-* Bad Assumption 1: struct in_addr has no other fields
perl-5.32.0/cpan/Socket/Socket.xs:469:* than the s_addr (which is the field we care about
perl-5.32.0/cpan/Socket/Socket.xs-470-* in here, really). However, we can be fed either 4-byte
##############################################
perl-5.32.0/cpan/Socket/t/socketpair.t-40- sleep 1; # wait a little, it might have worked after all
perl-5.32.0/cpan/Socket/t/socketpair.t:41: system( "/bin/kill -f $parent; echo die $parent" );
perl-5.32.0/cpan/Socket/t/socketpair.t-42- }
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-27- # also test that new() still works normally
perl-5.32.0/cpan/Math-BigInt/t/trap.t:28: eval ("\$x = \$class->new('42'); \$x->bnan();");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-29- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-39-
perl-5.32.0/cpan/Math-BigInt/t/trap.t:40: eval ("\$x = \$class->new('4711'); \$x->binf();");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-41- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-43-
perl-5.32.0/cpan/Math-BigInt/t/trap.t:44: eval ("\$x = \$class->new('inf');");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-45- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-47-
perl-5.32.0/cpan/Math-BigInt/t/trap.t:48: eval ("\$x = \$class->new('-inf');");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-49- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-52- # +$x/0 => +inf
perl-5.32.0/cpan/Math-BigInt/t/trap.t:53: eval ("\$x = \$class->new('4711'); \$x->bdiv(0);");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-54- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-57- # -$x/0 => -inf
perl-5.32.0/cpan/Math-BigInt/t/trap.t:58: eval ("\$x = \$class->new('-0815'); \$x->bdiv(0);");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-59- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-63- # 0/0 => NaN
perl-5.32.0/cpan/Math-BigInt/t/trap.t:64: eval ("\$x = \$class->new('0'); \$x->bdiv(0);");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-65- like($@, qr/^Tried to create/, 'died');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-72-$x = Math::BigInt->new(2);
perl-5.32.0/cpan/Math-BigInt/t/trap.t:73:eval ("\$x = \$mbi->new('0.1');");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-74-is($x, 2, 'never modified since it dies');
perl-5.32.0/cpan/Math-BigInt/t/trap.t:75:eval ("\$x = \$mbi->new('0a.1');");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-76-is($x, 2, 'never modified since it dies');
##############################################
perl-5.32.0/cpan/Math-BigInt/t/trap.t-81-$x = Math::BigFloat->new(2);
perl-5.32.0/cpan/Math-BigInt/t/trap.t:82:eval ("\$x = \$mbf->new('0.1a');");
perl-5.32.0/cpan/Math-BigInt/t/trap.t-83-is($x, 2, 'never modified since it dies');
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-396- if( defined $arg->{$host} ) {
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:397: ( $arg->{$host}, my $s ) = $self->split_addr( $arg->{$host} );
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-398- # IO::Socket::INET compat - *Host parsed port always takes precedence
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-975-BEGIN {
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:976: if( eval($IO::Socket::VERSION) < 1.35 ) {
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-977- *socktype = sub {
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1109-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1110:=head2 ( $host, $port ) = IO::Socket::IP->split_addr( $addr )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1111-
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1116-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1117: IO::Socket::IP->split_addr( "hostname:http" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1118- # ( "hostname", "http" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1119-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1120: IO::Socket::IP->split_addr( "192.0.2.1:80" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1121- # ( "192.0.2.1", "80" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1122-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1123: IO::Socket::IP->split_addr( "[2001:db8::1]:80" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1124- # ( "2001:db8::1", "80" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1125-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1126: IO::Socket::IP->split_addr( "something.else" )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1127- # ( "something.else", undef )
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1145-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1146:=head2 $addr = IO::Socket::IP->join_addr( $host, $port )
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1147-
##############################################
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1155-
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1156: say "Connected to ", IO::Socket::IP->join_addr( $sock->peerhost_service );
perl-5.32.0/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1157-
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-57-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:58:is_deeply( [ IO::Socket::IP->split_addr( "hostname:http" ) ],
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-59- [ "hostname", "http" ],
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-61-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:62:is_deeply( [ IO::Socket::IP->split_addr( "192.0.2.1:80" ) ],
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-63- [ "192.0.2.1", "80" ],
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-65-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:66:is_deeply( [ IO::Socket::IP->split_addr( "[2001:db8::1]:80" ) ],
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-67- [ "2001:db8::1", "80" ],
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-69-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:70:is_deeply( [ IO::Socket::IP->split_addr( "something.else" ) ],
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-71- [ "something.else", undef ],
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-73-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:74:is( IO::Socket::IP->join_addr( "hostname", "http" ),
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-75- "hostname:http",
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-77-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:78:is( IO::Socket::IP->join_addr( "192.0.2.1", 80 ),
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-79- "192.0.2.1:80",
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-81-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:82:is( IO::Socket::IP->join_addr( "2001:db8::1", 80 ),
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-83- "[2001:db8::1]:80",
##############################################
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-85-
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t:86:is( IO::Socket::IP->join_addr( "something.else", undef ),
perl-5.32.0/cpan/IO-Socket-IP/t/10args.t-87- "something.else",
##############################################
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm-705- # Try to get the $VERSION
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm:706: my $vsub = __clean_eval($eval);
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm-707- # some modules say $VERSION <equal sign> $Foo::Bar::VERSION, but Foo::Bar isn't
##############################################
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm-710- local @INC = ('lib',@INC);
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm:711: $vsub = __clean_eval($eval);
perl-5.32.0/cpan/Module-Metadata/lib/Module/Metadata.pm-712- }
##############################################
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-194- # rehash all the ref keys based on their new StrVal
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm:195: %{ $self->[0] } = map { refaddr($_->[0]) => $_ } (values(%{ $self->[0] }), @{ $extra_keys || [] });
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-196-}
##############################################
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-200- if (ref $k) {
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm:201: my $kstr = refaddr($k);
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-202- if (defined $s->[0]{$kstr}) {
##############################################
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-216- if (ref $k) {
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm:217: $s->[0]{refaddr($k)} = [$k, $v];
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-218- }
##############################################
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-227- (ref $k)
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm:228: ? (delete($s->[0]{refaddr($k)}) || [])->[1]
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-229- : delete($s->[1]{$k});
##############################################
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-233- my($s, $k) = @_;
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm:234: (ref $k) ? exists($s->[0]{refaddr($k)}) : exists($s->[1]{$k});
perl-5.32.0/cpan/Tie-RefHash/lib/Tie/RefHash.pm-235-}
##############################################
perl-5.32.0/cpan/Archive-Tar/lib/Archive/Tar.pm-972- } elsif ( $entry->is_fifo ) {
perl-5.32.0/cpan/Archive-Tar/lib/Archive/Tar.pm:973: ON_UNIX && !system('mknod', $file, 'p') or
perl-5.32.0/cpan/Archive-Tar/lib/Archive/Tar.pm-974- $err = qq[Making fifo ']. $entry->name .qq[' failed];
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl-18-# compile the message text files
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl:19:system("mc -d $name.mc");
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl:20:system("rc $name.rc");
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl-21-system(qq{ link -nodefaultlib -incremental:no -release /nologo -base:0x60000000 }
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl-188- local $ENV{PATH} = '';
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl:189: chomp($dll = `/usr/bin/cygpath --absolute --windows "$dll"`);
perl-5.32.0/cpan/Sys-Syslog/win32/compile.pl-190- }
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/Win32.pm-194- local $ENV{PATH} = '';
perl-5.32.0/cpan/Sys-Syslog/win32/Win32.pm:195: chomp($dll = `/usr/bin/cygpath --absolute --windows "$dll"`);
perl-5.32.0/cpan/Sys-Syslog/win32/Win32.pm-196- }
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-4-MB=O+4XG;RU.)(>\6B=K+4XDX[6Z)VLM3B5)I8VC;RU.)``````````!010``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:5:M3`$"`!LK3D4``````````.``#B$+`0<````````<```````````````0````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-6-M$```````8``0`````@``!``````````$``````````!``````@``IAX```(`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-17-M?`4``(<`"`"'``@`V`4``(@`"0"(``D`1`8``)H("@":"`H`D`8``*L("P"K
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:18:M"`L`*`<``+P(#`"\"`P`E`<``(P`$`",`!``U`<``(T`$0"-`!$`(`@``(X`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:19:M$@".`!(`;`@``(\`$P"/`!,`N`@``)``%`"0`!0`!`D``)$`%0"1`!4`4`D`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-20-M`)(`%@"2`!8`G`D``),`%P"3`!<`Z`D``)0`(`"4`"``-`H``)4`(0"5`"$`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-21-MB`H``)8`(@"6`"(`"`L``)<`(P"7`",`P`L``)@`)`"8`"0`(`P``!@``0!+
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:22:M`&4`<@!N`&4`;``-``H``````!0``0!5`',`90!R``T`"@``````%``!`$T`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-23-M80!I`&P`#0`*```````8``$`1`!A`&4`;0!O`&X`#0`*```````4``$`00!U
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-25-M4@`-``H````4``$`3@!E`'<`<P`-``H``````!0``0!5`%4`0P!0``T`"@``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:26:M````%``!`$,`<@!O`&X`#0`*```````@``$`00!U`'0`:`!0`'(`:0!V`&$`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-27-M=`!E``T`"@```!```0!&`%0`4``-``H````8``$`3`!O`&,`80!L`#``#0`*
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-32-M`'0`20!N`&8`;P`-``H````@``$`4@!E`&T`;P!T`&4`00!U`'0`:``-``H`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:33:M`````!```0!2`$$`4P`-``H````8``$`20!N`',`=`!A`&P`;``-``H````8
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-34-M``$`3`!A`'4`;@!C`&@`9``-``H````T``$`30!E`',`<P!A`&<`90`@`&0`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:35:M=0`@`&X`;P!Y`&$`=0`@`#H`(``E`#$`#0`*````/``!`$T`90!S`',`80!G
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-36-M`&4`(`!U`'0`:0!L`&D`<P!A`'0`90!U`'(`(``Z`"``)0`Q``T`"@``````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:37:M7``!`$T`90!S`',`80!G`&4`(`!D`'4`(`!S`&\`=0!S`"T`<P!Y`',`=`"F
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-38-M`VT`90`@`&0`90`@`&,`;P!U`'(`<@!I`&4`<@`@`#H`(``E`#$`#0`*````
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-40-M`',`80!N`',`(`!C`&$`=`"8`V<`;P!R`&D`90`@`',`<`"8`V,`:0!F`&D`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:41:M<0!U`&4`(``Z`"``)0`Q``T`"@``````8``!`$T`90!S`',`80!G`&4`(`!D
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-42-M`&4`(`!S`)@#8P!U`'(`:0!T`&4`(`!O`'4`(`!D`"<`80!U`'0`:`!O`'(`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:43:M:0!S`&$`=`!I`&\`;@`@`#H`(``E`#$`#0`*````;``!`$T`90!S`',`80!G
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-44-M`&4`(`!I`&X`=`!E`'(`;@!E`"``9P"8`VX`F`-R`)@#(`!P`&$`<@`@`&P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-45-M90`@`&0`80!E`&T`;P!N`"``<P!Y`',`;`!O`&<`9``@`#H`(``E`#$`#0`*
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:46:M````7``!`$T`90!S`',`80!G`&4`(`!D`'4`(`!S`&\`=0!S`"T`<P!Y`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-47-M=`"F`VT`90`@`&0`)P!I`&T`<`!R`&4`<P!S`&D`;P!N`"``.@`@`"4`,0`-
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-49-M<P!T`*8#;0!E`"``9`!E`"``;@!O`'4`=@!E`&P`;`!E`',`(`!5`%,`10!.
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:50:M`$4`5``@`#H`(``E`#$`#0`*``````!,``$`30!E`',`<P!A`&<`90`@`&0`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:51:M=0`@`',`;P!U`',`+0!S`'D`<P!T`*8#;0!E`"``50!5`$,`4``@`#H`(``E
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:52:M`#$`#0`*````F``!`$T`90!S`',`80!G`&4`(`!G`)@#;@"8`W(`F`,@`'``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-53-M80!R`"``;`!E`',`(`!D`&$`90!M`&\`;@!S`"``9``G`&4`>`"8`V,`=0!T
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-58-M``$`30!E`',`<P!A`&<`90`@`&0`=0`@`&0`80!E`&T`;P!N`"``1@!4`%``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:59:M(``Z`"``)0`Q``T`"@``````3``!`$T`90!S`',`80!G`&4`(`!L`&\`8P!A
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-60-M`&P`(`!S`'4`<@`@`&P`90`@`&,`80!N`&$`;``@`#``(``Z`"``)0`Q``T`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:61:M"@```$P``0!-`&4`<P!S`&$`9P!E`"``;`!O`&,`80!L`"``<P!U`'(`(`!L
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-62-M`&4`(`!C`&$`;@!A`&P`(``Q`"``.@`@`"4`,0`-``H```!,``$`30!E`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-63-M<P!A`&<`90`@`&P`;P!C`&$`;``@`',`=0!R`"``;`!E`"``8P!A`&X`80!L
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:64:M`"``,@`@`#H`(``E`#$`#0`*````3``!`$T`90!S`',`80!G`&4`(`!L`&\`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-65-M8P!A`&P`(`!S`'4`<@`@`&P`90`@`&,`80!N`&$`;``@`#,`(``Z`"``)0`Q
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:66:M``T`"@```$P``0!-`&4`<P!S`&$`9P!E`"``;`!O`&,`80!L`"``<P!U`'(`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-67-M(`!L`&4`(`!C`&$`;@!A`&P`(``T`"``.@`@`"4`,0`-``H```!,``$`30!E
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-68-M`',`<P!A`&<`90`@`&P`;P!C`&$`;``@`',`=0!R`"``;`!E`"``8P!A`&X`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:69:M80!L`"``-0`@`#H`(``E`#$`#0`*````3``!`$T`90!S`',`80!G`&4`(`!L
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-70-M`&\`8P!A`&P`(`!S`'4`<@`@`&P`90`@`&,`80!N`&$`;``@`#8`(``Z`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:71:M)0`Q``T`"@```$P``0!-`&4`<P!S`&$`9P!E`"``;`!O`&,`80!L`"``<P!U
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-72-M`'(`(`!L`&4`(`!C`&$`;@!A`&P`(``W`"``.@`@`"4`,0`-``H```!4``$`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-79-M(`!D`"<`00!C`&,`I@-S`"``1`!I`',`=`!A`&X`=``@`"@`4@!E`&T`;P!T
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:80:M`&4`(`!!`&,`8P!E`',`<P`@`%,`90!R`'8`:0!C`&4`*0`@`"@`5@!0`$X`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-81-M(``O`"``4`!0`%``*0`@`#H`(``E`#$`#0`*``````!@``$`30!E`',`<P!A
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-90-M!@``JP@+`*L("P"D!@``O`@,`+P(#``(!P``C``0`(P`$`!`!P``C0`1`(T`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:91:M$0"(!P``C@`2`(X`$@#0!P``CP`3`(\`$P`8"```D``4`)``%`!@"```D0`5
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-92-M`)$`%0"H"```D@`6`)(`%@#P"```DP`7`),`%P`X"0``E``@`)0`(`"`"0``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:93:ME0`A`)4`(0#$"0``E@`B`)8`(@`T"@``EP`C`)<`(P"\"@``F``D`)@`)``$
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:94:M"P``&``!`$L`90!R`&X`90!L``T`"@``````%``!`%4`<P!E`'(`#0`*````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-95-M```4``$`30!A`&D`;``-``H``````!@``0!$`&$`90!M`&\`;@`-``H`````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-96-M`!0``0!!`'4`=`!H``T`"@``````&``!`%,`>0!S`&P`;P!G``T`"@``````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:97:M$``!`$P`4`!2``T`"@```!0``0!.`&4`=P!S``T`"@``````%``!`%4`50!#
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-98-M`%``#0`*```````4``$`0P!R`&\`;@`-``H``````"```0!!`'4`=`!H`%``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:99:M<@!I`'8`80!T`&4`#0`*````$``!`$8`5`!0``T`"@```!@``0!,`&\`8P!A
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-100-M`&P`,``-``H``````!@``0!,`&\`8P!A`&P`,0`-``H``````!@``0!,`&\`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-107-M;``@`&T`90!S`',`80!G`&4`.@`@`"4`,0`-``H``````"P``0!5`',`90!R
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:108:M`"``;0!E`',`<P!A`&<`90`Z`"``)0`Q``T`"@``````0``!`$T`80!I`&P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-109-M(`!S`'4`8@!S`'D`<P!T`&4`;0`@`&T`90!S`',`80!G`&4`.@`@`"4`,0`-
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-117-M,0`-``H```!0``$`3`!I`&X`90`@`'``<@!I`&X`=`!E`'(`(`!S`'4`8@!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:118:M`'D`<P!T`&4`;0`@`&T`90!S`',`80!G`&4`.@`@`"4`,0`-``H``````$P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:119:M`0!5`%,`10!.`$4`5``@`&X`90!W`',`(`!S`'4`8@!S`'D`<P!T`&4`;0`@
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:120:M`&T`90!S`',`80!G`&4`.@`@`"4`,0`-``H```!```$`50!5`$,`4``@`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-121-M=0!B`',`>0!S`'0`90!M`"``;0!E`',`<P!A`&<`90`Z`"``)0`Q``T`"@``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:122:M````?``!`$T`90!S`',`80!G`&4`(`!G`&4`;@!E`'(`80!T`&4`9``@`&(`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-123-M>0`@`'0`:`!E`"``8P!L`&\`8P!K`"``9`!A`&4`;0!O`&X`<P`@`"@`8P!R
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-127-M```X``$`1@!4`%``(`!D`&$`90!M`&\`;@`@`&T`90!S`',`80!G`&4`.@`@
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:128:M`"4`,0`-``H``````$@``0!,`&\`8P!A`&P`(`!M`&4`<P!S`&$`9P!E`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:129:M;P!N`"``8P!H`&$`;@!N`&4`;``@`#``.@`@`"4`,0`-``H``````$@``0!,
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-130-M`&\`8P!A`&P`(`!M`&4`<P!S`&$`9P!E`"``;P!N`"``8P!H`&$`;@!N`&4`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:131:M;``@`#$`.@`@`"4`,0`-``H``````$@``0!,`&\`8P!A`&P`(`!M`&4`<P!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-132-M`&$`9P!E`"``;P!N`"``8P!H`&$`;@!N`&4`;``@`#(`.@`@`"4`,0`-``H`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:133:M`````$@``0!,`&\`8P!A`&P`(`!M`&4`<P!S`&$`9P!E`"``;P!N`"``8P!H
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:134:M`&$`;@!N`&4`;``@`#,`.@`@`"4`,0`-``H``````$@``0!,`&\`8P!A`&P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-135-M(`!M`&4`<P!S`&$`9P!E`"``;P!N`"``8P!H`&$`;@!N`&4`;``@`#0`.@`@
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:136:M`"4`,0`-``H``````$@``0!,`&\`8P!A`&P`(`!M`&4`<P!S`&$`9P!E`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:137:M;P!N`"``8P!H`&$`;@!N`&4`;``@`#4`.@`@`"4`,0`-``H``````$@``0!,
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-138-M`&\`8P!A`&P`(`!M`&4`<P!S`&$`9P!E`"``;P!N`"``8P!H`&$`;@!N`&4`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:139:M;``@`#8`.@`@`"4`,0`-``H``````$@``0!,`&\`8P!A`&P`(`!M`&4`<P!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-140-M`&$`9P!E`"``;P!N`"``8P!H`&$`;@!N`&4`;``@`#<`.@`@`"4`,0`-``H`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu:141:M`````$0``0!.`&4`=`!)`&X`9@!O`"``<P!U`&(`<P!Y`',`=`!E`&T`(`!M
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_dll.uu-142-M`&4`<P!S`&$`9P!E`#H`(``E`#$`#0`*````<``!`%(`90!M`&\`=`!E`"``
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-1-M`````"````#__P``__\```````````````````````"\"P``(````/__"P#_
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:2:M_P$``````#``#`0```````````8````!````&0```$P```"`````B````(0"
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-3-M``",````F````*`%``":"```F@@``'@*``"K"```JP@``!`+``"\"```O`@`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-4-M`'P+```8``$`2P!E`'(`;@!E`&P`#0`*```````4``$`50!S`&4`<@`-``H`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:5:M`````!0``0!-`&$`:0!L``T`"@``````&``!`$0`80!E`&T`;P!N``T`"@``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:6:M````%``!`$$`=0!T`&@`#0`*```````8``$`4P!Y`',`;`!O`&<`#0`*````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:7:M```0``$`3`!0`%(`#0`*````%``!`$X`90!W`',`#0`*```````4``$`50!5
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:8:M`$,`4``-``H``````!0``0!#`'(`;P!N``T`"@``````(``!`$$`=0!T`&@`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:9:M4`!R`&D`=@!A`'0`90`-``H````0``$`1@!4`%``#0`*````&``!`$P`;P!C
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:10:M`&$`;``P``T`"@``````&``!`$P`;P!C`&$`;``Q``T`"@``````&``!`$P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:11:M;P!C`&$`;``R``T`"@``````&``!`$P`;P!C`&$`;``S``T`"@``````&``!
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:12:M`$P`;P!C`&$`;``T``T`"@``````&``!`$P`;P!C`&$`;``U``T`"@``````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:13:M&``!`$P`;P!C`&$`;``V``T`"@``````&``!`$P`;P!C`&$`;``W``T`"@``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:14:M````&``!`$X`90!T`$D`;@!F`&\`#0`*````(``!`%(`90!M`&\`=`!E`$$`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:15:M=0!T`&@`#0`*```````0``$`4@!!`%,`#0`*````&``!`$D`;@!S`'0`80!L
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:16:M`&P`#0`*````&``!`$P`80!U`&X`8P!H`&0`#0`*````-``!`$T`90!S`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-17-M80!G`&4`(`!D`'4`(`!N`&\`>0!A`'4`(``Z`"``)0`Q``T`"@```#P``0!-
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-20-M`',`>0!S`'0`I@-M`&4`(`!D`&4`(`!C`&\`=0!R`'(`:0!E`'(`(``Z`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:21:M)0`Q``T`"@``````<``!`$T`90!S`',`80!G`&4`(`!D`"<`=0!N`"``9`!A
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-22-M`&4`;0!O`&X`(`!S`&$`;@!S`"``8P!A`'0`F`-G`&\`<@!I`&4`(`!S`'``
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-29-M<P`M`',`>0!S`'0`I@-M`&4`(`!D`"<`:0!M`'``<@!E`',`<P!I`&\`;@`@
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:30:M`#H`(``E`#$`#0`*````;``!`$T`90!S`',`80!G`&4`(`!D`'4`(`!S`&\`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-31-M=0!S`"T`<P!Y`',`=`"F`VT`90`@`&0`90`@`&X`;P!U`'8`90!L`&P`90!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:32:M`"``50!3`$4`3@!%`%0`(``Z`"``)0`Q``T`"@``````3``!`$T`90!S`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-33-M80!G`&4`(`!D`'4`(`!S`&\`=0!S`"T`<P!Y`',`=`"F`VT`90`@`%4`50!#
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:34:M`%``(``Z`"``)0`Q``T`"@```$P``0!-`&4`<P!S`&$`9P!E`"``;`!O`&,`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-35-M80!L`"``<P!U`'(`(`!L`&4`(`!C`&$`;@!A`&P`(``P`"``.@`@`"4`,0`-
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-36-M``H```!,``$`30!E`',`<P!A`&<`90`@`&P`;P!C`&$`;``@`',`=0!R`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:37:M;`!E`"``8P!A`&X`80!L`"``,0`@`#H`(``E`#$`#0`*````3``!`$T`90!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-38-M`',`80!G`&4`(`!L`&\`8P!A`&P`(`!S`'4`<@`@`&P`90`@`&,`80!N`&$`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:39:M;``@`#(`(``Z`"``)0`Q``T`"@```$P``0!-`&4`<P!S`&$`9P!E`"``;`!O
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-40-M`&,`80!L`"``<P!U`'(`(`!L`&4`(`!C`&$`;@!A`&P`(``S`"``.@`@`"4`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-41-M,0`-``H```!,``$`30!E`',`<P!A`&<`90`@`&P`;P!C`&$`;``@`',`=0!R
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:42:M`"``;`!E`"``8P!A`&X`80!L`"``-``@`#H`(``E`#$`#0`*````3``!`$T`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-43-M90!S`',`80!G`&4`(`!L`&\`8P!A`&P`(`!S`'4`<@`@`&P`90`@`&,`80!N
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:44:M`&$`;``@`#4`(``Z`"``)0`Q``T`"@```$P``0!-`&4`<P!S`&$`9P!E`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-45-M;`!O`&,`80!L`"``<P!U`'(`(`!L`&4`(`!C`&$`;@!A`&P`(``V`"``.@`@
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-47-M=0!R`"``;`!E`"``8P!A`&X`80!L`"``-P`@`#H`(``E`#$`#0`*````5``!
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:48:M`$T`90!S`',`80!G`&4`(`!D`'4`(`!S`&\`=0!S`"T`<P!Y`',`=`"F`VT`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:49:M90`@`$X`90!T`$D`;@!F`&\`(``Z`"``)0`Q``T`"@``````@``!`$T`90!S
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-50-M`',`80!G`&4`(`!D`"<`80!U`'0`:`!E`&X`=`!I`&8`:0!C`&$`=`!I`&\`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-53-M90`@`&<`F`-N`)@#<@"8`R``<`!A`'(`(`!L`&4`(`!3`&4`<@!V`&D`8P!E
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:54:M`"``9``G`$$`8P!C`*8#<P`@`$0`:0!S`'0`80!N`'0`(``H`%(`90!M`&\`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-55-M=`!E`"``00!C`&,`90!S`',`(`!3`&4`<@!V`&D`8P!E`"D`(``H`%8`4`!.
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:56:M`"``+P`@`%``4`!0`"D`(``Z`"``)0`Q``T`"@``````8``!`$T`90!S`',`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-57-M80!G`&4`(`!D`'4`(`!S`&\`=0!S`"T`<P!Y`',`=`"F`VT`90`@`&0`)P!I
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:58:M`&X`<P!T`&$`;`!L`&$`=`!I`&\`;@`@`#H`(``E`#$`#0`*````C``!`$T`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-59-M90!S`',`80!G`&4`(`!G`)@#;@"8`W(`F`,@`'``80!R`"``;`!A`'4`;@!C
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-69-M#0`*``````"<"@``(````/__"P#__P$``````#``"00```````````8````!
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:70:M````&0```$P```"`````B````(0"``",````F````#@%``":"```F@@``(0)
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-71-M``"K"```JP@````*``"\"```O`@``&0*```8``$`2P!E`'(`;@!E`&P`#0`*
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-72-M```````4``$`50!S`&4`<@`-``H``````!0``0!-`&$`:0!L``T`"@``````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:73:M&``!`$0`80!E`&T`;P!N``T`"@``````%``!`$$`=0!T`&@`#0`*```````8
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:74:M``$`4P!Y`',`;`!O`&<`#0`*```````0``$`3`!0`%(`#0`*````%``!`$X`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:75:M90!W`',`#0`*```````4``$`50!5`$,`4``-``H``````!0``0!#`'(`;P!N
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:76:M``T`"@``````(``!`$$`=0!T`&@`4`!R`&D`=@!A`'0`90`-``H````0``$`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:77:M1@!4`%``#0`*````&``!`$P`;P!C`&$`;``P``T`"@``````&``!`$P`;P!C
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:78:M`&$`;``Q``T`"@``````&``!`$P`;P!C`&$`;``R``T`"@``````&``!`$P`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:79:M;P!C`&$`;``S``T`"@``````&``!`$P`;P!C`&$`;``T``T`"@``````&``!
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:80:M`$P`;P!C`&$`;``U``T`"@``````&``!`$P`;P!C`&$`;``V``T`"@``````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:81:M&``!`$P`;P!C`&$`;``W``T`"@``````&``!`$X`90!T`$D`;@!F`&\`#0`*
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:82:M````(``!`%(`90!M`&\`=`!E`$$`=0!T`&@`#0`*```````0``$`4@!!`%,`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:83:M#0`*````&``!`$D`;@!S`'0`80!L`&P`#0`*````&``!`$P`80!U`&X`8P!H
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:84:M`&0`#0`*````,``!`$L`90!R`&X`90!L`"``;0!E`',`<P!A`&<`90`Z`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-85-M)0`Q``T`"@``````+``!`%4`<P!E`'(`(`!M`&4`<P!S`&$`9P!E`#H`(``E
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-86-M`#$`#0`*``````!```$`30!A`&D`;``@`',`=0!B`',`>0!S`'0`90!M`"``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:87:M;0!E`',`<P!A`&<`90`Z`"``)0`Q``T`"@``````C``!`$T`90!S`',`80!G
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-88-M`&4`(`!F`'(`;P!M`"``80`@`',`>0!S`'0`90!M`"``9`!A`&4`;0!O`&X`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-95-M<`!R`&D`;@!T`&4`<@`@`',`=0!B`',`>0!S`'0`90!M`"``;0!E`',`<P!A
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:96:M`&<`90`Z`"``)0`Q``T`"@``````3``!`%4`4P!%`$X`10!4`"``;@!E`'<`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-97-M<P`@`',`=0!B`',`>0!S`'0`90!M`"``;0!E`',`<P!A`&<`90`Z`"``)0`Q
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-116-M`#H`(``E`#$`#0`*``````"(``$`30!E`',`<P!A`&<`90`@`&<`90!N`&4`
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:117:M<@!A`'0`90!D`"``8@!Y`"``=`!H`&4`(`!2`&4`;0!O`'0`90`@`$$`8P!C
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:118:M`&4`<P!S`"``4P!E`'(`=@!I`&,`90`@`"@`5@!0`$X`(``O`"``4`!0`%``
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:119:M*0`Z`"``)0`Q``T`"@``````2``!`$D`;@!S`'0`80!L`&P`90!R`"``<P!U
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-120-M`&(`<P!Y`',`=`!E`&T`(`!M`&4`<P!S`&$`9P!E`#H`(``E`#$`#0`*````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:121:MB``!`$T`90!S`',`80!G`&4`(`!G`&4`;@!E`'(`80!T`&4`9``@`&(`>0`@
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-122-M`&P`80!U`&X`8P!H`&0`+``@`'0`:`!E`"``9P!E`&X`90!R`&$`;``@`&(`
##############################################
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-128-M`'``<@!I`'8`80!T`&4`(`!M`&4`<P!S`&$`9P!E`#H`(``E`#$`#0`*````
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu:129:M.``!`$8`5`!0`"``9`!A`&4`;0!O`&X`(`!M`&4`<P!S`&$`9P!E`#H`(``E
perl-5.32.0/cpan/Sys-Syslog/win32/PerlLog_RES.uu-130-+`#$`#0`*````````
##############################################
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm-361- if ( @results and ref $results[0] ) {
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm:362: if ( refaddr( $obj ) eq refaddr( $results[0] ) ) {
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm-363- encode_error( sprintf(
##############################################
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm-374- if ( defined $result and ref( $result ) ) {
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm:375: if ( refaddr( $obj ) eq refaddr( $result ) ) {
perl-5.32.0/cpan/JSON-PP/lib/JSON/PP.pm-376- encode_error( sprintf(
##############################################
perl-5.32.0/cpan/Pod-Simple/t/corpus.t-174- print STDERR "# $outfilename and $xml don't match!\n";
perl-5.32.0/cpan/Pod-Simple/t/corpus.t:175: print STDERR `diff $xml $outfilename`;
perl-5.32.0/cpan/Pod-Simple/t/corpus.t-176- ok 0;
##############################################
perl-5.32.0/cpan/Pod-Simple/t/rtf_utf8.t-53- my $diff = File::Temp->new();
perl-5.32.0/cpan/Pod-Simple/t/rtf_utf8.t:54: system("$ENV{PERL_TEST_DIFF} $orig_file $parsed_file > $diff");
perl-5.32.0/cpan/Pod-Simple/t/rtf_utf8.t-55-
##############################################
perl-5.32.0/cpan/Pod-Simple/t/JustPod02.t-37- my $diff = File::Temp->new();
perl-5.32.0/cpan/Pod-Simple/t/JustPod02.t:38: system("$ENV{PERL_TEST_DIFF} $orig_file $parsed_file > $diff");
perl-5.32.0/cpan/Pod-Simple/t/JustPod02.t-39-
##############################################
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-166-$?
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt:167:The status returned by the last pipe close, backtick (``) command, successful call to wait() or waitpid(), or from the system() operator. This is just the 16-bit status word returned by the wait() system call (or else is made up to look like it). Thus, the exit value of the subprocess is really ($? >> 8), and $? & 127 gives which signal, if any, the process died from, and $? & 128 reports whether there was a core dump. (Mnemonic: similar to sh and ksh.)
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-168-Additionally, if the h_errno variable is supported in C, its value is returned via $? if any gethost*() function fails.
##############################################
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-241-$^F
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt:242:The maximum system file descriptor, ordinarily 2. System file descriptors are passed to exec()ed processes, while higher file descriptors are not. Also, during an open(), system file descriptors are preserved even if the open() fails. (Ordinary file descriptors are closed before the open() is attempted.) The close-on-exec status of a file descriptor will be decided according to the value of $^F when the corresponding file, pipe, or socket was opened, not the time of the exec().
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-243-$^H
##############################################
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-370-The routine indicated by $SIG{__DIE__} is called when a fatal exception is about to be thrown. The error message is passed as the first argument. When a __DIE__ hook routine returns, the exception processing continues as it would have in the absence of the hook, unless the hook routine itself exits via a goto, a loop exit, or a die(). The __DIE__ handler is explicitly disabled during the call, so that you can die from a __DIE__ handler. Similarly for __WARN__.
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt:371:Due to an implementation glitch, the $SIG{__DIE__} hook is called even inside an eval(). Do not use this to rewrite a pending exception in $@, or as a bizarre substitute for overriding CORE::GLOBAL::die(). This strange action at a distance may be fixed in a future release so that $SIG{__DIE__} is only called if your program is about to exit, as was the original intent. Any other use is deprecated.
perl-5.32.0/cpan/Pod-Simple/t/perlvaro.txt-372-__DIE__/__WARN__ handlers are very special in one respect: they may be called to report (probable) errors found by the parser. In such a case the parser may be in inconsistent state, so any attempt to evaluate Perl code from such a handler will probably result in a segfault. This means that warnings or errors that result from parsing Perl should be used with extreme caution, like this:
##############################################
perl-5.32.0/cpan/Pod-Simple/t/perlcygo.txt-104-ld2
perl-5.32.0/cpan/Pod-Simple/t/perlcygo.txt:105:During `make', ld2 will be created and installed in your $installbin directory (where you said to put public executables). It does not wait until the `make install' process to install the ld2 script, this is because the remainder of the `make' refers to ld2 without fully specifying its path and does this from multiple subdirectories. The assumption is that $installbin is in your current PATH. If this is not the case `make' will fail at some point. If this happens, just manually copy ld2 from the source directory to somewhere in your PATH.
perl-5.32.0/cpan/Pod-Simple/t/perlcygo.txt-106-TEST
##############################################
perl-5.32.0/cpan/Pod-Simple/t/JustPod_corpus.t-137- my $diff = File::Temp->new();
perl-5.32.0/cpan/Pod-Simple/t/JustPod_corpus.t:138: system("$ENV{PERL_TEST_DIFF} $orig_file $parsed_file > $diff");
perl-5.32.0/cpan/Pod-Simple/t/JustPod_corpus.t-139-
##############################################
perl-5.32.0/cpan/Pod-Simple/t/JustPod01.t-48- my $diff = File::Temp->new();
perl-5.32.0/cpan/Pod-Simple/t/JustPod01.t:49: system("$ENV{PERL_TEST_DIFF} $orig_file $parsed_file > $diff");
perl-5.32.0/cpan/Pod-Simple/t/JustPod01.t-50-
##############################################
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-451- if $debug;
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm:452: eval ("\$linkage{\$orig} = \\\@".$pkg."::opt_$ov;");
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-453- }
##############################################
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-456- if $debug;
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm:457: eval ("\$linkage{\$orig} = \\\%".$pkg."::opt_$ov;");
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-458- }
##############################################
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-461- if $debug;
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm:462: eval ("\$linkage{\$orig} = \\\$".$pkg."::opt_$ov;");
perl-5.32.0/cpan/Getopt-Long/lib/Getopt/Long.pm-463- }
##############################################
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm-1375- } else {
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm:1376: $self->_debug( "# Using system(). Have buffer: $have_buffer" )
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm-1377- if $DEBUG;
##############################################
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm-1736- $self->ok( 1 );
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm:1737: system( ref $cmd ? @$cmd : $cmd ) == 0 or do {
perl-5.32.0/cpan/IPC-Cmd/lib/IPC/Cmd.pm-1738- $self->error( $self->_pp_child_error( $cmd, $? ) );
##############################################
perl-5.32.0/cpan/IPC-Cmd/t/03_run-forked.t-88- my $f_ipc_cmd = IPC::Cmd::run_forked("$cat $filename");
perl-5.32.0/cpan/IPC-Cmd/t/03_run-forked.t:89: my $f_backticks = `$cat $filename`;
perl-5.32.0/cpan/IPC-Cmd/t/03_run-forked.t-90- if ($f_ipc_cmd->{'stdout'} ne $f_backticks) {
##############################################
perl-5.32.0/cpan/Text-Balanced/lib/Text/Balanced.pm-152- $ldel =~ s/"//g and $qdel .= q{"};
perl-5.32.0/cpan/Text-Balanced/lib/Text/Balanced.pm:153: $ldel =~ s/`//g and $qdel .= q{`};
perl-5.32.0/cpan/Text-Balanced/lib/Text/Balanced.pm-154- $ldel =~ s/q//g and $quotelike = 1;
##############################################
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-79- ### fetch the uri to cwd() ###
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm:80: my $where = $ff->fetch() or die $ff->error;
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-81-
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-82- ### fetch the uri to /tmp ###
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm:83: my $where = $ff->fetch( to => '/tmp' );
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-84-
##############################################
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-425-
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm:426:=head2 $where = $ff->fetch( [to => /my/output/dir/ | \$scalar] )
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-427-
##############################################
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-433- ### file fetch to /tmp, full path to the file in $where
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm:434: $where = $ff->fetch( to => '/tmp' );
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-435-
##############################################
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-437- ### file is downloaded to a temp directory and cleaned up at exit time
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm:438: $where = $ff->fetch( to => \$scalar );
perl-5.32.0/cpan/File-Fetch/lib/File/Fetch.pm-439-
##############################################
perl-5.32.0/cpan/Module-Load/t/02_Module-Load.t-33-# print "tcode:$tcode\n";
perl-5.32.0/cpan/Module-Load/t/02_Module-Load.t:34: $r = eval($tcode) || $@;
perl-5.32.0/cpan/Module-Load/t/02_Module-Load.t-35-}
##############################################
perl-5.32.0/cpan/Win32API-File/File.pm-766-
perl-5.32.0/cpan/Win32API-File/File.pm:767: my $from_where = $file_consts[$whence];
perl-5.32.0/cpan/Win32API-File/File.pm-768-
##############################################
perl-5.32.0/cpan/Win32API-File/t/file.t-396- if( defined( $noargs{$func} ) ) {
perl-5.32.0/cpan/Win32API-File/t/file.t:397: $ok= ! eval("$func(0,0)") && $@ =~ /(::|\s)_?${func}A?[(:\s]/;
perl-5.32.0/cpan/Win32API-File/t/file.t-398- } else {
perl-5.32.0/cpan/Win32API-File/t/file.t:399: $ok= ! eval("$func()") && $@ =~ /(::|\s)_?${func}A?[(:\s]/;
perl-5.32.0/cpan/Win32API-File/t/file.t-400- }
##############################################
perl-5.32.0/cpan/Win32API-File/t/file.t-406- @{$Win32API::File::EXPORT_TAGS{FuncW}} ) {
perl-5.32.0/cpan/Win32API-File/t/file.t:407: $ok= ! eval("$func()") && $@ =~ /::_?${func}\(/;
perl-5.32.0/cpan/Win32API-File/t/file.t-408- delete $consts{$func};
##############################################
perl-5.32.0/cpan/Win32API-File/t/file.t-413-foreach $const ( keys(%consts) ) {
perl-5.32.0/cpan/Win32API-File/t/file.t:414: $ok= eval("my \$x= $const(); 1");
perl-5.32.0/cpan/Win32API-File/t/file.t-415- $ok or print "# Constant $const: $@\n";
##############################################
perl-5.32.0/cpan/autodie/lib/autodie/exception/system.pm-22-
perl-5.32.0/cpan/autodie/lib/autodie/exception/system.pm:23: system($cmd, @args);
perl-5.32.0/cpan/autodie/lib/autodie/exception/system.pm-24-
##############################################
perl-5.32.0/cpan/autodie/lib/autodie.pm-289-
perl-5.32.0/cpan/autodie/lib/autodie.pm:290: system( [ 0, 1, 2 ], $cmd, @args); # 0,1,2 are good exit values
perl-5.32.0/cpan/autodie/lib/autodie.pm-291-
##############################################
perl-5.32.0/cpan/autodie/lib/Fatal.pm-1680- if (defined($wrapper_pkg)) {
perl-5.32.0/cpan/autodie/lib/Fatal.pm:1681: $code = eval("package $wrapper_pkg; require Carp; $code"); ## no critic
perl-5.32.0/cpan/autodie/lib/Fatal.pm-1682- } else {
perl-5.32.0/cpan/autodie/lib/Fatal.pm:1683: $code = eval("require Carp; $code"); ## no critic
perl-5.32.0/cpan/autodie/lib/Fatal.pm-1684-
##############################################
perl-5.32.0/cpan/autodie/t/no-default.t-20-sub use_system {
perl-5.32.0/cpan/autodie/t/no-default.t:21: system($^X, '-e' , 1);
perl-5.32.0/cpan/autodie/t/no-default.t-22-}
##############################################
perl-5.32.0/cpan/IPC-SysV/SysV.xs-88-
perl-5.32.0/cpan/IPC-SysV/SysV.xs:89:static void *sv2addr(SV *sv)
perl-5.32.0/cpan/IPC-SysV/SysV.xs-90-{
##############################################
perl-5.32.0/cpan/IPC-SysV/SysV.xs-351- CODE:
perl-5.32.0/cpan/IPC-SysV/SysV.xs:352: char *caddr = (char *) sv2addr(addr);
perl-5.32.0/cpan/IPC-SysV/SysV.xs-353- char *dst;
##############################################
perl-5.32.0/cpan/IPC-SysV/SysV.xs-376- CODE:
perl-5.32.0/cpan/IPC-SysV/SysV.xs:377: char *caddr = (char *) sv2addr(addr);
perl-5.32.0/cpan/IPC-SysV/SysV.xs-378- STRLEN len;
##############################################
perl-5.32.0/cpan/IPC-SysV/SysV.xs-395- if (id >= 0) {
perl-5.32.0/cpan/IPC-SysV/SysV.xs:396: void *caddr = SvOK(addr) ? sv2addr(addr) : NULL;
perl-5.32.0/cpan/IPC-SysV/SysV.xs-397- void *shm = (void *) shmat(id, caddr, flag);
##############################################
perl-5.32.0/cpan/IPC-SysV/SysV.xs-413-#ifdef HAS_SHM
perl-5.32.0/cpan/IPC-SysV/SysV.xs:414: void *caddr = sv2addr(addr);
perl-5.32.0/cpan/IPC-SysV/SysV.xs-415- int rv = shmdt((Shmat_t)caddr);
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod-309- if( $filename =~ /^([0-9a-z_.]+)\z/ ) {
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod:310: $lines = `/usr/bin/wc -l $1`
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod-311- chomp $lines;
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod-875-
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod:876: rename($old, $new) or system("mv", $old, $new);
perl-5.32.0/cpan/perlfaq/lib/perlfaq5.pod-877-
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-363- # been opened on a pipe...
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:364: system("/bin/stty $stty");
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-365- $_ = <MODEM_IN>;
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-367- if ( !m/^Connected/ ) {
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:368: print STDERR "$0: cu printed `$_' instead of `Connected'\n";
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-369- }
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-646- system $cmd; # using system()
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:647: my $output = `$cmd`; # using backticks (``)
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-648- open (my $pipe_fh, "$cmd |"); # using open()
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-722-
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:723: $output = `$cmd 2>some_file`;
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-724- open (PIPE, "cmd 2>some_file |");
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-728-
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:729: $output = `$cmd 2>&1`;
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-730- open (PIPE, "cmd 2>&1 |");
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-843-
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:844: @ok = `grep @opts '$search_string' @filenames`;
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-845-
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-888-
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:889: my $where = tell($log_fh);
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-890- seek($log_fh, $where, 0);
##############################################
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-1116-
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod:1117: $rc = system($cmd);
perl-5.32.0/cpan/perlfaq/lib/perlfaq8.pod-1118- if ($rc & 127) { die "signal death" }
##############################################
perl-5.32.0/cpan/Compress-Raw-Bzip2/t/000prereq.t-49- {
perl-5.32.0/cpan/Compress-Raw-Bzip2/t/000prereq.t:50: my $ver = eval("\$${name}::VERSION");
perl-5.32.0/cpan/Compress-Raw-Bzip2/t/000prereq.t-51- is $ver, $VERSION, "$name version should be $VERSION"
##############################################
perl-5.32.0/cpan/AutoLoader/t/02AutoSplit.t-92- # can load functions from split modules into this perl.
perl-5.32.0/cpan/AutoLoader/t/02AutoSplit.t:93: my $output = `$com`;
perl-5.32.0/cpan/AutoLoader/t/02AutoSplit.t-94- warn "Exit status $? from running: >>$com<<" if $?;
##############################################
perl-5.32.0/cpan/version/t/coretests.pm-12- eval "use $pkg $req ".join(' ',@args);
perl-5.32.0/cpan/version/t/coretests.pm:13: is ${"$pkg\::VERSION"}, eval($req), 'Had to manually use version';
perl-5.32.0/cpan/version/t/coretests.pm-14- # If we made it this far, we are ok.
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/rt_54452-rebless.t-54-
perl-5.32.0/cpan/Filter-Util-Call/t/rt_54452-rebless.t:55:my $a = `$Perl $Inc $file 2>&1` ;
perl-5.32.0/cpan/Filter-Util-Call/t/rt_54452-rebless.t-56-print "1..2\n" ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-58-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:59:my $a = `$Perl "-I." $Inc -e "use ${module} ;" $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-60-ok(1, (($? >>8) != 0 or (($^O eq 'MSWin32' || $^O eq 'MacOS' || $^O eq 'NetWare' || $^O eq 'mpeix') && $? != 0))) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-75-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:76:$a = `$Perl "-I." $Inc -e "use ${module} ;" $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-77-#warn "# $a\n";
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-140-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:141:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-142-ok(5, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-189-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:190:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-191-ok(7, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-304-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:305:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-306-ok(9, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-366-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:367:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-368-ok(11, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-425-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:426:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-427-ok(13, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-485-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:486:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-487-ok(15, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-533-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:534:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-535-ok(17, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-581-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:582:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-583-ok(19, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-632-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:633:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-634-ok(21, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-682-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:683:$a = `$Perl "-I." $Inc $filenamebin $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-684-ok(23, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-736-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:737:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-738-ok(25, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-792-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:793:$a = `$Perl "-I." $Inc $filename $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-794-ok(27, ($? >>8) == 0) ;
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-825-my $str = $^O eq 'MacOS' ? "'ok'" : "q{ok}";
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:826:my $a = `$Perl "-I." $Inc -e "no ${module6}; print $str"`;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-827-ok(29, ($? >>8) == 0);
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-830-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:831:$a = `$Perl "-I." $Inc $filename2`;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-832-ok(31, ($? >>8) == 0);
##############################################
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-874-
perl-5.32.0/cpan/Filter-Util-Call/t/call.t:875:$a = `$Perl "-I." $Inc $filenamebin $redir` ;
perl-5.32.0/cpan/Filter-Util-Call/t/call.t-876-ok(33, ($? >>8) != 0) ;
##############################################
perl-5.32.0/cpan/Module-Load-Conditional/lib/Module/Load/Conditional.pm-535- grep { m!^BONG\=! }
perl-5.32.0/cpan/Module-Load-Conditional/lib/Module/Load/Conditional.pm:536: `$cmd`;
perl-5.32.0/cpan/Module-Load-Conditional/lib/Module/Load/Conditional.pm-537-}
##############################################
perl-5.32.0/cpan/IO-Compress/t/000prereq.t-82- {
perl-5.32.0/cpan/IO-Compress/t/000prereq.t:83: my $ver = eval("\$${name}::VERSION");
perl-5.32.0/cpan/IO-Compress/t/000prereq.t-84- is $ver, $VERSION, "$name version should be $VERSION"
##############################################
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t-52-
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t:53: if ( system("$comp $file >$outfile") == 0 )
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t-54- {
##############################################
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t-80- return 1
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t:81: if system($comp) == 0 ;
perl-5.32.0/cpan/IO-Compress/t/050interop-gzip.t-82-
##############################################
perl-5.32.0/cpan/IO-Compress/t/011-streamzip.t-67- my $cmd = "$command 2>$stderr";
perl-5.32.0/cpan/IO-Compress/t/011-streamzip.t:68: my $stdout = `$cmd` ;
perl-5.32.0/cpan/IO-Compress/t/011-streamzip.t-69-
##############################################
perl-5.32.0/cpan/libnet/Makefile.PL-244- $ENV{PERL5_CPANM_IS_RUNNING};
perl-5.32.0/cpan/libnet/Makefile.PL:245: system(($^O eq 'VMS' ? 'mcr ': ()), $^X, @args)
perl-5.32.0/cpan/libnet/Makefile.PL-246- }
##############################################
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-309- my $me = shift;
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:310: my $addr = _addr($me, shift);
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-311- my $opts = "";
##############################################
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-365- if (exists $esmtp->{CHECKPOINT}) {
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:366: $opts .= " TRANSID=" . _addr($me, $v);
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-367- }
##############################################
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-427-
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:428:sub send { my $me = shift; $me->_SEND("FROM:" . _addr($me, $_[0])) }
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:429:sub send_or_mail { my $me = shift; $me->_SOML("FROM:" . _addr($me, $_[0])) }
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:430:sub send_and_mail { my $me = shift; $me->_SAML("FROM:" . _addr($me, $_[0])) }
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-431-
##############################################
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-483- my @ok;
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:484: foreach my $addr (@_) {
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm:485: if ($smtp->_RCPT("TO:" . _addr($smtp, $addr) . $opts)) {
perl-5.32.0/cpan/libnet/lib/Net/SMTP.pm-486- push(@ok, $addr) if $skip_bad;
##############################################
perl-5.32.0/cpan/libnet/lib/Net/Time.pm-39-
perl-5.32.0/cpan/libnet/lib/Net/Time.pm:40: foreach my $addr (@$hosts) {
perl-5.32.0/cpan/libnet/lib/Net/Time.pm-41- $me = IO::Socket::INET->new(
##############################################
perl-5.32.0/cpan/libnet/lib/Net/Domain.pm-39- my $a = shift(@addr);
perl-5.32.0/cpan/libnet/lib/Net/Domain.pm:40: $host = gethostbyaddr($a, Socket::AF_INET());
perl-5.32.0/cpan/libnet/lib/Net/Domain.pm-41- last if defined $host;
##############################################
perl-5.32.0/cpan/libnet/lib/Net/FTP.pm-1127- my $ok = 1;
perl-5.32.0/cpan/libnet/lib/Net/FTP.pm:1128: my $where = delete ${*$ftp}{'net_ftp_rest'} || 0;
perl-5.32.0/cpan/libnet/lib/Net/FTP.pm-1129- my $arg;
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/bin/instmodsh-123- my($first, @rest) = $Inst->files($module);
perl-5.32.0/cpan/ExtUtils-MakeMaker/bin/instmodsh:124: system('tar', 'cvf', $file, $first);
perl-5.32.0/cpan/ExtUtils-MakeMaker/bin/instmodsh-125- for my $f (@rest) {
perl-5.32.0/cpan/ExtUtils-MakeMaker/bin/instmodsh:126: system('tar', 'rvf', $file, $f);
perl-5.32.0/cpan/ExtUtils-MakeMaker/bin/instmodsh-127- }
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm-1751- foreach (@staticpkgs) {
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm:1752: push @m,' $(NOECHO) $(PERL) -e "print q{',$_,qq[}" >>${tmpdir}Writemain.tmp\n];
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_VMS.pm-1753- }
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm-1256-
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm:1257: system("$Config::Config{eunicefix} $finalname")
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm-1258- if $Config::Config{eunicefix} ne ":";
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2665-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2666: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2667- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2695- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2696: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2697- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2799- my $devnull = File::Spec->devnull;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2800: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2801-}
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3009- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3010: eval($line); ## no critic
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3011- return ${$name};
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-221- my $make = $self->make || $self->{MAKE};
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm:222: my $minus_v = `"$make" -v $redirect`;
perl-5.32.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-223- return $maketype2true{$type} = 1
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/00compile.t-35- unshift @INC, ".";
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/00compile.t:36: ok eval { require($file); 1 } or diag "require $file failed.\n$@";
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/00compile.t-37-
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm-323- if (MM->can_redirect_error) {
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm:324: return `$cmd 2>&1`;
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm-325- }
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm-326- else {
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm:327: return `$cmd`;
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/lib/MakeMaker/Test/Utils.pm-328- }
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/oneliner.t-32-
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/oneliner.t:33: $TB->is_eq(scalar `$cmd`, $expect, $name) || $TB->diag("oneliner:\n$cmd");
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/oneliner.t-34-}
##############################################
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/split_command.t-59-
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/split_command.t:60: return map { s/\n+$//; $_ } map { `$_` } @cmds
perl-5.32.0/cpan/ExtUtils-MakeMaker/t/split_command.t-61-}
##############################################
perl-5.32.0/cpan/Module-Loaded/lib/Module/Loaded.pm-54-
perl-5.32.0/cpan/Module-Loaded/lib/Module/Loaded.pm:55: my $where = is_loaded( $pm );
perl-5.32.0/cpan/Module-Loaded/lib/Module/Loaded.pm-56- if ( defined $where ) {
##############################################
perl-5.32.0/cpan/Module-Loaded/t/01_Module-Loaded.t-34-### check for an already loaded module
perl-5.32.0/cpan/Module-Loaded/t/01_Module-Loaded.t:35:{ my $where = is_loaded( $Strict );
perl-5.32.0/cpan/Module-Loaded/t/01_Module-Loaded.t-36- ok( $where, "$Strict loaded" );
##############################################
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-91-# pragma message("Assembler code may have bugs -- use at your own risk")
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c:92: void match_init OF((void)); /* asm code initialization */
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-93- uInt longest_match OF((deflate_state *s, IPos cur_match));
##############################################
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-1218-#ifdef ASMV
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c:1219: match_init(); /* initialize the asm code */
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-1220-#endif
##############################################
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-1234-#ifndef ASMV
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c:1235:/* For 80x86 and 680x0, an optimized version will be provided in match.asm or
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/deflate.c-1236- * match.S. The code will be functionally equivalent.
##############################################
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/crc32.c-185-/* =========================================================================
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/crc32.c:186: * This function can be used by asm versions of crc32()
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/crc32.c-187- */
##############################################
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/zlib.h-1184- 8: ZLIB_DEBUG
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/zlib.h:1185: 9: ASMV or ASMINF -- use ASM code
perl-5.32.0/cpan/Compress-Raw-Zlib/zlib-src/zlib.h-1186- 10: ZLIB_WINAPI -- exported functions use the WINAPI calling convention
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove.pm-621-
perl-5.32.0/cpan/Test-Harness/lib/App/Prove.pm:622: eval("use $class;");
perl-5.32.0/cpan/Test-Harness/lib/App/Prove.pm-623- die "$class_name is required to use the --$for feature: $@" if $@;
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-219- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:220: where => sub { $_->generation >= $last_gen },
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-221- order => sub { $_->sequence }
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-226- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:227: where => sub { $_->result != 0 },
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-228- order => sub { -$_->result }
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-233- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:234: where => sub { $_->result == 0 }
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-235- );
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-242- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:243: where => sub { $_->num_todo != 0 },
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-244- order => sub { -$_->num_todo; }
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-249- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:250: where => sub { defined $_->last_fail_time },
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-251- order => sub { $now - $_->last_fail_time }
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-280- limit => shift,
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:281: where => sub { $_->mtime >= $last_run_time }
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-282- );
##############################################
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-346- my $results = $self->results;
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm:347: my $where = $clause->{where} || sub {1};
perl-5.32.0/cpan/Test-Harness/lib/App/Prove/State.pm-348-
##############################################
perl-5.32.0/cpan/Test-Harness/lib/Test/Harness.pm-305- # Avoid using -l for the benefit of Perl 6
perl-5.32.0/cpan/Test-Harness/lib/Test/Harness.pm:306: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
perl-5.32.0/cpan/Test-Harness/lib/Test/Harness.pm-307- return @inc;
##############################################
perl-5.32.0/cpan/Test-Harness/lib/TAP/Harness/Env.pm-51- # Avoid using -l for the benefit of Perl 6
perl-5.32.0/cpan/Test-Harness/lib/TAP/Harness/Env.pm:52: chomp( @inc = `"$perl" -e "print join qq[\\n], \@INC, q[]"` );
perl-5.32.0/cpan/Test-Harness/lib/TAP/Harness/Env.pm-53- return @inc;
##############################################
perl-5.32.0/cpan/Test-Harness/lib/TAP/Parser/Scheduler.pm-158-# execute can be selected. The inner arrays represent sequential
perl-5.32.0/cpan/Test-Harness/lib/TAP/Parser/Scheduler.pm:159:# execution. They can only proceed when the first job is ready to run.
perl-5.32.0/cpan/Test-Harness/lib/TAP/Parser/Scheduler.pm-160-
##############################################
perl-5.32.0/cpan/Test-Harness/t/perl5lib.t-17- map {qq{"$_"}} ( $^X, '-e', 'print join q(:), @INC' );
perl-5.32.0/cpan/Test-Harness/t/perl5lib.t:18: my $path = `$command`;
perl-5.32.0/cpan/Test-Harness/t/perl5lib.t-19- my @got = ( $path =~ /($sentinel)/g );
##############################################
perl-5.32.0/cpan/Test-Harness/t/sample-tests/shbang_misparse-10-$SIG{__WARN__} = sub { $warning .= $_[0] };
perl-5.32.0/cpan/Test-Harness/t/sample-tests/shbang_misparse:11:eval( "#" . substr( $0, 0, 0 ) );
perl-5.32.0/cpan/Test-Harness/t/sample-tests/shbang_misparse-12-print $warning ? "not ok 2\n" : "ok 2\n";
##############################################
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint-5-
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint:6:eval { `$^X -e1` };
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint-7-like( $@, '/^Insecure dependency/', '-T honored' );
##############################################
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint_warn-8- local $SIG{__WARN__} = sub { $warnings .= join '', @_ };
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint_warn:9: `$^X -e1`;
perl-5.32.0/cpan/Test-Harness/t/sample-tests/taint_warn-10-}
##############################################
perl-5.32.0/cpan/Test-Harness/t/nofork.t-25-
perl-5.32.0/cpan/Test-Harness/t/nofork.t:26: util::stdout_of( sub { system(@args) and die "error $?" } );
perl-5.32.0/cpan/Test-Harness/t/nofork.t-27-}
##############################################
perl-5.32.0/cpan/Test-Harness/t/compat/inc-propagation.t-18- map {qq{"$_"}} ( $^X, '-e', 'print join q(:), @INC' );
perl-5.32.0/cpan/Test-Harness/t/compat/inc-propagation.t:19: my $path = `$command`;
perl-5.32.0/cpan/Test-Harness/t/compat/inc-propagation.t-20- my @got = ( $path =~ /($sentinel)/g );
##############################################
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm-1174-# For reference, can't use '0+'=>\&Scalar::Util::refaddr directly because
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm:1175:# refaddr() demands one parameter only, whereas overload.pm calls with three
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm-1176-# even for unary operations like '0+'.
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm-1177-sub NUMIFY {
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm:1178: return refaddr($_[0]);
perl-5.32.0/cpan/File-Temp/lib/File/Temp.pm-1179-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/ListUtil.xs-1652-UV
perl-5.32.0/cpan/Scalar-List-Utils/ListUtil.xs:1653:refaddr(sv)
perl-5.32.0/cpan/Scalar-List-Utils/ListUtil.xs-1654- SV *sv
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/lib/Scalar/Util.pm-109-
perl-5.32.0/cpan/Scalar-List-Utils/lib/Scalar/Util.pm:110: my $addr = refaddr( $ref );
perl-5.32.0/cpan/Scalar-List-Utils/lib/Scalar/Util.pm-111-
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-16-foreach my $v (undef, 10, 'string') {
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:17: is(refaddr($v), undef, "not " . (defined($v) ? "'$v'" : "undef"));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-18-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-25- my $before = ref($r);
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:26: is( refaddr($r), $addr, $n);
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-27- is( ref($r), $before, $n);
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-29- my $obj = bless $r, 'FooBar';
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:30: is( refaddr($r), $addr, "blessed with overload $n");
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-31- is( ref($r), 'FooBar', $n);
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-45- ok(ref($x{$b}));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:46: ok(refaddr($xy) == refaddr($y));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:47: ok(refaddr($xb) == refaddr($b));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:48: ok(refaddr($x{$y}));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:49: ok(refaddr($x{$b}));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-50-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-52- my $z = bless {}, '0';
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:53: ok(refaddr($z));
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-54- {
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-58- my $a = {};
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:59: my $r = refaddr($a);
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-60- $z = bless $a, '0';
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:61: ok(refaddr($z) > 10);
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:62: is(refaddr($z),$r,"foo");
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-63-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-96- my ($underlying) = @$self;
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:97: return $underlying->{refaddr($key)};
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-98-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-104- my ($underlying) = @$self;
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t:105: return ($underlying->{refaddr($key)} = $key);
perl-5.32.0/cpan/Scalar-List-Utils/t/refaddr.t-106-}
##############################################
perl-5.32.0/cpan/Scalar-List-Utils/t/getmagic-once.t-35-$getmagic_count = 0;
perl-5.32.0/cpan/Scalar-List-Utils/t/getmagic-once.t:36:ok refaddr($var);
perl-5.32.0/cpan/Scalar-List-Utils/t/getmagic-once.t-37-is $getmagic_count, 1, 'refaddr';
##############################################
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm-1244- # can we do this in Pure Perl?
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm:1245: system( $git, 'init' );
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm:1246: system( $git, qw( add . ) );
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm:1247: system( $git, qw( commit -a -m ), 'initial import' );
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm-1248- }
##############################################
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm-1492- no strict;
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm:1493: eval( $eval );
perl-5.32.0/cpan/CPAN/lib/App/Cpan.pm-1494- };
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Index.pm-523- CPAN->debug(sprintf "length of eval2[%d]", length $eval2) if $CPAN::DEBUG;
perl-5.32.0/cpan/CPAN/lib/CPAN/Index.pm:524: my $ret = $compmt->reval($eval2);
perl-5.32.0/cpan/CPAN/lib/CPAN/Index.pm-525- Carp::confess($@) if $@;
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Author.pm-193- my($compmt) = Safe->new();
perl-5.32.0/cpan/CPAN/lib/CPAN/Author.pm:194: $cksum = $compmt->reval($eval);
perl-5.32.0/cpan/CPAN/lib/CPAN/Author.pm-195- if ($@) {
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm-851- $self->debug("system[$system]") if $CPAN::DEBUG;
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm:852: my($wstatus) = system($system);
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm-853- if ($f eq "lynx") {
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm-888- $CPAN::Frontend->myprint(qq{
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm:889: Function system("$system")
perl-5.32.0/cpan/CPAN/lib/CPAN/FTP.pm-890- returned status $estatus (wstat $wstatus)$size
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-88- my $command = CPAN::HandleConfig->safe_quote($self->{UNGZIPPRG});
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm:89: system(qq{$command -c "$read" > "$write"})==0;
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-90- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-112- my $command = CPAN::HandleConfig->safe_quote($self->{UNGZIPPRG});
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm:113: system(qq{$command -d -c "$read" > "$write"})==0;
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-114- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-167- my $command = CPAN::HandleConfig->safe_quote($self->{UNGZIPPRG});
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm:168: $success = 0==system(qq{$command -qdt "$read"});
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-169- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-336- }
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm:337: if (system($system) != 0) {
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-338- # people find the most curious tar binaries that cannot handle
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-352- $CPAN::Frontend->myprint(qq{Using Tar:$system:\n});
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm:353: my $ret = system($system);
perl-5.32.0/cpan/CPAN/lib/CPAN/Tarzip.pm-354- if ($ret==0) {
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-328- return $self->success(
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:329: "Has already been *installed and cleaned up in the staging area* within this session, will not work on it again; if you really want to start over, try something like `force get $id`"
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-330- );
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-1339-
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:1340: unless (system($shell) == 0) {
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-1341- my $code = $? >> 8;
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-1528- my($compmt) = Safe->new();
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:1529: $cksum = $compmt->reval($eval);
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-1530- if ($@) {
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2035- else {
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:2036: $ret = system($system);
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2037- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2282- else {
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:2283: my $rc = system($system);
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2284- $system_ok = $rc == 0;
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2335- $CPAN::Frontend->mywarn("Expect not installed, falling back to system()\n");
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:2336: return system($system);
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-2337- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-3787- } else {
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:3788: $c_ok = system($system) == 0;
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-3789- }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-3945- }
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:3946: my $system_ok = system($system) == 0;
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-3947- $self->introduce_myself;
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-4536- $CPAN::Frontend->mysleep(1);
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm:4537: system("$browser $url");
perl-5.32.0/cpan/CPAN/lib/CPAN/Distribution.pm-4538- if ($saved_file) { 1 while unlink($saved_file) }
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN.pm-365- CPAN->debug("eval[$eval]") if $CPAN::DEBUG;
perl-5.32.0/cpan/CPAN/lib/CPAN.pm:366: eval($eval);
perl-5.32.0/cpan/CPAN/lib/CPAN.pm-367- warn $@ if $@;
##############################################
perl-5.32.0/cpan/CPAN/lib/CPAN.pm-954- return MM->maybe_command($perl)
perl-5.32.0/cpan/CPAN/lib/CPAN.pm:955: && `$perl -MConfig=myconfig -e print -e myconfig` eq Config->myconfig;
perl-5.32.0/cpan/CPAN/lib/CPAN.pm-956-}
##############################################
perl-5.32.0/cpan/Pod-Checker/scripts/podchecker.PL-183-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/cpan/Pod-Checker/scripts/podchecker.PL:184:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/cpan/Pod-Checker/scripts/podchecker.PL-185-chdir $origdir;
##############################################
perl-5.32.0/cpan/Pod-Checker/t/pod/testpchk.pl-70- $different = "$outfile is different from $cmpfile";
perl-5.32.0/cpan/Pod-Checker/t/pod/testpchk.pl:71: system("diff -u $cmpfile $outfile") if $ENV{TEST_POD_CHECK_DIFF};
perl-5.32.0/cpan/Pod-Checker/t/pod/testpchk.pl-72- }
##############################################
perl-5.32.0/cpan/podlators/scripts/pod2man.PL-444-if ($Config{'eunicefix'} ne q{:}) {
perl-5.32.0/cpan/podlators/scripts/pod2man.PL:445: exec("$Config{'eunicefix'} $file");
perl-5.32.0/cpan/podlators/scripts/pod2man.PL-446-}
##############################################
perl-5.32.0/cpan/podlators/scripts/pod2text.PL-370-if ($Config{'eunicefix'} ne ':') {
perl-5.32.0/cpan/podlators/scripts/pod2text.PL:371: exec("$Config{'eunicefix'} $file");
perl-5.32.0/cpan/podlators/scripts/pod2text.PL-372-}
##############################################
perl-5.32.0/cpan/podlators/t/data/basic.man-205-This is a test to see if I can do not only \f(CW$self\fR and \f(CW\*(C`method()\*(C'\fR, but
perl-5.32.0/cpan/podlators/t/data/basic.man:206:also \f(CW\*(C`$self\->method()\*(C'\fR and \f(CW\*(C`$self\->{FIELDNAME}\*(C'\fR and
perl-5.32.0/cpan/podlators/t/data/basic.man-207-\&\f(CW\*(C`$Foo <=> $Bar\*(C'\fR without resorting to escape sequences. If
perl-5.32.0/cpan/podlators/t/data/basic.man-208-I want to refer to the right-shift operator I can do something
perl-5.32.0/cpan/podlators/t/data/basic.man:209:like \f(CW\*(C`$x >> 3\*(C'\fR or even \f(CW\*(C`$y >> 5\*(C'\fR.
perl-5.32.0/cpan/podlators/t/data/basic.man-210-.PP
##############################################
perl-5.32.0/cpan/podlators/t/data/basic.man-215-Of course I should still be able to do all this \fIwith\fR escape sequences
perl-5.32.0/cpan/podlators/t/data/basic.man:216:too: \f(CW\*(C`$self\->method()\*(C'\fR and \f(CW\*(C`$self\->{FIELDNAME}\*(C'\fR and
perl-5.32.0/cpan/podlators/t/data/basic.man-217-\&\f(CW\*(C`{FOO=>BAR}\*(C'\fR.
##############################################
perl-5.32.0/cpan/podlators/t/data/basic.man-223-Now, if I use << or >> as my delimiters, then I have to use whitespace.
perl-5.32.0/cpan/podlators/t/data/basic.man:224:So things like \f(CW\*(C`<$self\-\*(C'\fR\fBmethod()\fR>> and \f(CW\*(C`<$self\-\*(C'\fR{\s-1FIELDNAME\s0}>> won't end
perl-5.32.0/cpan/podlators/t/data/basic.man-225-up doing what you might expect since the first > will still terminate
##############################################
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm-693- my ($self, $array, $indent, $seen) = @_;
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm:694: if ( $seen->{refaddr($array)}++ ) {
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm-695- die \"CPAN::Meta::YAML does not support circular references";
##############################################
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm-732- my ($self, $hash, $indent, $seen) = @_;
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm:733: if ( $seen->{refaddr($hash)}++ ) {
perl-5.32.0/cpan/CPAN-Meta-YAML/lib/CPAN/Meta/YAML.pm-734- die \"CPAN::Meta::YAML does not support circular references";
##############################################
perl-5.32.0/cpan/CPAN-Meta-YAML/t/tml-76-
perl-5.32.0/cpan/CPAN-Meta-YAML/t/tml:77: exec( 'prove', @opts, '--exec', "$0 --run_test", @files )
perl-5.32.0/cpan/CPAN-Meta-YAML/t/tml-78- if @files;
##############################################
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2263- ($port, $iaddr) = sockaddr_in($hersockaddr);
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod:2264: $herhostname = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2265- $herstraddr = inet_ntoa($iaddr);
##############################################
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2439- $iaddr = inet_aton("127.1"); # or whatever address
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod:2440: $name = gethostbyaddr($iaddr, AF_INET);
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2441-
##############################################
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2492- printf "Connect to %s [%s]\n",
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod:2493: scalar gethostbyaddr($myaddr, AF_INET),
perl-5.32.0/cpan/Pod-Perldoc/corpus/perlfunc.pod-2494- inet_ntoa($myaddr);
##############################################
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToRtf.pm-20-
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToRtf.pm:21: return 1 if system( qq{"$rtf_pager"}, qq{"$tempfile"} ) == 0;
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToRtf.pm-22- return 0;
##############################################
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm-195-
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm:196: my $version_string = `$roffer -v`;
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm-197- my( $version ) = $version_string =~ /\(?groff\)? version (\d+\.\d+(?:\.\d+)?)/;
##############################################
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm-369- $self->debug(
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm:370: "Nonzero exit ($?) while running `$render @render_switches`.\n" .
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc/ToMan.pm-371- "Falling back to Pod::Perldoc::ToPod\n"
##############################################
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-21- if(($ENV{'PERLDOCDEBUG'} || '') =~ m/^(\d+)/) { # untaint
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm:22: eval("sub DEBUG () {$1}");
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-23- die "WHAT? Couldn't eval-up a DEBUG constant!? $@" if $@;
##############################################
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-1930- if ($self->is_vms) {
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm:1931: last if system("$pager $output") == 0;
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-1932- } elsif($self->is_amigaos) {
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm:1933: last if system($pager, $output) == 0;
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-1934- } else {
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm:1935: last if system("$pager \"$output\"") == 0;
perl-5.32.0/cpan/Pod-Perldoc/lib/Pod/Perldoc.pm-1936- }
##############################################
perl-5.32.0/cpan/Pod-Usage/scripts/pod2usage.PL-197-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/cpan/Pod-Usage/scripts/pod2usage.PL:198:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/cpan/Pod-Usage/scripts/pod2usage.PL-199-chdir $origdir;
##############################################
perl-5.32.0/cpan/Pod-Usage/lib/Pod/Usage.pm-163- # RT16091: fall back to more if perldoc failed
perl-5.32.0/cpan/Pod-Usage/lib/Pod/Usage.pm:164: system(($Config{pager} || $ENV{PAGER} || '/bin/more'), $1);
perl-5.32.0/cpan/Pod-Usage/lib/Pod/Usage.pm-165- }
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/pod2usage2.t-162-
perl-5.32.0/cpan/Pod-Usage/t/pod/pod2usage2.t:163:($exit, $text) = getoutput( sub { system($^X, @blib, $test_script); exit($? >> 8); } );
perl-5.32.0/cpan/Pod-Usage/t/pod/pod2usage2.t-164-$text =~ s{#Using.*/blib.*\n}{}; # older blib's emit something to STDERR
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t-7-
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t:8:my $out = `$^X $blib $pl 0`;
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t-9-$out =~ s{\s+}{ }gs;
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t-12-
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t:13:$out = `$^X $blib $pl 1`;
perl-5.32.0/cpan/Pod-Usage/t/pod/selectsections.t-14-$out =~ s{\s+}{ }gs;
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t-7-
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t:8:my $out = `$^X $blib $pl Foo`;
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t-9-$out =~ s{\s+}{ }gs;
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t-12-
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t:13:$out = `$^X $blib $pl Bar`;
perl-5.32.0/cpan/Pod-Usage/t/pod/selectheaders.t-14-$out =~ s{\s+}{ }gs;
##############################################
perl-5.32.0/cpan/Pod-Usage/t/pod/headwithmarkup.t-7-
perl-5.32.0/cpan/Pod-Usage/t/pod/headwithmarkup.t:8:my $out = `$^X $blib $pl`;
perl-5.32.0/cpan/Pod-Usage/t/pod/headwithmarkup.t-9-$out =~ s{\s+}{ }gs;
##############################################
perl-5.32.0/cpan/Pod-Usage/t/inc/Pod/PlainText.pm-408-sub seq_b { return $_[0]{alt} ? "``$_[1]''" : $_[1] }
perl-5.32.0/cpan/Pod-Usage/t/inc/Pod/PlainText.pm:409:sub seq_c { return $_[0]{alt} ? "``$_[1]''" : "`$_[1]'" }
perl-5.32.0/cpan/Pod-Usage/t/inc/Pod/PlainText.pm-410-sub seq_f { return $_[0]{alt} ? "\"$_[1]\"" : $_[1] }
##############################################
perl-5.32.0/NetWare/nwperlsys.h-1133-struct hostent*
perl-5.32.0/NetWare/nwperlsys.h:1134:PerlSockGethostbyaddr(struct IPerlSock* piPerl, const char* addr, int len, int type)
perl-5.32.0/NetWare/nwperlsys.h-1135-{
perl-5.32.0/NetWare/nwperlsys.h:1136: return(nw_gethostbyaddr(addr,len,type));
perl-5.32.0/NetWare/nwperlsys.h-1137-}
##############################################
perl-5.32.0/NetWare/nwperlsys.h-1157-struct netent *
perl-5.32.0/NetWare/nwperlsys.h:1158:PerlSockGetnetbyaddr(struct IPerlSock* piPerl, long net, int type)
perl-5.32.0/NetWare/nwperlsys.h-1159-{
perl-5.32.0/NetWare/nwperlsys.h:1160: return nw_getnetbyaddr(net, type);
perl-5.32.0/NetWare/nwperlsys.h-1161-}
##############################################
perl-5.32.0/NetWare/nwperlsys.h-1228-unsigned long
perl-5.32.0/NetWare/nwperlsys.h:1229:PerlSockInetAddr(struct IPerlSock* piPerl, const char* cp)
perl-5.32.0/NetWare/nwperlsys.h-1230-{
perl-5.32.0/NetWare/nwperlsys.h:1231: return(nw_inet_addr(cp));
perl-5.32.0/NetWare/nwperlsys.h-1232-}
##############################################
perl-5.32.0/NetWare/nwperlhost.h-1073-struct hostent*
perl-5.32.0/NetWare/nwperlhost.h:1074:PerlSockGethostbyaddr(struct IPerlSock* piPerl, const char* addr, int len, int type)
perl-5.32.0/NetWare/nwperlhost.h-1075-{
perl-5.32.0/NetWare/nwperlhost.h:1076: return(nw_gethostbyaddr(addr,len,type));
perl-5.32.0/NetWare/nwperlhost.h-1077-}
##############################################
perl-5.32.0/NetWare/nwperlhost.h-1097-struct netent *
perl-5.32.0/NetWare/nwperlhost.h:1098:PerlSockGetnetbyaddr(struct IPerlSock* piPerl, long net, int type)
perl-5.32.0/NetWare/nwperlhost.h-1099-{
perl-5.32.0/NetWare/nwperlhost.h:1100: return nw_getnetbyaddr(net, type);
perl-5.32.0/NetWare/nwperlhost.h-1101-}
##############################################
perl-5.32.0/NetWare/nwperlhost.h-1168-unsigned long
perl-5.32.0/NetWare/nwperlhost.h:1169:PerlSockInetAddr(struct IPerlSock* piPerl, const char* cp)
perl-5.32.0/NetWare/nwperlhost.h-1170-{
perl-5.32.0/NetWare/nwperlhost.h:1171: return(nw_inet_addr(cp));
perl-5.32.0/NetWare/nwperlhost.h-1172-}
##############################################
perl-5.32.0/NetWare/nw5sck.c-130-struct hostent *
perl-5.32.0/NetWare/nw5sck.c:131:nw_gethostbyaddr(const char *addr, int len, int type)
perl-5.32.0/NetWare/nw5sck.c-132-{
perl-5.32.0/NetWare/nw5sck.c:133: return(gethostbyaddr((char*)addr, len, type));
perl-5.32.0/NetWare/nw5sck.c-134-}
##############################################
perl-5.32.0/NetWare/nw5sck.c-136-struct netent *
perl-5.32.0/NetWare/nw5sck.c:137:nw_getnetbyaddr(long net, int type)
perl-5.32.0/NetWare/nw5sck.c-138-{
perl-5.32.0/NetWare/nw5sck.c:139: return(getnetbyaddr(net,type));
perl-5.32.0/NetWare/nw5sck.c-140-}
##############################################
perl-5.32.0/NetWare/nw5sck.c-235-unsigned long
perl-5.32.0/NetWare/nw5sck.c:236:nw_inet_addr(const char *cp)
perl-5.32.0/NetWare/nw5sck.c-237-{
perl-5.32.0/NetWare/nw5sck.c:238: return inet_addr((char*)cp);
perl-5.32.0/NetWare/nw5sck.c-239-}
##############################################
perl-5.32.0/NetWare/nw5.c-876- // This feature needs to be implemented.
perl-5.32.0/NetWare/nw5.c:877: // _asm is commented out since it goes into the internal debugger.
perl-5.32.0/NetWare/nw5.c:878:// _asm {int 3};
perl-5.32.0/NetWare/nw5.c-879- return(0);
##############################################
perl-5.32.0/NetWare/nw5.c-885- // This feature needs to be implemented.
perl-5.32.0/NetWare/nw5.c:886: // _asm is commented out since it goes into the internal debugger.
perl-5.32.0/NetWare/nw5.c:887:// _asm {int 3};
perl-5.32.0/NetWare/nw5.c-888- return(0);
##############################################
perl-5.32.0/NetWare/nw5.c-894- // This feature needs to be implemented.
perl-5.32.0/NetWare/nw5.c:895: // _asm is commented out since it goes into the internal debugger.
perl-5.32.0/NetWare/nw5.c:896:// _asm {int 3};
perl-5.32.0/NetWare/nw5.c-897-//// return(0);
##############################################
perl-5.32.0/NetWare/nw5.c-966- // This feature needs to be implemented.
perl-5.32.0/NetWare/nw5.c:967: // _asm is commented out since it goes into the internal debugger.
perl-5.32.0/NetWare/nw5.c:968:// _asm {int 3};
perl-5.32.0/NetWare/nw5.c-969-//// return(0);
##############################################
perl-5.32.0/NetWare/config_H.wc-1233-/* HAS_GETHOSTBYADDR:
perl-5.32.0/NetWare/config_H.wc:1234: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/NetWare/config_H.wc-1235- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/NetWare/config_H.wc-1282- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/NetWare/config_H.wc:1283: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/NetWare/config_H.wc-1284- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/NetWare/config_H.wc-1306-/* HAS_GETNETBYADDR:
perl-5.32.0/NetWare/config_H.wc:1307: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/NetWare/config_H.wc-1308- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/NetWare/config_H.wc-1326- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/NetWare/config_H.wc:1327: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/NetWare/config_H.wc-1328- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/NetWare/config_H.wc-1369- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/NetWare/config_H.wc:1370: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/NetWare/config_H.wc-1371- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/NetWare/config_H.wc-1396- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/NetWare/config_H.wc:1397: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/NetWare/config_H.wc-1398- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/NetWare/config_H.wc-2581- * This symbol holds the type used for the 1st argument
perl-5.32.0/NetWare/config_H.wc:2582: * to gethostbyaddr().
perl-5.32.0/NetWare/config_H.wc-2583- */
##############################################
perl-5.32.0/NetWare/config_H.wc-2585- * This symbol holds the type used for the 2nd argument
perl-5.32.0/NetWare/config_H.wc:2586: * to gethostbyaddr().
perl-5.32.0/NetWare/config_H.wc-2587- */
##############################################
perl-5.32.0/NetWare/config_H.wc-2593- * This symbol holds the type used for the 1st argument to
perl-5.32.0/NetWare/config_H.wc:2594: * getnetbyaddr().
perl-5.32.0/NetWare/config_H.wc-2595- */
##############################################
perl-5.32.0/NetWare/config_h.PL-115- {
perl-5.32.0/NetWare/config_h.PL:116: die "Cannot handle \`$cmd\`";
perl-5.32.0/NetWare/config_h.PL-117- }
##############################################
perl-5.32.0/NetWare/nw5sck.h-55-# define gethostbyname(name) NetDBgethostbyname(&local_context,name)
perl-5.32.0/NetWare/nw5sck.h:56:# define gethostbyaddr(a,l,t) NetDBgethostbyaddr(&local_context,a,l,t)
perl-5.32.0/NetWare/nw5sck.h-57-
##############################################
perl-5.32.0/NetWare/nw5sck.h-63-# define getprotoent() NWgetprotoent(&local_context)
perl-5.32.0/NetWare/nw5sck.h:64:# define gethostbyaddr(a,l,t) NetDBgethostbyaddr(&local_context,a,l,t)
perl-5.32.0/NetWare/nw5sck.h:65:# define getnetbyaddr(net,typ) NWgetnetbyaddr(&local_context,net,typ)
perl-5.32.0/NetWare/nw5sck.h-66-# define getnetbyname(name) NWgetnetbyname(&local_context,name)
##############################################
perl-5.32.0/NetWare/nw5sck.h-85-struct hostent * nw_gethostbyname(const char * name);
perl-5.32.0/NetWare/nw5sck.h:86:struct hostent * nw_gethostbyaddr(const char *addr, int len, int type);
perl-5.32.0/NetWare/nw5sck.h-87-int nw_gethostname(char *name, int len);
perl-5.32.0/NetWare/nw5sck.h:88:struct netent * nw_getnetbyaddr(long net, int type);
perl-5.32.0/NetWare/nw5sck.h-89-struct netent *nw_getnetbyname(char *name);
##############################################
perl-5.32.0/NetWare/nw5sck.h-104-
perl-5.32.0/NetWare/nw5sck.h:105:unsigned long nw_inet_addr(const char *cp);
perl-5.32.0/NetWare/nw5sck.h-106-char * nw_inet_ntoa(struct in_addr in);
##############################################
perl-5.32.0/NetWare/deb.h-31- ConsolePrintf(x); \
perl-5.32.0/NetWare/deb.h:32: _asm {int 3}
perl-5.32.0/NetWare/deb.h-33-#else
##############################################
perl-5.32.0/NetWare/t/NWScripts.pl-111- # only then make an entry of the intermediary auto script in nwauto.pl
perl-5.32.0/NetWare/t/NWScripts.pl:112: print FHWA "print \`perl $IntAutoScript\`\;\n";
perl-5.32.0/NetWare/t/NWScripts.pl-113- print FHWA "print \"\\n\\n\\n\"\;\n\n";
##############################################
perl-5.32.0/NetWare/t/NWScripts.pl-127- {
perl-5.32.0/NetWare/t/NWScripts.pl:128: print FHWA "print \`perl $FileName\`\;\n";
perl-5.32.0/NetWare/t/NWScripts.pl-129- print FHWA "print \"\\n\\n\\n\"\;\n\n";
##############################################
perl-5.32.0/NetWare/t/NWScripts.pl-229- print FHW "print \"Testing $base1"."$ext1:\\n\\n\"\;\n";
perl-5.32.0/NetWare/t/NWScripts.pl:230: print FHW "print \`perl $FileToProcess\`\;\n"; # Write the changed array into the file.
perl-5.32.0/NetWare/t/NWScripts.pl-231- print FHW "print \"\\n\\n\\n\"\;\n";
##############################################
perl-5.32.0/embed.h-184-#define get_op_names() Perl_get_op_names(aTHX)
perl-5.32.0/embed.h:185:#define get_ppaddr() Perl_get_ppaddr(aTHX)
perl-5.32.0/embed.h-186-#define get_sv(a,b) Perl_get_sv(aTHX_ a,b)
##############################################
perl-5.32.0/invlist_inline.h-35-PERL_STATIC_INLINE bool*
perl-5.32.0/invlist_inline.h:36:S_get_invlist_offset_addr(SV* invlist)
perl-5.32.0/invlist_inline.h-37-{
##############################################
perl-5.32.0/invlist_inline.h-58- ? 0
perl-5.32.0/invlist_inline.h:59: : FROM_INTERNAL_SIZE(SvCUR(invlist)) - *get_invlist_offset_addr(invlist);
perl-5.32.0/invlist_inline.h-60-}
##############################################
perl-5.32.0/invlist_inline.h-91- assert(0 == *(SvPVX(invlist)));
perl-5.32.0/invlist_inline.h:92: return ((UV *) SvPVX(invlist) + *get_invlist_offset_addr(invlist));
perl-5.32.0/invlist_inline.h-93-}
##############################################
perl-5.32.0/invlist_inline.h-167-PERL_STATIC_INLINE STRLEN*
perl-5.32.0/invlist_inline.h:168:S_get_invlist_iter_addr(SV* invlist)
perl-5.32.0/invlist_inline.h-169-{
##############################################
perl-5.32.0/invlist_inline.h-184-
perl-5.32.0/invlist_inline.h:185: *get_invlist_iter_addr(invlist) = 0;
perl-5.32.0/invlist_inline.h-186-}
##############################################
perl-5.32.0/invlist_inline.h-200-
perl-5.32.0/invlist_inline.h:201: *get_invlist_iter_addr(invlist) = (STRLEN) UV_MAX;
perl-5.32.0/invlist_inline.h-202-}
##############################################
perl-5.32.0/invlist_inline.h-213-
perl-5.32.0/invlist_inline.h:214: STRLEN* pos = get_invlist_iter_addr(invlist);
perl-5.32.0/invlist_inline.h-215- UV len = _invlist_len(invlist);
##############################################
perl-5.32.0/config_h.SH-28-case "$0" in
perl-5.32.0/config_h.SH:29:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/config_h.SH-30-esac
##############################################
perl-5.32.0/config_h.SH-1527-/* HAS_DLADDR:
perl-5.32.0/config_h.SH:1528: * This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/config_h.SH-1529- * available to query dynamic linker information for an address.
##############################################
perl-5.32.0/config_h.SH-1602-/* HAS_GETHOSTBYADDR:
perl-5.32.0/config_h.SH:1603: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/config_h.SH-1604- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/config_h.SH-1649-/* HAS_GETNETBYADDR:
perl-5.32.0/config_h.SH:1650: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/config_h.SH-1651- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/config_h.SH-4346- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/config_h.SH:4347: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/config_h.SH-4348- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/config_h.SH-4354- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/config_h.SH:4355: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/config_h.SH-4356- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/config_h.SH-4362- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/config_h.SH:4363: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/config_h.SH-4364- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/config_h.SH-4370- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/config_h.SH:4371: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/config_h.SH-4372- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/config_h.SH-4385- * This symbol holds the type used for the 1st argument
perl-5.32.0/config_h.SH:4386: * to gethostbyaddr().
perl-5.32.0/config_h.SH-4387- */
##############################################
perl-5.32.0/config_h.SH-4389- * This symbol holds the type used for the 2nd argument
perl-5.32.0/config_h.SH:4390: * to gethostbyaddr().
perl-5.32.0/config_h.SH-4391- */
##############################################
perl-5.32.0/config_h.SH-4397- * This symbol holds the type used for the 1st argument to
perl-5.32.0/config_h.SH:4398: * getnetbyaddr().
perl-5.32.0/config_h.SH-4399- */
##############################################
perl-5.32.0/Porting/sync-with-cpan-513-system git => 'rm', '-f', "$pkg_dir/$_" for @gone;
perl-5.32.0/Porting/sync-with-cpan:514:de_exec( "$pkg_dir/$_" ) for @de_exec;
perl-5.32.0/Porting/sync-with-cpan-515-
##############################################
perl-5.32.0/Porting/sync-with-cpan-597-my $exe_dir = WIN32 ? "..\\" : './';
perl-5.32.0/Porting/sync-with-cpan:598:my $output = `${exe_dir}perl$Config{_exe} TEST @test_files`;
perl-5.32.0/Porting/sync-with-cpan-599-unless ($output =~ /All tests successful/) {
##############################################
perl-5.32.0/Porting/sync-with-cpan-610- grep { /^not/ }
perl-5.32.0/Porting/sync-with-cpan:611: `${exe_dir}perl -I../lib -I.. $t`;
perl-5.32.0/Porting/sync-with-cpan-612- print @not ? '!' : '.';
##############################################
perl-5.32.0/Porting/leakfinder.pl-21- chomp;
perl-5.32.0/Porting/leakfinder.pl:22: for(`cat \Q$_\E 2>/dev/null`) {
perl-5.32.0/Porting/leakfinder.pl-23- next if exists $exceptions{s/^\s+//r};
##############################################
perl-5.32.0/Porting/add-package.pl-39- ### is -d, so settling for -PpR
perl-5.32.0/Porting/add-package.pl:40: system( "cp -PpR -f $Repo $RepoCopy" )
perl-5.32.0/Porting/add-package.pl-41- and die "Copying master repo to $RepoCopy failed: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-58- }
perl-5.32.0/Porting/add-package.pl:59: system( "git checkout -b $BranchName blead" )
perl-5.32.0/Porting/add-package.pl-60- and die "Could not create branch '$BranchName': $?";
##############################################
perl-5.32.0/Porting/add-package.pl-73- die "No lib/ directory found\n" unless -d 'lib';
perl-5.32.0/Porting/add-package.pl:74: system( "cp -fR $CPV lib $Repo" ) and die "Copy of lib/ failed: $?";
perl-5.32.0/Porting/add-package.pl-75-
##############################################
perl-5.32.0/Porting/add-package.pl-79- ? do { warn "Removing $Repo/$_\n";
perl-5.32.0/Porting/add-package.pl:80: system("rm $Repo/$_") and die "rm '$Repo/$_' failed: $?";
perl-5.32.0/Porting/add-package.pl-81- undef
##############################################
perl-5.32.0/Porting/add-package.pl-102- grep /\.p(?:m|od)$/,
perl-5.32.0/Porting/add-package.pl:103: `find $PkgDir/lib -type f`
perl-5.32.0/Porting/add-package.pl-104- or die "No TopDir detected\n";
##############################################
perl-5.32.0/Porting/add-package.pl-112- unless( -d $TopDir ) {
perl-5.32.0/Porting/add-package.pl:113: system( "mkdir $TopDir" ) and die "Creating dir $TopDir failed: $?";
perl-5.32.0/Porting/add-package.pl-114- }
##############################################
perl-5.32.0/Porting/add-package.pl-137- -d 't'
perl-5.32.0/Porting/add-package.pl:138: ? system( "cp -fR $CPV t $TopDir" ) && die "Copy of t/ failed: $?"
perl-5.32.0/Porting/add-package.pl-139- : warn "No t/ directory found\n";
##############################################
perl-5.32.0/Porting/add-package.pl-144- ? do { warn "Removing $_\n";
perl-5.32.0/Porting/add-package.pl:145: system("rm $TopDir/$_") and die "rm '$_' failed: $?";
perl-5.32.0/Porting/add-package.pl-146- undef
##############################################
perl-5.32.0/Porting/add-package.pl-170-
perl-5.32.0/Porting/add-package.pl:171: system($CopyCmd) && die "Copy of $BinDir failed: $?";
perl-5.32.0/Porting/add-package.pl-172-
##############################################
perl-5.32.0/Porting/add-package.pl-176- ? do { warn "Removing $_\n";
perl-5.32.0/Porting/add-package.pl:177: system("rm $TopDir/$_") and die "rm '$_' failed: $?";
perl-5.32.0/Porting/add-package.pl-178- undef
##############################################
perl-5.32.0/Porting/add-package.pl-180- : 1
perl-5.32.0/Porting/add-package.pl:181: } `find $BinDir -type f`
perl-5.32.0/Porting/add-package.pl-182- or die "Could not detect binfiles\n";
##############################################
perl-5.32.0/Porting/add-package.pl-193-
perl-5.32.0/Porting/add-package.pl:194: system( "cp -f $CPV $cl $TopDir" )
perl-5.32.0/Porting/add-package.pl-195- and die "Copy of $cl failed: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-210- ### not there already?
perl-5.32.0/Porting/add-package.pl:211: unless( `grep $TestBin $Repo/$file| grep $bin` ) {
perl-5.32.0/Porting/add-package.pl-212- print " Adding $bin to $file..." if $Verbose;
##############################################
perl-5.32.0/Porting/add-package.pl-215- ### for the cli
perl-5.32.0/Porting/add-package.pl:216: system("$^X -pi -e 's/($TestBin\\|)/$bin|\$1/' $Repo/$file")
perl-5.32.0/Porting/add-package.pl-217- and die "Could not add $bin to $file: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-228- ### not there already?
perl-5.32.0/Porting/add-package.pl:229: unless( `grep $bin $Repo/$file` ) {
perl-5.32.0/Porting/add-package.pl-230- print " Adding $bin to $file..." if $Verbose;
##############################################
perl-5.32.0/Porting/add-package.pl-233- ### for the cli
perl-5.32.0/Porting/add-package.pl:234: system("$^X -pi -e 's!($TestBin)!\$1\nutils/$bin!' $Repo/$file")
perl-5.32.0/Porting/add-package.pl-235- and die "Could not add $bin to $file: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-258- ### copy another template file
perl-5.32.0/Porting/add-package.pl:259: system( "cp -f $Repo/$src $Repo/$file" )
perl-5.32.0/Porting/add-package.pl-260- and die "Could not create $file from $src: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-271- ### change the name of the file from $TestBin to $bin
perl-5.32.0/Porting/add-package.pl:272: system( "$^X -pi -e's/$TestBin/$bin/' $Repo/$file" )
perl-5.32.0/Porting/add-package.pl-273- and die "Could not update $file with '$bin' as name: $?";
##############################################
perl-5.32.0/Porting/add-package.pl-289- ### not there already?
perl-5.32.0/Porting/add-package.pl:290: unless( `grep $bin $Repo/$file` ) {
perl-5.32.0/Porting/add-package.pl-291- print " Adding $bin entries to $file..." if $Verbose;
##############################################
perl-5.32.0/Porting/add-package.pl-294- ### first, pl =
perl-5.32.0/Porting/add-package.pl:295: system( "$^X -pi -e'/^pl\\s+=/ && s/(${TestBin}.PL)/".
perl-5.32.0/Porting/add-package.pl-296- "\$1 ${bin}.PL/' $Repo/$file"
##############################################
perl-5.32.0/Porting/add-package.pl-309- ### last, the make directive $bin:
perl-5.32.0/Porting/add-package.pl:310: system( "$^X -pi -e'/^(${TestBin}:.+)/; \$x=\$1 or next;" .
perl-5.32.0/Porting/add-package.pl-311- "\$x =~ s/$TestBin/$bin/g;" . '$_.=$/.$x.$/;' .
##############################################
perl-5.32.0/Porting/add-package.pl-326- for my $file ( qw[win32/Makefile win32/makefile.mk] ) {
perl-5.32.0/Porting/add-package.pl:327: unless ( `grep $bin $Repo/$file` ) {
perl-5.32.0/Porting/add-package.pl-328- print " Adding $bin entries to $file..." if $Verbose;
perl-5.32.0/Porting/add-package.pl-329-
perl-5.32.0/Porting/add-package.pl:330: system( "$^X -pi -e'/^(.+?utils.${TestBin}.+)/;".
perl-5.32.0/Porting/add-package.pl-331- '$x=$1 or next;' .
##############################################
perl-5.32.0/Porting/add-package.pl-335-
perl-5.32.0/Porting/add-package.pl:336: system( "$^X -pi -e's/( $TestBin)/\$1 $bin/' $Repo/$file" )
perl-5.32.0/Porting/add-package.pl-337- and die "Could not add $bin to $file: $?\n";
##############################################
perl-5.32.0/Porting/add-package.pl-356-
perl-5.32.0/Porting/add-package.pl:357: unless( `grep $bin $Repo/$file` ) {
perl-5.32.0/Porting/add-package.pl-358- print $/.$/;
##############################################
perl-5.32.0/Porting/add-package.pl-363-
perl-5.32.0/Porting/add-package.pl:364: print `grep -nC1 $TestBin $Repo/$file`;
perl-5.32.0/Porting/add-package.pl-365- print $/.$/;
##############################################
perl-5.32.0/Porting/add-package.pl-450-
perl-5.32.0/Porting/add-package.pl:451: system( $cmd );
perl-5.32.0/Porting/add-package.pl-452- #and die "Could not write diff to '$diff': $?";
##############################################
perl-5.32.0/Porting/add-package.pl-466-
perl-5.32.0/Porting/add-package.pl:467: system( $cmd );
perl-5.32.0/Porting/add-package.pl-468- #and die "Could not write diff to '$diff': $?";
##############################################
perl-5.32.0/Porting/add-package.pl-479- chdir $Repo;
perl-5.32.0/Porting/add-package.pl:480: system( "git add $CPV $_" )
perl-5.32.0/Porting/add-package.pl-481- for ( @LibFiles, @NewFiles, @ChangedFiles,
##############################################
perl-5.32.0/Porting/bisect-runner.pl-31-
perl-5.32.0/Porting/bisect-runner.pl:32: foreach (`$gcc -print-search-dirs`) {
perl-5.32.0/Porting/bisect-runner.pl-33- next unless /^libraries: =(.*)/;
##############################################
perl-5.32.0/Porting/bisect-runner.pl-1086- my $command = '</dev/null ' . shift;
perl-5.32.0/Porting/bisect-runner.pl:1087: system($command) and croak_255("'$command' failed, \$!=$!, \$?=$?");
perl-5.32.0/Porting/bisect-runner.pl-1088-}
##############################################
perl-5.32.0/Porting/bisect-runner.pl-1336- my ($commit, @files) = @_;
perl-5.32.0/Porting/bisect-runner.pl:1337: my $patch = `git show $commit @files`;
perl-5.32.0/Porting/bisect-runner.pl-1338- if (!defined $patch) {
##############################################
perl-5.32.0/Porting/bisect-runner.pl-1346- my ($commit, @files) = @_;
perl-5.32.0/Porting/bisect-runner.pl:1347: my $patch = `git show -R $commit @files`;
perl-5.32.0/Porting/bisect-runner.pl-1348- if (!defined $patch) {
##############################################
perl-5.32.0/Porting/bisect-runner.pl-1369- die_255("$file is not executable.
perl-5.32.0/Porting/bisect-runner.pl:1370:system($file, ...) is always going to fail.
perl-5.32.0/Porting/bisect-runner.pl-1371-
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2218-+ case "$yyy" in
perl-5.32.0/Porting/bisect-runner.pl:2219:+ *=*) zzz=`echo "$yyy"|sed 's!=.*!!'`
perl-5.32.0/Porting/bisect-runner.pl-2220-+ case "$zzz" in
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2222-+ *) xxx=append
perl-5.32.0/Porting/bisect-runner.pl:2223:+ zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/Porting/bisect-runner.pl:2224:+ yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/Porting/bisect-runner.pl-2225-+ esac
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2229-+ '') case "$yyy" in
perl-5.32.0/Porting/bisect-runner.pl:2230:+ *:*) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/Porting/bisect-runner.pl:2231:+ yyy=`echo "$yyy"|sed 's!^[^:]*:!!'`
perl-5.32.0/Porting/bisect-runner.pl:2232:+ zzz=`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/Porting/bisect-runner.pl:2233:+ yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/Porting/bisect-runner.pl:2234:+ *) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/Porting/bisect-runner.pl:2235:+ yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
perl-5.32.0/Porting/bisect-runner.pl-2236-+ esac
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2521-+ lddlflags="-shared -fPIC $lddlflags"
perl-5.32.0/Porting/bisect-runner.pl:2522:+ libswanted=`echo $libswanted | sed 's/ dl / /'`
perl-5.32.0/Porting/bisect-runner.pl-2523-+ ;;
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2527-+ # Without this, dlopen() is crippled.
perl-5.32.0/Porting/bisect-runner.pl:2528:+ ELF=`${cc:-cc} -dM -E - </dev/null | grep __ELF__`
perl-5.32.0/Porting/bisect-runner.pl-2529-+ test -n "$ELF" && ldflags="-Wl,-E $ldflags"
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2555-+ lddlflags="-shared -fPIC $lddlflags"
perl-5.32.0/Porting/bisect-runner.pl:2556:+ libswanted=`echo $libswanted | sed 's/ dl / /'`
perl-5.32.0/Porting/bisect-runner.pl-2557- ;;
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2561-+ # Without this, dlopen() is crippled.
perl-5.32.0/Porting/bisect-runner.pl:2562:+ ELF=`${cc:-cc} -dM -E - </dev/null | grep __ELF__`
perl-5.32.0/Porting/bisect-runner.pl-2563-+ test -n "$ELF" && ldflags="-Wl,-E $ldflags"
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2577-@@ -54,6 +54,11 @@ alpha-2.[0-8]|mips-*|vax-*|powerpc-2.[0-7]|m88k-*)
perl-5.32.0/Porting/bisect-runner.pl:2578: libswanted=`echo $libswanted | sed 's/ dl / /'`
perl-5.32.0/Porting/bisect-runner.pl-2579- ;;
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2583-+ # Without this, dlopen() is crippled.
perl-5.32.0/Porting/bisect-runner.pl:2584:+ ELF=`${cc:-cc} -dM -E - </dev/null | grep __ELF__`
perl-5.32.0/Porting/bisect-runner.pl-2585-+ test -n "$ELF" && ldflags="-Wl,-E $ldflags"
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2615- case "$cccdlflags" in
perl-5.32.0/Porting/bisect-runner.pl:2616: *-fpic*) cccdlflags="`echo $cccdlflags|sed 's/-fpic/-fPIC/'`" ;;
perl-5.32.0/Porting/bisect-runner.pl-2617- *) cccdlflags="$cccdlflags -fPIC" ;;
##############################################
perl-5.32.0/Porting/bisect-runner.pl-2656- : the dependency named here will never exist
perl-5.32.0/Porting/bisect-runner.pl:2657: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Porting/bisect-runner.pl-2658-- dynamic_list="$dynamic_list lib/auto/$f/$base.$dlext"
##############################################
perl-5.32.0/Porting/corecpan.pl-37- unlink $packagefile;
perl-5.32.0/Porting/corecpan.pl:38: system("wget $url && gunzip $packagefile.gz") == 0
perl-5.32.0/Porting/corecpan.pl-39- or die "Failed to get package details\n";
##############################################
perl-5.32.0/Porting/checkVERSION.pl-43- no warnings;
perl-5.32.0/Porting/checkVERSION.pl:44: $result = eval($eval);
perl-5.32.0/Porting/checkVERSION.pl-45- warn "Could not eval '$eval' in $parsefile: $@" if $@;
##############################################
perl-5.32.0/Porting/newtests-perldelta.pl-47- grep { m!^[-+](?:t|ext)/.*\.t\s+! } # only added/removed tests
perl-5.32.0/Porting/newtests-perldelta.pl:48: `git diff $from..$to -- $manifest`;
perl-5.32.0/Porting/newtests-perldelta.pl-49-chomp @new_tests;
##############################################
perl-5.32.0/Porting/make_snapshot.pl-34-
perl-5.32.0/Porting/make_snapshot.pl:35:($sha1, $abbr,$tstamp)= split /\s+/, `git log --pretty='format:%H %h %ct' -1 $sha1`
perl-5.32.0/Porting/make_snapshot.pl-36- or die "Failed to parse '$sha1'\n";
##############################################
perl-5.32.0/Porting/make_snapshot.pl-48-
perl-5.32.0/Porting/make_snapshot.pl:49: system("git archive --format=tar --prefix=$prefix $sha1 > $path/$tar_file");
perl-5.32.0/Porting/make_snapshot.pl-50- my @branches=map { $is_bare ? $_ : "origin/$_" } (
##############################################
perl-5.32.0/Porting/make_snapshot.pl-61- $branch= $b and last
perl-5.32.0/Porting/make_snapshot.pl:62: if `git log --pretty='format:%H' $b | grep $sha1`;
perl-5.32.0/Porting/make_snapshot.pl-63- }
##############################################
perl-5.32.0/Porting/make_snapshot.pl-72- }
perl-5.32.0/Porting/make_snapshot.pl:73: system("tar -f $tar_file --transform='s,^$$,$prefix,g' --owner=root --group=root --mode=664 --append $$.patch");
perl-5.32.0/Porting/make_snapshot.pl-74- unlink "$$.patch";
perl-5.32.0/Porting/make_snapshot.pl:75: system("gzip -S .gz -9 $tar_file");
perl-5.32.0/Porting/make_snapshot.pl-76- rename "$tar_file.gz", "$gz_file";
##############################################
perl-5.32.0/Porting/GitUtils.pm-19- my $target= shift || 'HEAD';
perl-5.32.0/Porting/GitUtils.pm:20: chomp(my ($git_dir, $is_bare, $sha1)=`git rev-parse --git-dir --is-bare-repository $target`);
perl-5.32.0/Porting/GitUtils.pm-21- die "Not in a git repository!" if !$git_dir;
##############################################
perl-5.32.0/Porting/GitUtils.pm-43- my $cmd= "git name-rev --name-only --refs=$refs $sha1";
perl-5.32.0/Porting/GitUtils.pm:44: chomp($branch= `$cmd`);
perl-5.32.0/Porting/GitUtils.pm-45- last if $branch ne 'undefined';
##############################################
perl-5.32.0/Porting/GitUtils.pm-54- }
perl-5.32.0/Porting/GitUtils.pm:55: my $tstamp= iso_time_with_dot(`git log -1 --pretty="format:%ct" $sha1`);
perl-5.32.0/Porting/GitUtils.pm:56: chomp(my $describe= `git describe $sha1`);
perl-5.32.0/Porting/GitUtils.pm-57- join(" ", $branch, $tstamp, $sha1, $describe);
##############################################
perl-5.32.0/Porting/git-find-p4-change-26- die "no commit found" unless $commit;
perl-5.32.0/Porting/git-find-p4-change:27: system(git => checkout => $commit);
perl-5.32.0/Porting/git-find-p4-change-28-}
##############################################
perl-5.32.0/Porting/git-find-p4-change-30- if ( -t STDOUT or @ARGV ) {
perl-5.32.0/Porting/git-find-p4-change:31: system(qw(git log), $grep, "-$num", "--all", $before, @ARGV);
perl-5.32.0/Porting/git-find-p4-change-32- }
perl-5.32.0/Porting/git-find-p4-change-33- else {
perl-5.32.0/Porting/git-find-p4-change:34: system(qw(git rev-list -1 --all), $before, $grep);
perl-5.32.0/Porting/git-find-p4-change-35- }
##############################################
perl-5.32.0/Porting/new-perldelta.pl-101- and die "Could not run '$command', \$? = $?";
perl-5.32.0/Porting/new-perldelta.pl:102:git_add_modified(map {chomp $_; $_} `$^X Porting/pod_rules.pl --showfiles`);
perl-5.32.0/Porting/new-perldelta.pl-103-
##############################################
perl-5.32.0/Porting/exercise_makedef.pl-84- if ($?) {
perl-5.32.0/Porting/exercise_makedef.pl:85: print STDERR "`$^X makedef.pl @args` failed with $?\n";
perl-5.32.0/Porting/exercise_makedef.pl-86- print STDERR "See output in $prefix/$name.err\n";
##############################################
perl-5.32.0/Porting/epigraphs.pod-1600- I now stood ready to observe the full
perl-5.32.0/Porting/epigraphs.pod:1601: Extent of the new chasm thus laid bare,
perl-5.32.0/Porting/epigraphs.pod-1602- Drenched as it was in tears most miserable.
##############################################
perl-5.32.0/Porting/check-cpan-pollution-90- . $commit->{hash};
perl-5.32.0/Porting/check-cpan-pollution:91: print `$cmd`; # make sure git knows this isn't a terminal
perl-5.32.0/Porting/check-cpan-pollution-92- print "\n";
##############################################
perl-5.32.0/Porting/config_H-1497-/* HAS_DLADDR:
perl-5.32.0/Porting/config_H:1498: * This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/Porting/config_H-1499- * available to query dynamic linker information for an address.
##############################################
perl-5.32.0/Porting/config_H-1572-/* HAS_GETHOSTBYADDR:
perl-5.32.0/Porting/config_H:1573: * This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/Porting/config_H-1574- * available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/Porting/config_H-1619-/* HAS_GETNETBYADDR:
perl-5.32.0/Porting/config_H:1620: * This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/Porting/config_H-1621- * available to look up networks by their IP addresses.
##############################################
perl-5.32.0/Porting/config_H-4275- * prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/Porting/config_H:4276: * gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/Porting/config_H-4277- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/Porting/config_H-4283- * prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/Porting/config_H:4284: * getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/Porting/config_H-4285- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/Porting/config_H-4291- * prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/Porting/config_H:4292: * getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/Porting/config_H-4293- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/Porting/config_H-4299- * prototypes for getservent(), getservbyname(), and
perl-5.32.0/Porting/config_H:4300: * getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/Porting/config_H-4301- * them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/Porting/config_H-4314- * This symbol holds the type used for the 1st argument
perl-5.32.0/Porting/config_H:4315: * to gethostbyaddr().
perl-5.32.0/Porting/config_H-4316- */
##############################################
perl-5.32.0/Porting/config_H-4318- * This symbol holds the type used for the 2nd argument
perl-5.32.0/Porting/config_H:4319: * to gethostbyaddr().
perl-5.32.0/Porting/config_H-4320- */
##############################################
perl-5.32.0/Porting/config_H-4326- * This symbol holds the type used for the 1st argument to
perl-5.32.0/Porting/config_H:4327: * getnetbyaddr().
perl-5.32.0/Porting/config_H-4328- */
##############################################
perl-5.32.0/Porting/Glossary-666-
perl-5.32.0/Porting/Glossary:667:d_dladdr (d_dladdr.U):
perl-5.32.0/Porting/Glossary-668- This variable conditionally defines the HAS_DLADDR symbol, which
perl-5.32.0/Porting/Glossary:669: indicates to the C program that the dladdr() routine is available
perl-5.32.0/Porting/Glossary-670- to get a stack trace.
##############################################
perl-5.32.0/Porting/Glossary-1101-
perl-5.32.0/Porting/Glossary:1102:d_gethbyaddr (d_gethbyad.U):
perl-5.32.0/Porting/Glossary-1103- This variable conditionally defines the HAS_GETHOSTBYADDR symbol, which
perl-5.32.0/Porting/Glossary:1104: indicates to the C program that the gethostbyaddr() routine is available
perl-5.32.0/Porting/Glossary-1105- to look up hosts by their IP addresses.
##############################################
perl-5.32.0/Porting/Glossary-1170-
perl-5.32.0/Porting/Glossary:1171:d_getnbyaddr (d_getnbyad.U):
perl-5.32.0/Porting/Glossary-1172- This variable conditionally defines the HAS_GETNETBYADDR symbol, which
perl-5.32.0/Porting/Glossary:1173: indicates to the C program that the getnetbyaddr() routine is available
perl-5.32.0/Porting/Glossary-1174- to look up networks by their IP addresses.
##############################################
perl-5.32.0/Porting/Glossary-2422-
perl-5.32.0/Porting/Glossary:2423:d_siginfo_si_addr (d_siginfo_si.U):
perl-5.32.0/Porting/Glossary-2424- This variable conditionally defines the HAS_SIGINFO_SI_ADDR symbol,
##############################################
perl-5.32.0/Porting/Glossary-4421- This variable holds the type used for the 2nd argument to
perl-5.32.0/Porting/Glossary:4422: gethostbyaddr(). Usually, this is int or size_t or unsigned.
perl-5.32.0/Porting/Glossary:4423: This is only useful if you have gethostbyaddr(), naturally.
perl-5.32.0/Porting/Glossary-4424-
##############################################
perl-5.32.0/Porting/Glossary-4426- This variable holds the type used for the 1st argument to
perl-5.32.0/Porting/Glossary:4427: gethostbyaddr(). Usually, this is char * or void *, possibly
perl-5.32.0/Porting/Glossary-4428- with or without a const prefix.
perl-5.32.0/Porting/Glossary:4429: This is only useful if you have gethostbyaddr(), naturally.
perl-5.32.0/Porting/Glossary-4430-
##############################################
perl-5.32.0/Porting/Glossary-4437- This variable holds the type used for the 1st argument to
perl-5.32.0/Porting/Glossary:4438: getnetbyaddr(). Usually, this is int or long.
perl-5.32.0/Porting/Glossary:4439: This is only useful if you have getnetbyaddr(), naturally.
perl-5.32.0/Porting/Glossary-4440-
##############################################
perl-5.32.0/Porting/Glossary-4532- This variable is "true" if the components of libraries must be ordered
perl-5.32.0/Porting/Glossary:4533: (with `lorder $* | tsort`) before placing them in an archive. Set to
perl-5.32.0/Porting/Glossary-4534- "false" if ranlib or ar can generate random libraries.
##############################################
perl-5.32.0/Porting/makerel-94- print "$cmd\n";
perl-5.32.0/Porting/makerel:95: system($cmd);
perl-5.32.0/Porting/makerel-96-}
##############################################
perl-5.32.0/Porting/makerel-111-$cmd = "awk '{print \$1}' MANIFEST | cpio -pdm $relroot/$reldir";
perl-5.32.0/Porting/makerel:112:system($cmd) == 0
perl-5.32.0/Porting/makerel-113- or die "$cmd failed";
##############################################
perl-5.32.0/Porting/makerel-193- $cmd = "tar cf - $reldir | 7z a -tgzip -mx9 -bd -si $reldir.tar.gz";
perl-5.32.0/Porting/makerel:194: system($cmd) == 0 or die "$cmd failed";
perl-5.32.0/Porting/makerel-195-} else {
##############################################
perl-5.32.0/Porting/makerel-197- $cmd = "tar cf - $reldir | gzip --best > $reldir.tar.gz";
perl-5.32.0/Porting/makerel:198: system($cmd) == 0 or die "$cmd failed";
perl-5.32.0/Porting/makerel-199- if ($have_advdef) {
##############################################
perl-5.32.0/Porting/makerel-201- $cmd = "advdef -z -4 $reldir.tar.gz";
perl-5.32.0/Porting/makerel:202: system($cmd) == 0 or die "$cmd failed";
perl-5.32.0/Porting/makerel-203- }
##############################################
perl-5.32.0/Porting/makerel-208- $cmd = "tar cf - $reldir | xz -z -c > $reldir.tar.xz";
perl-5.32.0/Porting/makerel:209: system($cmd) == 0 or die "$cmd failed";
perl-5.32.0/Porting/makerel-210-}
##############################################
perl-5.32.0/Porting/makerel-213-
perl-5.32.0/Porting/makerel:214:system("ls -ld $perl*");
perl-5.32.0/Porting/makerel-215-print "\n";
##############################################
perl-5.32.0/Porting/makerel-218-for my $sha (qw(sha1 shasum sha1sum)) {
perl-5.32.0/Porting/makerel:219: if (`which $sha 2>$null`) {
perl-5.32.0/Porting/makerel:220: system("$sha $perl*.tar.*");
perl-5.32.0/Porting/makerel-221- last;
##############################################
perl-5.32.0/Porting/findrfuncs-111- # warn "#--- $exe\n";
perl-5.32.0/Porting/findrfuncs:112: for my $sym (`$NMU $exe 2>/dev/null`) {
perl-5.32.0/Porting/findrfuncs-113- chomp $sym;
##############################################
perl-5.32.0/Porting/git-deltatool-205- # git notes won't take an empty file as input
perl-5.32.0/Porting/git-deltatool:206: system("git notes edit -F $tempfh $id");
perl-5.32.0/Porting/git-deltatool-207- }
##############################################
perl-5.32.0/Porting/git-deltatool-226- push @editor, "-f" if $editor[0] =~ /^gvim/;
perl-5.32.0/Porting/git-deltatool:227: system(@editor, "$tempfh");
perl-5.32.0/Porting/git-deltatool-228- }
##############################################
perl-5.32.0/Porting/git-deltatool-399- my $cherrymaint = dirname($0) . "/cherrymaint";
perl-5.32.0/Porting/git-deltatool:400: system("$^X $cherrymaint --vote $id");
perl-5.32.0/Porting/git-deltatool-401- return; # false will re-prompt the same commit
##############################################
perl-5.32.0/Porting/Maintainers.pm-173- my $command = "git diff --name-only $ARGV[0]^ $ARGV[0]";
perl-5.32.0/Porting/Maintainers.pm:174: chomp (@Files = `$command`);
perl-5.32.0/Porting/Maintainers.pm-175- die "'$command' failed: $?" if $?;
##############################################
perl-5.32.0/Porting/expand-macro.pl-94-my $cmd = "$Config{make} $tryout";
perl-5.32.0/Porting/expand-macro.pl:95:system( $cmd ) == 0
perl-5.32.0/Porting/expand-macro.pl-96- or die "Couldn't launch [$cmd]: $! / $?";
##############################################
perl-5.32.0/Porting/cmpVERSION.pl-41- while(1) {
perl-5.32.0/Porting/cmpVERSION.pl:42: $check = `git describe --abbrev=0 $check 2>$null`;
perl-5.32.0/Porting/cmpVERSION.pl-43- chomp $check;
##############################################
perl-5.32.0/Porting/cmpVERSION.pl-58-
perl-5.32.0/Porting/cmpVERSION.pl:59:my $tag_exists = `git --no-pager tag -l $tag_to_compare 2>$null`;
perl-5.32.0/Porting/cmpVERSION.pl-60-chomp $tag_exists;
##############################################
perl-5.32.0/Porting/cmpVERSION.pl-155-
perl-5.32.0/Porting/cmpVERSION.pl:156:foreach (`git --no-pager diff --name-only $tag_to_compare --diff-filter=ACMRTUXB`) {
perl-5.32.0/Porting/cmpVERSION.pl-157- chomp;
##############################################
perl-5.32.0/Porting/cmpVERSION.pl-204- foreach (sort @{$module_diffs{$pm_file}}) {
perl-5.32.0/Porting/cmpVERSION.pl:205: print "# $_" for `$diff_cmd $q$_$q`;
perl-5.32.0/Porting/cmpVERSION.pl-206- }
##############################################
perl-5.32.0/Porting/cmpVERSION.pl-228- use open IN => ':raw';
perl-5.32.0/Porting/cmpVERSION.pl:229: return scalar `git --no-pager show $tag:$file 2>$null`;
perl-5.32.0/Porting/cmpVERSION.pl-230-}
##############################################
perl-5.32.0/Porting/bisect.pl-55-if (!defined $jobs &&
perl-5.32.0/Porting/bisect.pl:56: !($^O eq 'hpux' && system((defined $make ? $make : 'make')
perl-5.32.0/Porting/bisect.pl-57- . ' --version >/dev/null 2>&1'))) {
##############################################
perl-5.32.0/Porting/bisect.pl-66- $sysctl = "/usr$sysctl" unless -x $sysctl;
perl-5.32.0/Porting/bisect.pl:67: $cpus = $1 if `$sysctl hw.ncpu` =~ /^hw\.ncpu: (\d+)$/;
perl-5.32.0/Porting/bisect.pl-68- } elsif (-x '/usr/bin/getconf') {
##############################################
perl-5.32.0/Porting/bisect.pl-93-EOF
perl-5.32.0/Porting/bisect.pl:94: system("$^X -MCPAN -e shell");
perl-5.32.0/Porting/bisect.pl-95- }
##############################################
perl-5.32.0/Porting/bisect.pl-122- # Else use whichever is newer - HEAD, or the most recent stable tag.
perl-5.32.0/Porting/bisect.pl:123: if (`git rev-list -n1 HEAD ^$stable[-1]` eq "") {
perl-5.32.0/Porting/bisect.pl-124- $end = pop @stable;
##############################################
perl-5.32.0/Porting/bisect.pl-134- next unless $_;
perl-5.32.0/Porting/bisect.pl:135: $_ = `git rev-parse $_`;
perl-5.32.0/Porting/bisect.pl-136- die unless defined $_;
##############################################
perl-5.32.0/Porting/bisect.pl-187- my $commit = shift;
perl-5.32.0/Porting/bisect.pl:188: if (defined $start && `git rev-list -n1 $commit ^$start^` eq "") {
perl-5.32.0/Porting/bisect.pl-189- print "Skipping $commit, as it is earlier than $start\n";
##############################################
perl-5.32.0/Porting/bisect.pl-191- }
perl-5.32.0/Porting/bisect.pl:192: if (defined $end && `git rev-list -n1 $end ^$commit^` eq "") {
perl-5.32.0/Porting/bisect.pl-193- print "Skipping $commit, as it is more recent than $end\n";
##############################################
perl-5.32.0/Porting/bisect.pl-244- foreach my $try (@stable) {
perl-5.32.0/Porting/bisect.pl:245: if (`git rev-list -n1 $end ^$try^` eq "") {
perl-5.32.0/Porting/bisect.pl-246- print "Skipping $try, as it is more recent than end commit "
##############################################
perl-5.32.0/regexec.c-537- if ((STRLEN) (send - s) >= PERL_WORDSIZE
perl-5.32.0/regexec.c:538: + PERL_WORDSIZE * PERL_IS_SUBWORD_ADDR(s)
perl-5.32.0/regexec.c-539- - (PTR2nat(s) & PERL_WORD_BOUNDARY_MASK))
##############################################
perl-5.32.0/regexec.c-615- if ((STRLEN) (send - s) >= PERL_WORDSIZE
perl-5.32.0/regexec.c:616: + PERL_WORDSIZE * PERL_IS_SUBWORD_ADDR(s)
perl-5.32.0/regexec.c-617- - (PTR2nat(s) & PERL_WORD_BOUNDARY_MASK))
##############################################
perl-5.32.0/regexec.c-692- if ((STRLEN) (send - s) >= PERL_WORDSIZE
perl-5.32.0/regexec.c:693: + PERL_WORDSIZE * PERL_IS_SUBWORD_ADDR(s)
perl-5.32.0/regexec.c-694- - (PTR2nat(s) & PERL_WORD_BOUNDARY_MASK))
##############################################
perl-5.32.0/t/japh/abigail.t-258- } else {
perl-5.32.0/t/japh/abigail.t:259: my $output = `$command`;
perl-5.32.0/t/japh/abigail.t-260-
##############################################
perl-5.32.0/t/japh/abigail.t-262-
perl-5.32.0/t/japh/abigail.t:263: $output = `$command`;
perl-5.32.0/t/japh/abigail.t-264- is ($output, "", "Self corrected code $i");
##############################################
perl-5.32.0/t/japh/abigail.t-340- "\150\145\162\040\120\145\162\154\040\110\141\143\153\145\162".
perl-5.32.0/t/japh/abigail.t:341: "\042\040\076\040\057\144\145\166\057\164\164\171";`$@`
perl-5.32.0/t/japh/abigail.t-342-SKIP: Unix specific
##############################################
perl-5.32.0/t/perf/optree.t-114- or die
perl-5.32.0/t/perf/optree.t:115: "aassign eval('$code') failed: this test needs"
perl-5.32.0/t/perf/optree.t-116- . "to be rewritten:\n$@"
##############################################
perl-5.32.0/t/comp/multiline.t-81-
perl-5.32.0/t/comp/multiline.t:82:$out = (($^O eq 'MSWin32') || $^O eq 'NetWare') ? `type $filename`
perl-5.32.0/t/comp/multiline.t:83: : ($^O eq 'VMS') ? `type $filename.;0` # otherwise .LIS is assumed
perl-5.32.0/t/comp/multiline.t:84: : `cat $filename`;
perl-5.32.0/t/comp/multiline.t-85-
##############################################
perl-5.32.0/t/comp/require.t-374-foreach (sort keys %templates) {
perl-5.32.0/t/comp/require.t:375: $i++; do_require(bytes_to_utf($_, qq(print "ok $i # $_\\n"; 1;\n), 1));
perl-5.32.0/t/comp/require.t-376- if ($@ =~ /^(Unsupported script encoding \Q$_\E)/) {
##############################################
perl-5.32.0/t/comp/retainedlines.t-138-
perl-5.32.0/t/comp/retainedlines.t:139: eval (my $prog = "BEGIN{die}\n");
perl-5.32.0/t/comp/retainedlines.t-140-
##############################################
perl-5.32.0/t/op/grent.t-41- }
perl-5.32.0/t/op/grent.t:42: $where = "NIS group - $ypcat";
perl-5.32.0/t/op/grent.t-43- undef $reason;
##############################################
perl-5.32.0/t/op/grent.t-54- {
perl-5.32.0/t/op/grent.t:55: $where = "NetInfo group - $nidump";
perl-5.32.0/t/op/grent.t-56- undef $reason;
##############################################
perl-5.32.0/t/op/grent.t-65- undef $reason;
perl-5.32.0/t/op/grent.t:66: $where = "local $GR";
perl-5.32.0/t/op/grent.t-67- }
##############################################
perl-5.32.0/t/op/cproto.t-108-getgrnam ($)
perl-5.32.0/t/op/cproto.t:109:gethostbyaddr ($$)
perl-5.32.0/t/op/cproto.t-110-gethostbyname ($)
##############################################
perl-5.32.0/t/op/cproto.t-112-getlogin ()
perl-5.32.0/t/op/cproto.t:113:getnetbyaddr ($$)
perl-5.32.0/t/op/cproto.t-114-getnetbyname ($)
##############################################
perl-5.32.0/t/op/kill0.t-73-
perl-5.32.0/t/op/kill0.t:74: my $pid = system(1, $^X, 'op/kill0_child', $killfile);
perl-5.32.0/t/op/kill0.t-75- die 'PID is 0' if !$pid;
##############################################
perl-5.32.0/t/op/kill0.t-101- # no need to create another END block: already done earlier
perl-5.32.0/t/op/kill0.t:102: $pid = system(1, $^X, 'op/kill0_child', $killfile);
perl-5.32.0/t/op/kill0.t-103- die 'PID is 0' if !$pid;
##############################################
perl-5.32.0/t/op/lex_assign.t-235-ref $cstr # ref nonref
perl-5.32.0/t/op/lex_assign.t:236:`$runme -e "print qq[1\\n]"` # backtick skip(MSWin32)
perl-5.32.0/t/op/lex_assign.t:237:`$undefed` # backtick undef skip(MSWin32)
perl-5.32.0/t/op/lex_assign.t-238-'???' # glob (not currently OA_TARGLEX)
##############################################
perl-5.32.0/t/op/srand.t-54-# This test checks whether Perl called srand for you.
perl-5.32.0/t/op/srand.t:55:@first_run = `$^X -le "print int rand 100 for 1..100"`;
perl-5.32.0/t/op/srand.t-56-sleep(1); # in case our srand() is too time-dependent
perl-5.32.0/t/op/srand.t:57:@second_run = `$^X -le "print int rand 100 for 1..100"`;
perl-5.32.0/t/op/srand.t-58-
##############################################
perl-5.32.0/t/op/groups.t-116-
perl-5.32.0/t/op/groups.t:117: ok $ok1, "perl's `\$(' agrees with `${groups_command}'";
perl-5.32.0/t/op/groups.t-118- }
##############################################
perl-5.32.0/t/op/groups.t-203- $cmd = 'id -a 2>/dev/null || id 2>/dev/null';
perl-5.32.0/t/op/groups.t:204: $str = `$cmd`;
perl-5.32.0/t/op/groups.t-205- if ( $str && $str =~ /groups=/ ) {
##############################################
perl-5.32.0/t/op/groups.t-217- $cmd = 'id -Gn 2>/dev/null';
perl-5.32.0/t/op/groups.t:218: $str = `$cmd`;
perl-5.32.0/t/op/groups.t-219- if ( $str && $str !~ /^[\d\s]$/ ) {
##############################################
perl-5.32.0/t/op/groups.t-225- $cmd = 'groups 2>/dev/null';
perl-5.32.0/t/op/groups.t:226: $str = `$cmd`;
perl-5.32.0/t/op/groups.t-227- if ( $str ) {
##############################################
perl-5.32.0/t/op/sprintf2.t-321- my $result = sprintf "%$i\$s", @args;
perl-5.32.0/t/op/sprintf2.t:322: is $result, $args[$i-1]//"", "%NNN\$s where NNN=$i";
perl-5.32.0/t/op/sprintf2.t-323- my $j = ~$i;
perl-5.32.0/t/op/sprintf2.t-324- $result = eval { sprintf "%$j\$s", @args; };
perl-5.32.0/t/op/sprintf2.t:325: like $@, qr/Integer overflow/ , "%NNN\$s where NNN=~$i";
perl-5.32.0/t/op/sprintf2.t-326- }
##############################################
perl-5.32.0/t/op/pwent.t-128- if(defined <PW>) {
perl-5.32.0/t/op/pwent.t:129: $where = $PW;
perl-5.32.0/t/op/pwent.t-130- } else {
##############################################
perl-5.32.0/t/op/taint.t-146-
perl-5.32.0/t/op/taint.t:147: is(eval { `$echo 1` }, "1\n");
perl-5.32.0/t/op/taint.t-148-
##############################################
perl-5.32.0/t/op/taint.t-155- local $ENV{$v} = $TAINT;
perl-5.32.0/t/op/taint.t:156: last if eval { `$echo 1` };
perl-5.32.0/t/op/taint.t-157- last unless $@ =~ /^Insecure \$ENV\{$v\}/;
##############################################
perl-5.32.0/t/op/taint.t-164- $ENV{TERM} = 'e=mc2';
perl-5.32.0/t/op/taint.t:165: is(eval { `$echo 1` }, "1\n");
perl-5.32.0/t/op/taint.t-166- $ENV{TERM} = 'e=mc2' . $TAINT;
perl-5.32.0/t/op/taint.t:167: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-168- like($@, qr/^Insecure \$ENV\{TERM\}/);
##############################################
perl-5.32.0/t/op/taint.t-185- local $ENV{PATH} = $tmp;
perl-5.32.0/t/op/taint.t:186: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-187- # Message can be different depending on whether echo
##############################################
perl-5.32.0/t/op/taint.t-197- local $ENV{PATH} = '.';
perl-5.32.0/t/op/taint.t:198: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-199- like($@, qr/^Insecure (?:directory in )?\$ENV\{PATH\}/);
##############################################
perl-5.32.0/t/op/taint.t-203- local $ENV{PATH} = '/\:.';
perl-5.32.0/t/op/taint.t:204: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-205- like($@, qr/^Insecure (?:directory in )?\$ENV\{PATH\}/);
##############################################
perl-5.32.0/t/op/taint.t-211- $ENV{'DCL$PATH'} = $TAINT;
perl-5.32.0/t/op/taint.t:212: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-213- like($@, qr/^Insecure \$ENV\{DCL\$PATH\}/);
##############################################
perl-5.32.0/t/op/taint.t-218- $ENV{'DCL$PATH'} = $tmp;
perl-5.32.0/t/op/taint.t:219: is(eval { `$echo 1` }, undef);
perl-5.32.0/t/op/taint.t-220- like($@, qr/^Insecure directory in \$ENV\{DCL\$PATH\}/);
##############################################
perl-5.32.0/t/op/taint.t-1191- close $fh or die "Can't close $arg: $!";
perl-5.32.0/t/op/taint.t:1192: print `$Invoke_Perl "-T" $arg and some suspect arguments`;
perl-5.32.0/t/op/taint.t-1193- is($?, 0, "Exited with status $?");
##############################################
perl-5.32.0/t/op/taint.t-1210-{
perl-5.32.0/t/op/taint.t:1211: my $foo = `$echo abc`;
perl-5.32.0/t/op/taint.t-1212- is_tainted($foo);
##############################################
perl-5.32.0/t/op/taint.t-1307- # just because Errno possibly failing.
perl-5.32.0/t/op/taint.t:1308: ok(eval('$!{ENOENT}') ||
perl-5.32.0/t/op/taint.t-1309- $! == 2 || # File not found
##############################################
perl-5.32.0/t/op/taint.t-1334-
perl-5.32.0/t/op/taint.t:1335: violates_taint(sub { `$echo 1$foo` }, '``', 'backticks');
perl-5.32.0/t/op/taint.t-1336-
##############################################
perl-5.32.0/t/op/ver.t-182-
perl-5.32.0/t/op/ver.t:183:# See if sane addr and gethostbyaddr() work
perl-5.32.0/t/op/ver.t:184:eval { require Socket; gethostbyaddr(v127.0.0.1, &Socket::AF_INET) };
perl-5.32.0/t/op/ver.t-185-if ($@) {
##############################################
perl-5.32.0/t/op/ver.t-192- my $host;
perl-5.32.0/t/op/ver.t:193: eval { $host = gethostbyaddr($ip,&Socket::AF_INET) };
perl-5.32.0/t/op/ver.t-194- like($@, qr/Wide character/, "Non-bytes leak to gethostbyaddr");
##############################################
perl-5.32.0/t/op/fork.t-263- sleep 1;
perl-5.32.0/t/op/fork.t:264: print "parent before: " . `$getenv`;
perl-5.32.0/t/op/fork.t-265- $ENV{TST} = 'bar';
perl-5.32.0/t/op/fork.t:266: print "parent after: " . `$getenv`;
perl-5.32.0/t/op/fork.t-267-}
perl-5.32.0/t/op/fork.t-268-else {
perl-5.32.0/t/op/fork.t:269: print "child before: " . `$getenv`;
perl-5.32.0/t/op/fork.t-270- $ENV{TST} = 'baz';
perl-5.32.0/t/op/fork.t:271: print "child after: " . `$getenv`;
perl-5.32.0/t/op/fork.t-272-}
##############################################
perl-5.32.0/t/op/fork.t-303-else {
perl-5.32.0/t/op/fork.t:304: exec("$echo foo");
perl-5.32.0/t/op/fork.t-305-}
##############################################
perl-5.32.0/t/op/magic.t-75- Win32::SetConsoleOutputCP(Win32::GetACP());
perl-5.32.0/t/op/magic.t:76: (my $set = `set $key 2>nul`) =~ s/\r\n$/\n/;
perl-5.32.0/t/op/magic.t-77- Win32::SetConsoleOutputCP($cp);
##############################################
perl-5.32.0/t/op/magic.t-79- } elsif ($Is_VMS) {
perl-5.32.0/t/op/magic.t:80: my $eqv = `write sys\$output f\$trnlnm("\Q$key\E")`;
perl-5.32.0/t/op/magic.t-81- # A single null byte in the equivalence string means
##############################################
perl-5.32.0/t/op/magic.t-107-if ($Is_MSWin32) { like `set FOO`, qr/^(?:FOO=)?hi there$/m; }
perl-5.32.0/t/op/magic.t:108:elsif ($Is_VMS) { is `write sys\$output f\$trnlnm("FOO")`, "hi there\n"; }
perl-5.32.0/t/op/magic.t:109:else { is `echo \$FOO`, "hi there\n"; }
perl-5.32.0/t/op/magic.t-110-
##############################################
perl-5.32.0/t/op/magic.t-353- ok chmod(0755, $script) or diag $!;
perl-5.32.0/t/op/magic.t:354: $_ = $Is_VMS ? `$perl $script` : `$script`;
perl-5.32.0/t/op/magic.t-355- s/\.exe//i if $Is_Dos or $Is_Cygwin or $Is_os2;
##############################################
perl-5.32.0/t/op/magic.t-366- }
perl-5.32.0/t/op/magic.t:367: $_ = `$perl $script`;
perl-5.32.0/t/op/magic.t-368- s/\.exe//i if $Is_Dos or $Is_os2 or $Is_Cygwin;
##############################################
perl-5.32.0/t/op/magic.t-421- no warnings;
perl-5.32.0/t/op/magic.t:422: my $res = `$cmd`;
perl-5.32.0/t/op/magic.t-423- skip "Couldn't shell out to '$cmd', returned code $?", 2 if $?;
##############################################
perl-5.32.0/t/op/magic.t-739- } else {
perl-5.32.0/t/op/magic.t:740: is `echo \$foo`, "\n";
perl-5.32.0/t/op/magic.t-741- }
##############################################
perl-5.32.0/t/op/magic.t-814- # an empty header line, grab only the last line.
perl-5.32.0/t/op/magic.t:815: my $ps = (`ps -o command= -p $$`)[-1];
perl-5.32.0/t/op/magic.t-816- return if $?;
##############################################
perl-5.32.0/t/op/sprintf.t-28- my $hw_model;
perl-5.32.0/t/op/sprintf.t:29: chomp($hw_model = `write sys\$output f\$getsyi("HW_MODEL")`);
perl-5.32.0/t/op/sprintf.t-30- $Is_VMS_VAX = $hw_model < 1024 ? 1 : 0;
##############################################
perl-5.32.0/t/op/alarm.t-40- alarm 3;
perl-5.32.0/t/op/alarm.t:41: system(qq{$Perl -e "sleep 6"});
perl-5.32.0/t/op/alarm.t-42- $end_time = time;
##############################################
perl-5.32.0/t/op/signatures.t-259-is eval("t023()"), "azy";
perl-5.32.0/t/op/signatures.t:260:is eval("t023(sub { \"x\".\$_[0].\"x\" })"), "xaxy";
perl-5.32.0/t/op/signatures.t:261:is eval("t023(sub { \"x\".\$_[0].\"x\" }, 789)"), undef;
perl-5.32.0/t/op/signatures.t-262-like $@, qr/\AToo many arguments for subroutine 'main::t023' at \(eval \d+\) line 1\.\n\z/;
##############################################
perl-5.32.0/t/op/signatures.t-1135-is prototype($t103), undef;
perl-5.32.0/t/op/signatures.t:1136:is eval("\$t103->()"), undef;
perl-5.32.0/t/op/signatures.t-1137-like $@, qr/\AToo few arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
perl-5.32.0/t/op/signatures.t:1138:is eval("\$t103->(0)"), "z";
perl-5.32.0/t/op/signatures.t:1139:is eval("\$t103->(456)"), 456;
perl-5.32.0/t/op/signatures.t:1140:is eval("\$t103->(456, 789)"), undef;
perl-5.32.0/t/op/signatures.t-1141-like $@, qr/\AToo many arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
perl-5.32.0/t/op/signatures.t:1142:is eval("\$t103->(456, 789, 987)"), undef;
perl-5.32.0/t/op/signatures.t-1143-like $@, qr/\AToo many arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
##############################################
perl-5.32.0/t/op/signatures.t-1147-is prototype($t118), "\$";
perl-5.32.0/t/op/signatures.t:1148:is eval("\$t118->()"), undef;
perl-5.32.0/t/op/signatures.t-1149-like $@, qr/\AToo few arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
perl-5.32.0/t/op/signatures.t:1150:is eval("\$t118->(0)"), "z";
perl-5.32.0/t/op/signatures.t:1151:is eval("\$t118->(456)"), 456;
perl-5.32.0/t/op/signatures.t:1152:is eval("\$t118->(456, 789)"), undef;
perl-5.32.0/t/op/signatures.t-1153-like $@, qr/\AToo many arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
perl-5.32.0/t/op/signatures.t:1154:is eval("\$t118->(456, 789, 987)"), undef;
perl-5.32.0/t/op/signatures.t-1155-like $@, qr/\AToo many arguments for subroutine 'main::__ANON__' at \(eval \d+\) line 1\.\n\z/;
##############################################
perl-5.32.0/t/op/signatures.t-1160-is eval("t033()"), "azy";
perl-5.32.0/t/op/signatures.t:1161:is eval("t033(sub { \"x\".\$_[0].\"x\" })"), "xaxy";
perl-5.32.0/t/op/signatures.t:1162:is eval("t033(sub { \"x\".\$_[0].\"x\" }, 789)"), undef;
perl-5.32.0/t/op/signatures.t-1163-like $@, qr/\AToo many arguments for subroutine 'main::t033' at \(eval \d+\) line 1\.\n\z/;
##############################################
perl-5.32.0/t/op/signatures.t-1168-is eval("t133()"), "222z/az";
perl-5.32.0/t/op/signatures.t:1169:is eval("t133(sub { \"x\".(\$_[0] // \"u\").\"x\" })"), "xux/xax";
perl-5.32.0/t/op/signatures.t:1170:is eval("t133(sub { \"x\".(\$_[0] // \"u\").\"x\" }, 789)"), undef;
perl-5.32.0/t/op/signatures.t-1171-like $@, qr/\AToo many arguments for subroutine 'main::t133' at \(eval \d+\) line 1\.\n\z/;
##############################################
perl-5.32.0/t/op/signatures.t-1178-is eval("t134()"), "apz/bqz";
perl-5.32.0/t/op/signatures.t:1179:is eval("t134(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" })"),
perl-5.32.0/t/op/signatures.t-1180- "xax/xbqx";
perl-5.32.0/t/op/signatures.t:1181:is eval("t134(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" }, 789)"),
perl-5.32.0/t/op/signatures.t-1182- undef;
##############################################
perl-5.32.0/t/op/signatures.t-1190-is eval("t135()"), "apz/bqz";
perl-5.32.0/t/op/signatures.t:1191:is eval("t135(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" })"),
perl-5.32.0/t/op/signatures.t-1192- "xax/xbqx";
perl-5.32.0/t/op/signatures.t:1193:is eval("t135(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" }, 789)"),
perl-5.32.0/t/op/signatures.t-1194- undef;
##############################################
perl-5.32.0/t/op/signatures.t-1204-is eval("t132()"), "apz222p/bqzuq";
perl-5.32.0/t/op/signatures.t:1205:is eval("t132(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" })"),
perl-5.32.0/t/op/signatures.t-1206- "xax/xbqx";
perl-5.32.0/t/op/signatures.t:1207:is eval("t132(sub { \"x\".(\$_[1] // sub{\$_[0]})->(\$_[0]).\"x\" }, 789)"),
perl-5.32.0/t/op/signatures.t-1208- undef;
##############################################
perl-5.32.0/t/op/yadayada.t-59-) {
perl-5.32.0/t/op/yadayada.t:60: is eval($_), undef;
perl-5.32.0/t/op/yadayada.t-61- like $@, qr/\Asyntax error /;
##############################################
perl-5.32.0/t/op/eval.t-90- my $b = "right";
perl-5.32.0/t/op/eval.t:91: is(eval('"$b"'), $b);
perl-5.32.0/t/op/eval.t-92- };
##############################################
perl-5.32.0/t/op/eval.t-99- my $b = "right";
perl-5.32.0/t/op/eval.t:100: is(eval('"$b"'), $b);
perl-5.32.0/t/op/eval.t-101- };
##############################################
perl-5.32.0/t/op/eval.t-269- sub fred2 {
perl-5.32.0/t/op/eval.t:270: is(eval('$zzz'), 1);
perl-5.32.0/t/op/eval.t-271- }
##############################################
perl-5.32.0/t/op/eval.t-281- my @a = sort
perl-5.32.0/t/op/eval.t:282: { is(eval('$zzz'), 2); $a <=> $b }
perl-5.32.0/t/op/eval.t-283- 2, 1;
##############################################
perl-5.32.0/t/op/exec.t-70-# newline insensitive and newline sensitive tests.
perl-5.32.0/t/op/exec.t:71:my $echo_out = `$Perl -e "print 'ok'" | $Perl -le "print <STDIN>"`;
perl-5.32.0/t/op/exec.t-72-$echo_out =~ s/\n\n/\n/g;
##############################################
perl-5.32.0/t/op/exec.t-79-
perl-5.32.0/t/op/exec.t:80: is( scalar `$Perl -e "print 'ok'"`,
perl-5.32.0/t/op/exec.t-81- "ok", 'no extra newlines on ``' );
perl-5.32.0/t/op/exec.t-82-
perl-5.32.0/t/op/exec.t:83: is( scalar `$Perl -e "print 'ok'" | $Perl -e "print <STDIN>"`,
perl-5.32.0/t/op/exec.t-84- "ok", 'no extra newlines on pipes');
perl-5.32.0/t/op/exec.t-85-
perl-5.32.0/t/op/exec.t:86: is( scalar `$Perl -le "print 'ok'" | $Perl -le "print <STDIN>"`,
perl-5.32.0/t/op/exec.t-87- "ok\n\n", 'doubled up newlines');
perl-5.32.0/t/op/exec.t-88-
perl-5.32.0/t/op/exec.t:89: is( scalar `$Perl -e "print 'ok'" | $Perl -le "print <STDIN>"`,
perl-5.32.0/t/op/exec.t-90- "ok\n", 'extra newlines on inside pipes');
perl-5.32.0/t/op/exec.t-91-
perl-5.32.0/t/op/exec.t:92: is( scalar `$Perl -le "print 'ok'" | $Perl -e "print <STDIN>"`,
perl-5.32.0/t/op/exec.t-93- "ok\n", 'extra newlines on outgoing pipes');
##############################################
perl-5.32.0/t/op/exec.t-102-
perl-5.32.0/t/op/exec.t:103:is( system(qq{$Perl -e "exit 0"}), 0, 'Explicit exit of 0' );
perl-5.32.0/t/op/exec.t-104-
perl-5.32.0/t/op/exec.t-105-my $exit_one = $vms_exit_mode ? 4 << 8 : 1 << 8;
perl-5.32.0/t/op/exec.t:106:is( system(qq{$Perl "-I../lib" -e "use vmsish qw(hushed); exit 1"}), $exit_one,
perl-5.32.0/t/op/exec.t-107- 'Explicit exit of 1' );
##############################################
perl-5.32.0/t/op/exec.t-122-
perl-5.32.0/t/op/exec.t:123:is( `$Perl -le "print 'ok'"`, "ok\n", 'basic ``' );
perl-5.32.0/t/op/exec.t-124-is( <<`END`, "ok\n", '<<`HEREDOC`' );
##############################################
perl-5.32.0/t/op/exec.t-132-{
perl-5.32.0/t/op/exec.t:133: sub rpecho { qq($Perl -le "print '$_[0]'") }
perl-5.32.0/t/op/exec.t-134- is scalar(readpipe(rpecho("b"))), "b\n",
##############################################
perl-5.32.0/t/op/exec.t-151- foreach my $lvalue ("my \$r", "my \@r") {
perl-5.32.0/t/op/exec.t:152: eval("$lvalue = readpipe$args if 0");
perl-5.32.0/t/op/exec.t-153- like $@, qr/\AToo many arguments for /;
##############################################
perl-5.32.0/t/op/exec.t-160- sub readpipe { pop }
perl-5.32.0/t/op/exec.t:161: ::is `${\"hello"}`, 'hello',
perl-5.32.0/t/op/exec.t-162- 'overridden `` interpolates [perl #115330]';
##############################################
perl-5.32.0/t/op/exec.t-204-$exit_statement = qq/"$exit_statement"/ if $^O eq 'VMS';
perl-5.32.0/t/op/exec.t:205:is system($^X, "-e", $exit_statement, $cr), 0,
perl-5.32.0/t/op/exec.t-206- "system args have magic processed exactly once";
##############################################
perl-5.32.0/t/op/exec.t-210-$exit_statement = qq/"$exit_statement"/ if $^O eq 'VMS';
perl-5.32.0/t/op/exec.t:211:is system($^X, "-e", $exit_statement, "$$", $$), 0,
perl-5.32.0/t/op/exec.t-212- "system args have magic processed before fork";
##############################################
perl-5.32.0/t/op/die_exit.t-66- if ($^O eq 'MSWin32' || $^O eq 'NetWare' || $^O eq 'VMS') {
perl-5.32.0/t/op/die_exit.t:67: system(qq{$^X -e "\$! = $bang; \$? = $query; $code"});
perl-5.32.0/t/op/die_exit.t-68- }
perl-5.32.0/t/op/die_exit.t-69- else {
perl-5.32.0/t/op/die_exit.t:70: system(qq{$^X -e '\$! = $bang; \$? = $query; $code'});
perl-5.32.0/t/op/die_exit.t-71- }
##############################################
perl-5.32.0/t/op/runlevel.t-122-sub foo {
perl-5.32.0/t/op/runlevel.t:123: $a <=> $b unless eval('$a == 0 ? bless undef : ($a <=> $b)');
perl-5.32.0/t/op/runlevel.t-124-}
##############################################
perl-5.32.0/t/op/runlevel.t-218-sub foo {
perl-5.32.0/t/op/runlevel.t:219: $a <=> $b unless eval('$a == 0 ? die("foo\n") : ($a <=> $b)');
perl-5.32.0/t/op/runlevel.t-220-}
##############################################
perl-5.32.0/t/op/filetest.t-123- lstat $ro_empty_file;
perl-5.32.0/t/op/filetest.t:124: `ln -s $ro_empty_file 1`;
perl-5.32.0/t/op/filetest.t-125- isnt(-l -e _, 1, 'stacked -l uses previous stat, not previous retval');
##############################################
perl-5.32.0/t/op/override.t-136- local *CORE::GLOBAL::require = sub {
perl-5.32.0/t/op/override.t:137: CORE::require($_[0]);
perl-5.32.0/t/op/override.t-138- };
##############################################
perl-5.32.0/t/op/kill0_child-7-
perl-5.32.0/t/op/kill0_child:8:system(1, $^X, '-e', 'sleep 5; print qq|not ok 9999 - inner child process wasn\'t killed\n|;');
perl-5.32.0/t/op/kill0_child:9:system('echo outer child started > "'.$ARGV[0].'"');
perl-5.32.0/t/op/kill0_child-10-sleep 5;
perl-5.32.0/t/op/kill0_child-11-
perl-5.32.0/t/op/kill0_child:12:# execution won't reach here if the test is successful
perl-5.32.0/t/op/kill0_child-13-print "not ok 9998 - outer child process wasn\'t killed\n";
##############################################
perl-5.32.0/t/op/tie.t-706- $s .= "-$i";
perl-5.32.0/t/op/tie.t:707: do_require($txt[$i], 0) if $e;;
perl-5.32.0/t/op/tie.t:708: do_require($txt[$i], 1);
perl-5.32.0/t/op/tie.t-709- }
##############################################
perl-5.32.0/t/op/cmpchain.t-25- foreach my $c1 (@nceqop) {
perl-5.32.0/t/op/cmpchain.t:26: is eval("sub { \$a $c0 \$b $c1 \$c }"), undef,
perl-5.32.0/t/op/cmpchain.t-27- "$c0 $c1 non-associative";
##############################################
perl-5.32.0/t/op/cmpchain.t-31- foreach my $e (@cheqop) {
perl-5.32.0/t/op/cmpchain.t:32: is eval("sub { \$a $c \$b $e \$c }"), undef, "$c $e non-associative";
perl-5.32.0/t/op/cmpchain.t:33: is eval("sub { \$a $e \$b $c \$c }"), undef, "$e $c non-associative";
perl-5.32.0/t/op/cmpchain.t-34- }
##############################################
perl-5.32.0/t/op/cmpchain.t-38- foreach my $e1 (@cheqop) {
perl-5.32.0/t/op/cmpchain.t:39: is eval("sub { \$a $c \$b $e0 \$c $e1 \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-40- "$c $e0 $e1 non-associative";
perl-5.32.0/t/op/cmpchain.t:41: is eval("sub { \$a $e0 \$b $e1 \$c $c \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-42- "$e0 $e1 $c non-associative";
##############################################
perl-5.32.0/t/op/cmpchain.t-48- foreach my $c1 (@ncrelop) {
perl-5.32.0/t/op/cmpchain.t:49: is eval("sub { \$a $c0 \$b $c1 \$c }"), undef,
perl-5.32.0/t/op/cmpchain.t-50- "$c0 $c1 non-associative";
##############################################
perl-5.32.0/t/op/cmpchain.t-54- foreach my $e (@chrelop) {
perl-5.32.0/t/op/cmpchain.t:55: is eval("sub { \$a $c \$b $e \$c }"), undef, "$c $e non-associative";
perl-5.32.0/t/op/cmpchain.t:56: is eval("sub { \$a $e \$b $c \$c }"), undef, "$e $c non-associative";
perl-5.32.0/t/op/cmpchain.t-57- }
##############################################
perl-5.32.0/t/op/cmpchain.t-61- foreach my $e1 (@chrelop) {
perl-5.32.0/t/op/cmpchain.t:62: is eval("sub { \$a $c \$b $e0 \$c $e1 \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-63- "$c $e0 $e1 non-associative";
perl-5.32.0/t/op/cmpchain.t:64: is eval("sub { \$a $e0 \$b $e1 \$c $c \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-65- "$e0 $e1 $c non-associative";
##############################################
perl-5.32.0/t/op/cmpchain.t-71- foreach my $e1 (@cheqop) {
perl-5.32.0/t/op/cmpchain.t:72: isnt eval("sub { \$a $e0 \$b $e1 \$c }"), undef, "$e0 $e1 legal";
perl-5.32.0/t/op/cmpchain.t-73- }
##############################################
perl-5.32.0/t/op/cmpchain.t-76- foreach my $r1 (@chrelop) {
perl-5.32.0/t/op/cmpchain.t:77: isnt eval("sub { \$a $r0 \$b $r1 \$c }"), undef, "$r0 $r1 legal";
perl-5.32.0/t/op/cmpchain.t-78- }
##############################################
perl-5.32.0/t/op/cmpchain.t-82- foreach my $e2 (@cheqop) {
perl-5.32.0/t/op/cmpchain.t:83: isnt eval("sub { \$a $e0 \$b $e1 \$c $e2 \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-84- "$e0 $e1 $e2 legal";
##############################################
perl-5.32.0/t/op/cmpchain.t-90- foreach my $r2 (@chrelop) {
perl-5.32.0/t/op/cmpchain.t:91: isnt eval("sub { \$a $r0 \$b $r1 \$c $r2 \$d }"), undef,
perl-5.32.0/t/op/cmpchain.t-92- "$r0 $r1 $r2 legal";
##############################################
perl-5.32.0/t/op/pack.t-455- my $uu = <<'EOUU';
perl-5.32.0/t/op/pack.t:456:M` $"`P0%!@<("0H+# T.#Q`1$A,4%187&!D:&QP='A\@(2(C)"4F)R@I*BLL
perl-5.32.0/t/op/pack.t-457-M+2XO,#$R,S0U-C<X.3H[/#T^/T!!0D-$149'2$E*2TQ-3D]045)35%565UA9
##############################################
perl-5.32.0/t/op/require_errors.t-196- eval {
perl-5.32.0/t/op/require_errors.t:197: require($file);
perl-5.32.0/t/op/require_errors.t-198- };
##############################################
perl-5.32.0/t/win32/system_tests-112- note "####### '$cmdstr'";
perl-5.32.0/t/win32/system_tests:113: if (system($cmdstr) != 0) {
perl-5.32.0/t/win32/system_tests-114- print "Failed, status($?)\n";
##############################################
perl-5.32.0/t/win32/system_tests-117- $^D = 1; # -Dp
perl-5.32.0/t/win32/system_tests:118: system($cmdstr);
perl-5.32.0/t/win32/system_tests-119- }
##############################################
perl-5.32.0/t/win32/runenv.t-56- my $stderr_cache = tmpnam();
perl-5.32.0/t/win32/runenv.t:57: my $stdout = `$PERL @$args 2>$stderr_cache`;
perl-5.32.0/t/win32/runenv.t-58- my $stderr = '';
##############################################
perl-5.32.0/t/win32/system.t-106- note "$Config{cc} $Config{ccflags} $exename.c";
perl-5.32.0/t/win32/system.t:107: if (system("$Config{cc} $Config{ccflags} $minus_o $exename.c >log 2>&1") != 0) {
perl-5.32.0/t/win32/system.t-108- note "Could not compile $exename.c, status $?";
##############################################
perl-5.32.0/t/porting/authors.t-31- # This hardcoded origin/ isn't great, but I'm not sure how to better fix it
perl-5.32.0/t/porting/authors.t:32: my $common_ancestor = `git merge-base "origin/$ENV{GITHUB_BASE_REF}" "HEAD~2" 2>/dev/null`;
perl-5.32.0/t/porting/authors.t-33-
##############################################
perl-5.32.0/t/porting/re_context.t-30- grep !/^[0123]$/, # $0, and $1, ..$3 allowed
perl-5.32.0/t/porting/re_context.t:31: grep /^(?:\d+|[`'&])$/, # numeric and $`, $&, $' vars
perl-5.32.0/t/porting/re_context.t-32- sort keys %::;
##############################################
perl-5.32.0/t/porting/globvar.t-25-my $trial = "nm globals$Config{_o} 2>&1";
perl-5.32.0/t/porting/globvar.t:26:my $yes = `$trial`;
perl-5.32.0/t/porting/globvar.t-27-
perl-5.32.0/t/porting/globvar.t:28:skip_all("Could not run `$trial`") if $?;
perl-5.32.0/t/porting/globvar.t-29-
##############################################
perl-5.32.0/t/porting/globvar.t-31-
perl-5.32.0/t/porting/globvar.t:32:skip_all("Could not spot definition of PL_Yes in output of `$trial`")
perl-5.32.0/t/porting/globvar.t-33- unless $yes =~ /${defined}PL_Yes/m;
##############################################
perl-5.32.0/t/porting/extrefs.t-116- close $cmdfile;
perl-5.32.0/t/porting/extrefs.t:117: system("\@ $tmp.com");
perl-5.32.0/t/porting/extrefs.t-118- $ok = $?==0;
##############################################
perl-5.32.0/t/porting/extrefs.t-124- printf "cccmd = $cccmd\n" if $VERBOSE;
perl-5.32.0/t/porting/extrefs.t:125: my $res = system($cccmd);
perl-5.32.0/t/porting/extrefs.t-126- $ok = defined($res) && $res == 0 && -s $tmp_exe && -x _;
##############################################
perl-5.32.0/t/porting/pending-author.t-33-my $devnull = File::Spec->devnull;
perl-5.32.0/t/porting/pending-author.t:34:my @lines = `git status --porcelain 2>$devnull`;
perl-5.32.0/t/porting/pending-author.t-35-skip_all("git status --porcelain doesn't seem to work here")
##############################################
perl-5.32.0/t/porting/pending-author.t-41- my $key = shift;
perl-5.32.0/t/porting/pending-author.t:42: my $value = `git config --get user.$key`;
perl-5.32.0/t/porting/pending-author.t-43- unless (defined $value && $value =~ /\S/) {
##############################################
perl-5.32.0/t/run/dtrace.t-16-
perl-5.32.0/t/run/dtrace.t:17: `$dtrace -V` or skip_all("$dtrace unavailable");
perl-5.32.0/t/run/dtrace.t-18-
perl-5.32.0/t/run/dtrace.t:19: my $result = `$dtrace -qnBEGIN -c'$Perl -e 1' 2>&1`;
perl-5.32.0/t/run/dtrace.t-20- $? && skip_all("Apparently can't probe using $dtrace (perhaps you need root?): $result");
##############################################
perl-5.32.0/t/run/script.t-13-
perl-5.32.0/t/run/script.t:14:$x = `$Perl -le "print 'ok';"`;
perl-5.32.0/t/run/script.t-15-
##############################################
perl-5.32.0/t/run/script.t-21-
perl-5.32.0/t/run/script.t:22:$x = `$Perl $filename`;
perl-5.32.0/t/run/script.t-23-
##############################################
perl-5.32.0/t/run/script.t-25-
perl-5.32.0/t/run/script.t:26:$x = `$Perl <$filename`;
perl-5.32.0/t/run/script.t-27-
##############################################
perl-5.32.0/t/run/switchF1.t-34-$result = "ok $count - complete test of alternate delimiters in -F\n";
perl-5.32.0/t/run/switchF1.t:35:print system ($^X, $file) ? "not $result" : $result;
perl-5.32.0/t/run/switchF1.t-36-
##############################################
perl-5.32.0/t/run/exit.t-14- $code = "\"" . $code . "\"" if $^O eq 'VMS'; #VMS needs quotes for this.
perl-5.32.0/t/run/exit.t:15: return system($^X, "-e", $code);
perl-5.32.0/t/run/exit.t-16-}
##############################################
perl-5.32.0/t/run/fresh_perl.t-545-my $foo = "ok 2\n";
perl-5.32.0/t/run/fresh_perl.t:546:myeval('sub foo { local $foo = "ok 1\n"; print $foo; }');
perl-5.32.0/t/run/fresh_perl.t-547-die $@ if $@;
##############################################
perl-5.32.0/t/run/cloexec.t-89- open STDERR, ">$tmperr" or die "open '$tmperr': $!";
perl-5.32.0/t/run/cloexec.t:90: my $out = `$cmd`;
perl-5.32.0/t/run/cloexec.t-91- my $rc = $? >> 8;
##############################################
perl-5.32.0/t/run/cloexec.t-106- my $cmd = qq{$Perl -e $quote$Child_prog$quote $expected_fd};
perl-5.32.0/t/run/cloexec.t:107: my $out = `$cmd`;
perl-5.32.0/t/run/cloexec.t-108- my $rc = $? >> 8;
##############################################
perl-5.32.0/t/run/switcht.t-18-
perl-5.32.0/t/run/switcht.t:19:my $out = `$Perl -le "print q(Hello)"`;
perl-5.32.0/t/run/switcht.t-20-is( $out, "Hello\n", '`` worked' );
##############################################
perl-5.32.0/t/run/switcht.t-25- $warning = '';
perl-5.32.0/t/run/switcht.t:26: my $out = `$Perl -le "print q(Hello)"`;
perl-5.32.0/t/run/switcht.t-27- is( $out, "Hello\n", '`` worked' );
##############################################
perl-5.32.0/t/test.pl-205- my $commit = '8d063cd8450e59ea1c611a2f4f5a21059a2804f1';
perl-5.32.0/t/test.pl:206: my $out = `git rev-parse --verify --quiet '$commit^{commit}'`;
perl-5.32.0/t/test.pl-207- chomp $out;
##############################################
perl-5.32.0/t/test.pl-797-
perl-5.32.0/t/test.pl:798: $result = `$runperl`;
perl-5.32.0/t/test.pl-799- } else {
perl-5.32.0/t/test.pl:800: $result = `$runperl`;
perl-5.32.0/t/test.pl-801- }
##############################################
perl-5.32.0/t/test.pl-1647- }
perl-5.32.0/t/test.pl:1648: $watchdog = system({ $runperl } 1, $runperl, '-e', $prog);
perl-5.32.0/t/test.pl-1649- }
##############################################
perl-5.32.0/t/test.pl-1651- my $cmd = _create_runperl(prog => $prog);
perl-5.32.0/t/test.pl:1652: $watchdog = system(1, $cmd);
perl-5.32.0/t/test.pl-1653- }
##############################################
perl-5.32.0/t/test.pl-1696- sleep 1; # wait a little, it might have worked after all
perl-5.32.0/t/test.pl:1697: system("/bin/kill -f $pid_to_kill");
perl-5.32.0/t/test.pl-1698- }
##############################################
perl-5.32.0/t/io/fflush.t-125-while (<$CMD>) {
perl-5.32.0/t/io/fflush.t:126: system("$runperl -e 0");
perl-5.32.0/t/io/fflush.t-127- print;
##############################################
perl-5.32.0/t/io/open.t-32- ok( open(my $f,"+>$afile"), 'open(my $f, "+>...")' );
perl-5.32.0/t/io/open.t:33: ok_cloexec($f);
perl-5.32.0/t/io/open.t-34-
##############################################
perl-5.32.0/t/io/open.t-53- ok( open(my $f,'>', $afile), "open(my \$f, '>', $afile)" );
perl-5.32.0/t/io/open.t:54: ok_cloexec($f);
perl-5.32.0/t/io/open.t-55- ok( (print $f "a row\n"), ' print');
##############################################
perl-5.32.0/t/io/open.t-61- ok( open(my $f,'>>', $afile), "open(my \$f, '>>', $afile)" );
perl-5.32.0/t/io/open.t:62: ok_cloexec($f);
perl-5.32.0/t/io/open.t-63- ok( (print $f "a row\n"), ' print' );
##############################################
perl-5.32.0/t/io/open.t-69- ok( open(my $f, '<', $afile), "open(my \$f, '<', $afile)" );
perl-5.32.0/t/io/open.t:70: ok_cloexec($f);
perl-5.32.0/t/io/open.t-71- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-81- ok( open(my $f, '+<', $afile), 'open +<' );
perl-5.32.0/t/io/open.t:82: ok_cloexec($f);
perl-5.32.0/t/io/open.t-83- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-96-
perl-5.32.0/t/io/open.t:97: ok_cloexec($f);
perl-5.32.0/t/io/open.t-98- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-106-
perl-5.32.0/t/io/open.t:107: ok_cloexec($f);
perl-5.32.0/t/io/open.t-108- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-139- ok( open(local $f,"+>$afile"), 'open local $f, "+>", ...' );
perl-5.32.0/t/io/open.t:140: ok_cloexec($f);
perl-5.32.0/t/io/open.t-141- binmode $f;
##############################################
perl-5.32.0/t/io/open.t-160- ok( open(local $f,'>', $afile), 'open local $f, ">", ...' );
perl-5.32.0/t/io/open.t:161: ok_cloexec($f);
perl-5.32.0/t/io/open.t-162- ok( (print $f "a row\n"), ' print');
##############################################
perl-5.32.0/t/io/open.t-168- ok( open(local $f,'>>', $afile), 'open local $f, ">>", ...' );
perl-5.32.0/t/io/open.t:169: ok_cloexec($f);
perl-5.32.0/t/io/open.t-170- ok( (print $f "a row\n"), ' print');
##############################################
perl-5.32.0/t/io/open.t-176- ok( open(local $f, '<', $afile), 'open local $f, "<", ...' );
perl-5.32.0/t/io/open.t:177: ok_cloexec($f);
perl-5.32.0/t/io/open.t-178- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-186- ok( open(local $f, '+<', $afile), 'open local $f, "+<", ...' );
perl-5.32.0/t/io/open.t:187: ok_cloexec($f);
perl-5.32.0/t/io/open.t-188- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-201-EOC
perl-5.32.0/t/io/open.t:202: ok_cloexec($f);
perl-5.32.0/t/io/open.t-203- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-213-
perl-5.32.0/t/io/open.t:214: ok_cloexec($f);
perl-5.32.0/t/io/open.t-215- my @rows = <$f>;
##############################################
perl-5.32.0/t/io/open.t-252- ok( open(my $stdout, ">&", \*STDOUT), 'dup \*STDOUT into lexical fh');
perl-5.32.0/t/io/open.t:253: ok_cloexec($stdout);
perl-5.32.0/t/io/open.t-254- ok( open(STDOUT, ">&", $stdout), 'restore dupped STDOUT from lexical fh');
##############################################
perl-5.32.0/t/io/open.t-258- ok( open(my $stdout, ">&", STDOUT), 'dup STDOUT into lexical fh');
perl-5.32.0/t/io/open.t:259: ok_cloexec($stdout);
perl-5.32.0/t/io/open.t-260- }
##############################################
perl-5.32.0/t/io/open.t-263- ok( open(my $stdin, "<&", fileno STDIN), 'dup fileno(STDIN) into lexical fh') or _diag $!;
perl-5.32.0/t/io/open.t:264: ok_cloexec($stdin);
perl-5.32.0/t/io/open.t-265-
##############################################
perl-5.32.0/t/io/open.t-268- || _diag $!;
perl-5.32.0/t/io/open.t:269: ok_cloexec($stdin);
perl-5.32.0/t/io/open.t-270-}
##############################################
perl-5.32.0/t/io/open.t-298- open($fh0[0], "TEST");
perl-5.32.0/t/io/open.t:299: ok_cloexec($fh0[0]);
perl-5.32.0/t/io/open.t-300- gimme($fh0[0]);
##############################################
perl-5.32.0/t/io/open.t-303- open($fh1{k}, "TEST");
perl-5.32.0/t/io/open.t:304: ok_cloexec($fh1{h});
perl-5.32.0/t/io/open.t-305- gimme($fh1{k});
##############################################
perl-5.32.0/t/io/open.t-309- open($fh2[0], "TEST");
perl-5.32.0/t/io/open.t:310: ok_cloexec($fh2[0]);
perl-5.32.0/t/io/open.t-311- gimme($fh2[0]);
##############################################
perl-5.32.0/t/io/open.t-315- open($fh3{k}, "TEST");
perl-5.32.0/t/io/open.t:316: ok_cloexec($fh3{h});
perl-5.32.0/t/io/open.t-317- gimme($fh3{k});
##############################################
perl-5.32.0/t/io/dup.t-34-$cmd = sprintf $echo, 4;
perl-5.32.0/t/io/dup.t:35:print `$cmd`;
perl-5.32.0/t/io/dup.t-36-
perl-5.32.0/t/io/dup.t-37-$cmd = sprintf "$echo 1>&2", 5;
perl-5.32.0/t/io/dup.t:38:print `$cmd`;
perl-5.32.0/t/io/dup.t-39-
##############################################
perl-5.32.0/t/io/dup.t-48-
perl-5.32.0/t/io/dup.t:49:if (($^O eq 'MSWin32') || ($^O eq 'NetWare')) { print `type $tempfile` }
perl-5.32.0/t/io/dup.t-50-elsif ($^O eq 'VMS') { system "type $tempfile.;" } # TYPE defaults to .LIS when there is no extension
##############################################
perl-5.32.0/t/io/fs.t-70-if (($^O eq 'MSWin32') || ($^O eq 'NetWare')) {
perl-5.32.0/t/io/fs.t:71: `rmdir /s /q $tmpdir 2>nul`;
perl-5.32.0/t/io/fs.t:72: `mkdir $tmpdir`;
perl-5.32.0/t/io/fs.t-73-}
perl-5.32.0/t/io/fs.t-74-elsif ($^O eq 'VMS') {
perl-5.32.0/t/io/fs.t:75: `if f\$search("[.$tmpdir]*.*") .nes. "" then delete/nolog/noconfirm [.$tmpdir]*.*.*`;
perl-5.32.0/t/io/fs.t:76: `if f\$search("$tmpdir.dir") .nes. "" then set file/prot=o:rwed $tmpdir.dir;`;
perl-5.32.0/t/io/fs.t:77: `if f\$search("$tmpdir.dir") .nes. "" then delete/nolog/noconfirm $tmpdir.dir;`;
perl-5.32.0/t/io/fs.t:78: `create/directory [.$tmpdir]`;
perl-5.32.0/t/io/fs.t-79-}
perl-5.32.0/t/io/fs.t-80-else {
perl-5.32.0/t/io/fs.t:81: `rm -f $tmpdir 2>/dev/null; mkdir $tmpdir 2>/dev/null`;
perl-5.32.0/t/io/fs.t-82-}
##############################################
perl-5.32.0/t/io/fs.t-298-
perl-5.32.0/t/io/fs.t:299: system("cp TEST TEST$$");
perl-5.32.0/t/io/fs.t-300- # we have to copy because e.g. GNU grep gets huffy if we have
##############################################
perl-5.32.0/t/io/fs.t-419- # must have delete access to rename a directory
perl-5.32.0/t/io/fs.t:420: `set file $tmpdir.dir/protection=o:d`;
perl-5.32.0/t/io/fs.t-421- ok(rename("$tmpdir.dir", "$tmpdir1.dir"), "rename on directories") ||
##############################################
perl-5.32.0/t/io/fs.t-451- if (($^O eq 'MSWin32') || ($^O eq 'NetWare')) {
perl-5.32.0/t/io/fs.t:452: `mkdir $tmpdir`;
perl-5.32.0/t/io/fs.t-453- }
perl-5.32.0/t/io/fs.t-454- elsif ($^O eq 'VMS') {
perl-5.32.0/t/io/fs.t:455: `create/directory [.$tmpdir]`;
perl-5.32.0/t/io/fs.t-456- }
perl-5.32.0/t/io/fs.t-457- else {
perl-5.32.0/t/io/fs.t:458: `mkdir $tmpdir 2>/dev/null`;
perl-5.32.0/t/io/fs.t-459- }
##############################################
perl-5.32.0/t/lib/warnings/9uninit-774-$v = bless [], $g1;
perl-5.32.0/t/lib/warnings/9uninit:775:$v = `$m1`;
perl-5.32.0/t/lib/warnings/9uninit-776-
##############################################
perl-5.32.0/t/lib/warnings/9uninit-1583-my $v;
perl-5.32.0/t/lib/warnings/9uninit:1584:$v = 1 + `$nocmd`;
perl-5.32.0/t/lib/warnings/9uninit-1585-EXPECT
##############################################
perl-5.32.0/t/base/term.t-19-
perl-5.32.0/t/base/term.t:20:$x = `$^X -le "print 'hi there'"`;
perl-5.32.0/t/base/term.t-21-if ($x eq "hi there\n") {print "ok 2\n";} else {print "not ok 2\n";}
##############################################
perl-5.32.0/regen-configure/U/a_dvisory/intsize.U-80- if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/regen-configure/U/a_dvisory/intsize.U:81: eval `$run ./try`
perl-5.32.0/regen-configure/U/a_dvisory/intsize.U-82-@if INTSIZE || intsize
##############################################
perl-5.32.0/regen-configure/U/compline/alignbytes.U-56- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/alignbytes.U:57: dflt=`$run ./try`
perl-5.32.0/regen-configure/U/compline/alignbytes.U-58- else
##############################################
perl-5.32.0/regen-configure/U/compline/bitpbyte.U-60- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/bitpbyte.U:61: dflt=`$run ./try`
perl-5.32.0/regen-configure/U/compline/bitpbyte.U-62- else
##############################################
perl-5.32.0/regen-configure/U/compline/byteorder.U-114- if eval $compile && $run ./try > /dev/null; then
perl-5.32.0/regen-configure/U/compline/byteorder.U:115: dflt=`$run ./try`
perl-5.32.0/regen-configure/U/compline/byteorder.U-116- case "$dflt" in
##############################################
perl-5.32.0/regen-configure/U/compline/ccflags.U-142- case "$optimize" in
perl-5.32.0/regen-configure/U/compline/ccflags.U:143: *-g*) set `echo "X $optimize " | sed 's/ -g / /'`
perl-5.32.0/regen-configure/U/compline/ccflags.U-144- shift
##############################################
perl-5.32.0/regen-configure/U/compline/ccflags.U-516- if $sh -c "$run ./try " >>try.msg 2>&1; then
perl-5.32.0/regen-configure/U/compline/ccflags.U:517: xxx=`$run ./try`
perl-5.32.0/regen-configure/U/compline/ccflags.U-518- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/U/compline/charsize.U-59- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/charsize.U:60: dflt=`$run ./try`
perl-5.32.0/regen-configure/U/compline/charsize.U-61- else
##############################################
perl-5.32.0/regen-configure/U/compline/d_gconvert.U-258- if test "$d_PRIgldbl" != "$define"; then
perl-5.32.0/regen-configure/U/compline/d_gconvert.U:259: xxx_ld_list="`echo $xxx_ld_list|sed s/sprintf//` sprintf"
perl-5.32.0/regen-configure/U/compline/d_gconvert.U-260- fi
##############################################
perl-5.32.0/regen-configure/U/compline/d_gconvert.U-262- if test "$d_qgcvt" != "$define"; then
perl-5.32.0/regen-configure/U/compline/d_gconvert.U:263: xxx_ld_list="`echo $xxx_ld_list|sed s/qgcvt//`"
perl-5.32.0/regen-configure/U/compline/d_gconvert.U-264- fi
##############################################
perl-5.32.0/regen-configure/U/compline/d_gnulibc.U-89- val="$define"
perl-5.32.0/regen-configure/U/compline/d_gnulibc.U:90: gnulibc_version=`$cat glibc.ver`
perl-5.32.0/regen-configure/U/compline/d_gnulibc.U-91- echo "You are using the GNU C Library version $gnulibc_version"
##############################################
perl-5.32.0/regen-configure/U/compline/d_keepsig.U-61-?X: (reported by Xavier LeVourch <xavierl@eiffel.com>)
perl-5.32.0/regen-configure/U/compline/d_keepsig.U:62: `sh -c $run ./try >try.out 2>/dev/null`
perl-5.32.0/regen-configure/U/compline/d_keepsig.U-63- if $contains abc try.out >/dev/null 2>&1; then
##############################################
perl-5.32.0/regen-configure/U/compline/d_stdstdio.U-434- if eval $compile && $to try.c; then
perl-5.32.0/regen-configure/U/compline/d_stdstdio.U:435: case `$run ./try` in
perl-5.32.0/regen-configure/U/compline/d_stdstdio.U-436- Pass_changed)
##############################################
perl-5.32.0/regen-configure/U/compline/doublesize.U-49- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/doublesize.U:50: doublesize=`$run ./try`
perl-5.32.0/regen-configure/U/compline/doublesize.U-51- echo "Your double is $doublesize bytes long."
##############################################
perl-5.32.0/regen-configure/U/compline/floatsize.U-45- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/floatsize.U:46: floatsize=`$run ./try`
perl-5.32.0/regen-configure/U/compline/floatsize.U-47- else
##############################################
perl-5.32.0/regen-configure/U/compline/nblock_io.U-123- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/nblock_io.U:124: o_nonblock=`$run ./try`
perl-5.32.0/regen-configure/U/compline/nblock_io.U-125- case "$o_nonblock" in
##############################################
perl-5.32.0/regen-configure/U/compline/nblock_io.U-242- case $? in
perl-5.32.0/regen-configure/U/compline/nblock_io.U:243: 0) eagain=`$cat try.out`;;
perl-5.32.0/regen-configure/U/compline/nblock_io.U-244- 1) echo "Could not perform non-blocking setting!";;
##############################################
perl-5.32.0/regen-configure/U/compline/nblock_io.U-249- esac
perl-5.32.0/regen-configure/U/compline/nblock_io.U:250: rd_nodata=`$cat try.ret`
perl-5.32.0/regen-configure/U/compline/nblock_io.U-251- echo "A read() system call with no data present returns $rd_nodata."
##############################################
perl-5.32.0/regen-configure/U/compline/nblock_io.U-267- esac
perl-5.32.0/regen-configure/U/compline/nblock_io.U:268: status=`$cat try.err`
perl-5.32.0/regen-configure/U/compline/nblock_io.U-269- case "$status" in
##############################################
perl-5.32.0/regen-configure/U/compline/orderlib.U-32-?S: This variable is "true" if the components of libraries must be ordered
perl-5.32.0/regen-configure/U/compline/orderlib.U:33:?S: (with `lorder $* | tsort`) before placing them in an archive. Set to
perl-5.32.0/regen-configure/U/compline/orderlib.U-34-?S: "false" if ranlib or ar can generate random libraries.
##############################################
perl-5.32.0/regen-configure/U/compline/ptrsize.U-52- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/compline/ptrsize.U:53: ptrsize=`$run ./try`
perl-5.32.0/regen-configure/U/compline/ptrsize.U-54- echo "Your pointers are $ptrsize bytes long."
##############################################
perl-5.32.0/regen-configure/U/compline/randfunc.U-89- echo "Removing obsolete -Dmy_rand, -Dmy_srand, and -Drandbits from ccflags." >&4
perl-5.32.0/regen-configure/U/compline/randfunc.U:90: ccflags="`echo $ccflags | sed -e 's/-Dmy_rand=random/ /'`"
perl-5.32.0/regen-configure/U/compline/randfunc.U:91: ccflags="`echo $ccflags | sed -e 's/-Dmy_srand=srandom/ /'`"
perl-5.32.0/regen-configure/U/compline/randfunc.U:92: ccflags="`echo $ccflags | sed -e 's/-Drandbits=[0-9][0-9]*/ /'`"
perl-5.32.0/regen-configure/U/compline/randfunc.U-93- ;;
##############################################
perl-5.32.0/regen-configure/U/compline/ssizetype.U-70-if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/regen-configure/U/compline/ssizetype.U:71: ssizetype=`$run ./try`
perl-5.32.0/regen-configure/U/compline/ssizetype.U-72- echo "I'll be using $ssizetype for functions returning a byte count." >&4
##############################################
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U-19-?LINT:extern prefixvar
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U:20:?X: metalint still sees "`\$${prefixvar}exp`" as variable :(
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U-21-?T:prefixvarexp
##############################################
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U-30-if $test X"$prefix" != X"$installprefix"; then
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U:31: eval "install${prefixvar}=\`echo \$${prefixvar}exp | sed \"s#^\$prefixexp#\$installprefixexp#\"\`"
perl-5.32.0/regen-configure/U/installdirs/Setprefixvar.U-32-else
##############################################
perl-5.32.0/regen-configure/U/installdirs/archlib.U-87-: privlib may have an optional trailing /share.
perl-5.32.0/regen-configure/U/installdirs/archlib.U:88:tdflt=`echo $privlib | $sed 's,/share$,,'`
perl-5.32.0/regen-configure/U/installdirs/archlib.U-89-tdflt=$tdflt/$archname
##############################################
perl-5.32.0/regen-configure/U/installdirs/html3dir.U-49-case "$html3dir" in
perl-5.32.0/regen-configure/U/installdirs/html3dir.U:50:'') html3dir=`echo "$html1dir" | $sed 's/1$/3$/'` ;;
perl-5.32.0/regen-configure/U/installdirs/html3dir.U-51-*) dflt=$html3dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/inc_version_list.U-109-'') if test -x "$perl5$exe_ext"; then
perl-5.32.0/regen-configure/U/installdirs/inc_version_list.U:110: dflt=`$perl5 getverlist`
perl-5.32.0/regen-configure/U/installdirs/inc_version_list.U-111- else
##############################################
perl-5.32.0/regen-configure/U/installdirs/installprefix.U-42- case "$installprefix" in
perl-5.32.0/regen-configure/U/installdirs/installprefix.U:43: '') dflt=`echo $prefix | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/U/installdirs/installprefix.U-44- *) dflt="$installprefix";;
##############################################
perl-5.32.0/regen-configure/U/installdirs/man1dir.U-87- case "$sysman" in
perl-5.32.0/regen-configure/U/installdirs/man1dir.U:88: */?_man*) dflt=`./loc . $prefixexp/l_man/man1 $lookpath` ;;
perl-5.32.0/regen-configure/U/installdirs/man1dir.U:89: *) dflt=`./loc . $prefixexp/man/man1 $lookpath` ;;
perl-5.32.0/regen-configure/U/installdirs/man1dir.U-90- esac
##############################################
perl-5.32.0/regen-configure/U/installdirs/man3dir.U-97-?X: remove any trailing -3.0 or other version indication from $package
perl-5.32.0/regen-configure/U/installdirs/man3dir.U:98:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/regen-configure/U/installdirs/man3dir.U-99-case "$man3dir" in
perl-5.32.0/regen-configure/U/installdirs/man3dir.U:100:'') dflt=`echo "$man1dir" | $sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'`
perl-5.32.0/regen-configure/U/installdirs/man3dir.U-101- if $test -d "$privlib/man/man3"; then
##############################################
perl-5.32.0/regen-configure/U/installdirs/perl5.U-27-case "$perl5" in
perl-5.32.0/regen-configure/U/installdirs/perl5.U:28:'') for tdir in `echo "$binexp$path_sep$PATH" | $sed "s/$path_sep/ /g"`; do
perl-5.32.0/regen-configure/U/installdirs/perl5.U-29- : Check if this perl is recent and can load a simple module
##############################################
perl-5.32.0/regen-configure/U/installdirs/prefix.U-78-case "$ans" in
perl-5.32.0/regen-configure/U/installdirs/prefix.U:79:*?/) prefix=`echo "$ans" | sed 's/.$//'`
perl-5.32.0/regen-configure/U/installdirs/prefix.U-80- ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/prefix.U-84-case "$ansexp" in
perl-5.32.0/regen-configure/U/installdirs/prefix.U:85:*?/) prefixexp=`echo "$ansexp" | sed 's/.$//'`
perl-5.32.0/regen-configure/U/installdirs/prefix.U-86- ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/sitearch.U-78-case "$sitearch" in
perl-5.32.0/regen-configure/U/installdirs/sitearch.U:79:'') dflt=`echo $sitelib | $sed 's,/share$,,'`
perl-5.32.0/regen-configure/U/installdirs/sitearch.U-80- dflt="$dflt/$archname"
##############################################
perl-5.32.0/regen-configure/U/installdirs/sitehtml1dir.U-46-case "$sitehtml1dir" in
perl-5.32.0/regen-configure/U/installdirs/sitehtml1dir.U:47:'') dflt=`echo "$html1dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/sitehtml1dir.U-48-*) dflt=$sitehtml1dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/sitehtml3dir.U-46-case "$sitehtml3dir" in
perl-5.32.0/regen-configure/U/installdirs/sitehtml3dir.U:47:'') dflt=`echo "$html3dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/sitehtml3dir.U-48-*) dflt=$sitehtml3dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/sitelib.U-84-?X: remove any trailing -3.0 or other version identification
perl-5.32.0/regen-configure/U/installdirs/sitelib.U:85:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/regen-configure/U/installdirs/sitelib.U-86-case "$sitelib" in
##############################################
perl-5.32.0/regen-configure/U/installdirs/sitelib.U-107-. ./setprefixvar
perl-5.32.0/regen-configure/U/installdirs/sitelib.U:108:sitelib_stem=`echo "$sitelibexp" | sed "s,/$version$,,"`
perl-5.32.0/regen-configure/U/installdirs/sitelib.U-109-
##############################################
perl-5.32.0/regen-configure/U/installdirs/siteman1dir.U-44-case "$siteman1dir" in
perl-5.32.0/regen-configure/U/installdirs/siteman1dir.U:45:'') dflt=`echo $man1dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/siteman1dir.U-46-*) dflt=$siteman1dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/siteman3dir.U-44-case "$siteman3dir" in
perl-5.32.0/regen-configure/U/installdirs/siteman3dir.U:45:'') dflt=`echo $man3dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/siteman3dir.U-46-*) dflt=$siteman3dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorarch.U-72- case "$vendorarch" in
perl-5.32.0/regen-configure/U/installdirs/vendorarch.U:73: '') dflt=`echo $vendorlib | $sed 's,/share$,,'`
perl-5.32.0/regen-configure/U/installdirs/vendorarch.U-74- dflt="$dflt/$archname"
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorhtml1dir.U-49- case "$vendorhtml1dir" in
perl-5.32.0/regen-configure/U/installdirs/vendorhtml1dir.U:50: '') dflt=`echo "$html1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/vendorhtml1dir.U-51- *) dflt=$vendorhtml1dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorhtml3dir.U-49- case "$vendorhtml3dir" in
perl-5.32.0/regen-configure/U/installdirs/vendorhtml3dir.U:50: '') dflt=`echo "$html3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/vendorhtml3dir.U-51- *) dflt=$vendorhtml3dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U-85-?X: remove any trailing -3.0 or other version identification
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U:86: prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U-87- case "$installstyle" in
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U-101-esac
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U:102:vendorlib_stem=`echo "$vendorlibexp" | sed "s,/$version$,,"`
perl-5.32.0/regen-configure/U/installdirs/vendorlib.U-103-prefixvar=vendorlib
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorman1dir.U-46- case "$vendorman1dir" in
perl-5.32.0/regen-configure/U/installdirs/vendorman1dir.U:47: '') dflt=`echo "$man1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/vendorman1dir.U-48- *) dflt=$vendorman1dir ;;
##############################################
perl-5.32.0/regen-configure/U/installdirs/vendorman3dir.U-46- case "$vendorman3dir" in
perl-5.32.0/regen-configure/U/installdirs/vendorman3dir.U:47: '') dflt=`echo "$man3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/regen-configure/U/installdirs/vendorman3dir.U-48- *) dflt=$vendorman3dir ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Config_h.U-72-case "$0" in
perl-5.32.0/regen-configure/U/modified/Config_h.U:73:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/U/modified/Config_h.U-74-esac
##############################################
perl-5.32.0/regen-configure/U/modified/Config_sh.U-96- eval temp=\$$file
perl-5.32.0/regen-configure/U/modified/Config_sh.U:97: eval $file=`basename $temp`
perl-5.32.0/regen-configure/U/modified/Config_sh.U-98- done
##############################################
perl-5.32.0/regen-configure/U/modified/Cppsym.U-248-EOF
perl-5.32.0/regen-configure/U/modified/Cppsym.U:249:for i in \`$cc -v -c tmp.c 2>&1 $postprocess_cc_v\`
perl-5.32.0/regen-configure/U/modified/Cppsym.U-250-do
##############################################
perl-5.32.0/regen-configure/U/modified/Cppsym.U-283- ccsymbols=''
perl-5.32.0/regen-configure/U/modified/Cppsym.U:284: cppsymbols=`$cat Cppsym.true`
perl-5.32.0/regen-configure/U/modified/Cppsym.U:285: cppsymbols=`echo $cppsymbols`
perl-5.32.0/regen-configure/U/modified/Cppsym.U-286- cppccsymbols="$cppsymbols"
##############################################
perl-5.32.0/regen-configure/U/modified/Cppsym.U-292- symbols='ones'
perl-5.32.0/regen-configure/U/modified/Cppsym.U:293: cppccsymbols=`$cat ccsym.com`
perl-5.32.0/regen-configure/U/modified/Cppsym.U:294: cppccsymbols=`echo $cppccsymbols`
perl-5.32.0/regen-configure/U/modified/Cppsym.U-295- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/U/modified/Cppsym.U-301- also='further '
perl-5.32.0/regen-configure/U/modified/Cppsym.U:302: cppsymbols=`$cat ccsym.cpp`
perl-5.32.0/regen-configure/U/modified/Cppsym.U:303: cppsymbols=`echo $cppsymbols`
perl-5.32.0/regen-configure/U/modified/Cppsym.U-304- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/U/modified/Cppsym.U-310- $sed -e 's/\(..*\)=.*/\1/' ccsym.own | $uniq >>Cppsym.true
perl-5.32.0/regen-configure/U/modified/Cppsym.U:311: ccsymbols=`$cat ccsym.own`
perl-5.32.0/regen-configure/U/modified/Cppsym.U:312: ccsymbols=`echo $ccsymbols`
perl-5.32.0/regen-configure/U/modified/Cppsym.U-313- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/U/modified/Extract.U-36-if test -f MANIFEST; then
perl-5.32.0/regen-configure/U/modified/Extract.U:37: set x `awk '{print $1}' < MANIFEST | grep '\.SH$'`
perl-5.32.0/regen-configure/U/modified/Extract.U-38-else
perl-5.32.0/regen-configure/U/modified/Extract.U-39- echo "(Looking for .SH files under the source directory.)"
perl-5.32.0/regen-configure/U/modified/Extract.U:40: set x `(cd "$src"; find . -name "*.SH" -print)`
perl-5.32.0/regen-configure/U/modified/Extract.U-41-fi
##############################################
perl-5.32.0/regen-configure/U/modified/Extract.U-43-case $# in
perl-5.32.0/regen-configure/U/modified/Extract.U:44:0) set x `(cd "$src"; echo *.SH)`; shift;;
perl-5.32.0/regen-configure/U/modified/Extract.U-45-esac
##############################################
perl-5.32.0/regen-configure/U/modified/Extract.U-55- create="$name $create";
perl-5.32.0/regen-configure/U/modified/Extract.U:56: name=`echo $name | sed -e "s|^[^/]*$||"`;
perl-5.32.0/regen-configure/U/modified/Extract.U:57: name=`echo $name | sed -e "s|\(.*\)/.*|\1|"`;
perl-5.32.0/regen-configure/U/modified/Extract.U-58- else
##############################################
perl-5.32.0/regen-configure/U/modified/Extract.U-70- */*)
perl-5.32.0/regen-configure/U/modified/Extract.U:71: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/regen-configure/U/modified/Extract.U:72: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/regen-configure/U/modified/Extract.U-73- (cd "$dir" && . ./$file)
##############################################
perl-5.32.0/regen-configure/U/modified/Extract.U-99- */*)
perl-5.32.0/regen-configure/U/modified/Extract.U:100: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/regen-configure/U/modified/Extract.U:101: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/regen-configure/U/modified/Extract.U-102- (set x $dir; shift; eval $mkdir_p)
##############################################
perl-5.32.0/regen-configure/U/modified/Findhdr.U-65- while $test \$# -gt 0; do
perl-5.32.0/regen-configure/U/modified/Findhdr.U:66: if $test $testaccess \`echo \$1 | $tr -d '"'\`; then
perl-5.32.0/regen-configure/U/modified/Findhdr.U-67- echo "\$pos"
##############################################
perl-5.32.0/regen-configure/U/modified/Findhdr.U-70- shift
perl-5.32.0/regen-configure/U/modified/Findhdr.U:71: pos=\`expr \$pos + 1\`
perl-5.32.0/regen-configure/U/modified/Findhdr.U-72- done
##############################################
perl-5.32.0/regen-configure/U/modified/Findhdr.U-108-while read cline; do
perl-5.32.0/regen-configure/U/modified/Findhdr.U:109: name=\`echo \$cline | $awk "\$awkprg" | $tr -d '"'\`
perl-5.32.0/regen-configure/U/modified/Findhdr.U-110- case "\$name" in
##############################################
perl-5.32.0/regen-configure/U/modified/Guess.U-103- echo exit 0 >osf1
perl-5.32.0/regen-configure/U/modified/Guess.U:104:elif test `echo abc | $tr a-z A-Z` = Abc ; then
perl-5.32.0/regen-configure/U/modified/Guess.U:105: xxx=`./loc addbib blurfl $pth`
perl-5.32.0/regen-configure/U/modified/Guess.U-106- if $test -f $xxx; then
##############################################
perl-5.32.0/regen-configure/U/modified/Head.U-158-*/*)
perl-5.32.0/regen-configure/U/modified/Head.U:159: me=`echo $0 | sed -e 's!.*/\(.*\)!\1!' 2>/dev/null`
perl-5.32.0/regen-configure/U/modified/Head.U-160- test "$me" || me=$0
##############################################
perl-5.32.0/regen-configure/U/modified/Loc.U-218- uname uniq uuname vi zcat zip
perl-5.32.0/regen-configure/U/modified/Loc.U:219:pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/regen-configure/U/modified/Loc.U-220-pth="$pth $sysroot/lib $sysroot/usr/lib"
##############################################
perl-5.32.0/regen-configure/U/modified/Loc.U-235- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/regen-configure/U/modified/Loc.U:236: xxx=`./loc $file $file $pth`
perl-5.32.0/regen-configure/U/modified/Loc.U-237- fi
perl-5.32.0/regen-configure/U/modified/Loc.U-238- ;;
perl-5.32.0/regen-configure/U/modified/Loc.U:239: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/regen-configure/U/modified/Loc.U:240: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/regen-configure/U/modified/Loc.U-241- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Loc.U-270- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/regen-configure/U/modified/Loc.U:271: xxx=`./loc $file $file $pth`
perl-5.32.0/regen-configure/U/modified/Loc.U-272- fi
perl-5.32.0/regen-configure/U/modified/Loc.U-273- ;;
perl-5.32.0/regen-configure/U/modified/Loc.U:274: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/regen-configure/U/modified/Loc.U:275: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/regen-configure/U/modified/Loc.U-276- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-119-?X: Now not using a subshell but instead $test.
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:120:myuname=`$uname -a 2>/dev/null`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-121-$test -z "$myuname" && myuname=`hostname 2>/dev/null`
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-197- $test -f /lynx.os && osname=lynxos
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:198: $test -f /unicos && osname=unicos && osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:199: $test -f /unicosmk && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:200: $test -f /unicosmk.ar && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-201- $test -f /bin/mips && /bin/mips && osname=mips
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-203- $test -f /etc/saf/_sactab && osname=svr4
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:204: $test -d /usr/include/minix && osname=minix && osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-205- $test -f /system/gnu_library/bin/ar.pm && osname=vos
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-247- i386*)
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:248: tmp=`/bin/uname -X 2>/dev/null|awk '/3\.2v[45]/{ print $(NF) }'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-249- if $test "$tmp" != "" -a "$3" = "3.2" -a -f '/etc/systemid'; then
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-304- bsd386) osname=bsd386
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:305: osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-306- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-327- dynixptx*) osname=dynixptx
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:328: osvers=`echo "$4"|sed 's/^v//'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-329- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-344- hp*) osname=hpux
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:345: osvers=`echo "$3" | $sed 's,.*\.\([0-9]*\.[0-9]*\),\1,'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-346- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-362- minix) osname=minix
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:363: osvers=`$uname -r`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-364- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-392- case "$3" in
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:393: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-394- *) osvers="$3" ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-399- 5*) osname=solaris
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:400: osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-401- *) osvers="$3" ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-421-?X: sizer knows the minor minor version: the letter
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:422: osvers=`sizer -v | awk -FUNIX '{print $2}' | awk '{print $1}' | tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-423- case "$osvers" in
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-424- [1-9].[0-9]*) ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:425: *) osvers=`echo "$3" | sed 's/^[xvt]//'` ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-426- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-456- if test -f /stand/boot ; then
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:457: eval `grep '^INITPROG=[a-z/0-9]*$' /stand/boot`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-458- if test -n "$INITPROG" -a -f "$INITPROG"; then
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:459: isesix=`strings -a $INITPROG|grep 'ESIX SYSTEM V/386 Release 4.0'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-460- if test -n "$isesix"; then
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-469- osname=sco
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:470: set `echo $3 | $sed 's/\./ /g'` $4
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-471- if $test -f $src/hints/sco_$1_$2_$3.sh; then
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-539- # hints are run is somewhat icky.
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:540: set X `$run $uname -a 2>/dev/null`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-541- shift
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-542- case "$3" in
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:543: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-544- *) osvers="$3" ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-547- *)
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:548: osname=`echo $targetarch|sed 's,^[^-]*-,,'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-549- osvers=''
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-558- ''|' ')
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:559: file=`echo "${osname}_${osvers}" | $sed -e 's%\.%_%g' -e 's%_$%%'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-560- : Also try without trailing minor version numbers.
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:561: xfile=`echo $file | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:562: xxfile=`echo $xfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:563: xxxfile=`echo $xxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:564: xxxxfile=`echo $xxxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-565- case "$file" in
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-597- *)
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:598: dflt=`echo $hintfile | $sed 's/\.sh$//'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-599- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-727- ''|' '|none) dflt=none ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:728: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/_.*$//'` ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-729- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-736-none) osname='' ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:737:*) osname=`echo "$ans" | $sed -e 's/[ ][ ]*/_/g' | ./tr '[A-Z]' '[a-z]'`;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-738-esac
##############################################
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-747- ''|' '|none) dflt=none ;;
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:748: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/^[^_]*//'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U:749: dflt=`echo $dflt | $sed -e 's/^_//' -e 's/_/./g'`
perl-5.32.0/regen-configure/U/modified/Oldconfig.U-750- case "$dflt" in
##############################################
perl-5.32.0/regen-configure/U/modified/Oldsym.U-48- $sort | $uniq -u >UU/oldsyms
perl-5.32.0/regen-configure/U/modified/Oldsym.U:49: set X `$cat UU/oldsyms`
perl-5.32.0/regen-configure/U/modified/Oldsym.U-50- shift
##############################################
perl-5.32.0/regen-configure/U/modified/Oldsym.U-57- echo ": Variables propagated from previous config.sh file." >>config.sh
perl-5.32.0/regen-configure/U/modified/Oldsym.U:58: for sym in `$cat UU/oldsyms`; do
perl-5.32.0/regen-configure/U/modified/Oldsym.U-59- echo " Propagating $hint variable "'$'"$sym..."
##############################################
perl-5.32.0/regen-configure/U/modified/Options.U-84- args_exp="$args_exp$args_sep'$arg_exp'"
perl-5.32.0/regen-configure/U/modified/Options.U:85: argn=`expr $argn + 1`
perl-5.32.0/regen-configure/U/modified/Options.U-86- args_sep=' '
##############################################
perl-5.32.0/regen-configure/U/modified/Options.U-234- case "$yyy" in
perl-5.32.0/regen-configure/U/modified/Options.U:235: *=*) zzz=`echo "$yyy"|sed 's!=.*!!'`
perl-5.32.0/regen-configure/U/modified/Options.U-236- case "$zzz" in
##############################################
perl-5.32.0/regen-configure/U/modified/Options.U-238- *) xxx=append
perl-5.32.0/regen-configure/U/modified/Options.U:239: zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/regen-configure/U/modified/Options.U:240: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/regen-configure/U/modified/Options.U-241- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Options.U-245- '') case "$yyy" in
perl-5.32.0/regen-configure/U/modified/Options.U:246: *:*) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/regen-configure/U/modified/Options.U:247: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'`
perl-5.32.0/regen-configure/U/modified/Options.U:248: zzz=`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/regen-configure/U/modified/Options.U:249: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/regen-configure/U/modified/Options.U:250: *) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/regen-configure/U/modified/Options.U:251: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
perl-5.32.0/regen-configure/U/modified/Options.U-252- esac
##############################################
perl-5.32.0/regen-configure/U/modified/Signal.U-239- : Now look at all the signal names, one at a time.
perl-5.32.0/regen-configure/U/modified/Signal.U:240: for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
perl-5.32.0/regen-configure/U/modified/Signal.U-241- $cat > signal.c <<EOCP
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-36-echo " "
perl-5.32.0/regen-configure/U/modified/Tr.U:37:case "`echo AbyZ | $tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | $tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-38-ABYZ-abyz)
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-45- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/U/modified/Tr.U:46: case "`echo RS | $tr '[R-S]' '[r-s]' 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-47- rs) up='[A-Z]'
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-52- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/U/modified/Tr.U:53: case "`echo RS | $tr R-S r-s 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-54- rs) up='A-Z'
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-63- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/U/modified/Tr.U:64: case "`echo RS | $tr '[A-IJ-RS-Z]' '[a-ij-rs-z]' 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-65- rs) up='[A-IJ-RS-Z]'
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-70- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/U/modified/Tr.U:71: case "`echo RS | $tr A-IJ-RS-Z a-ij-rs-z 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-72- rs) up='A-IJ-RS-Z'
##############################################
perl-5.32.0/regen-configure/U/modified/Tr.U-80-esac
perl-5.32.0/regen-configure/U/modified/Tr.U:81:case "`echo RS | $tr \"$up\" \"$low\" 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/Tr.U-82-rs)
##############################################
perl-5.32.0/regen-configure/U/modified/d_dladdr.U-16-?S: This variable conditionally defines the HAS_DLADDR symbol, which
perl-5.32.0/regen-configure/U/modified/d_dladdr.U:17:?S: indicates to the C program that the dladdr() routine is available
perl-5.32.0/regen-configure/U/modified/d_dladdr.U-18-?S: to get a stack trace.
##############################################
perl-5.32.0/regen-configure/U/modified/d_dladdr.U-20-?C:HAS_DLADDR:
perl-5.32.0/regen-configure/U/modified/d_dladdr.U:21:?C: This symbol, if defined, indicates that the dladdr() routine is
perl-5.32.0/regen-configure/U/modified/d_dladdr.U-22-?C: available to query dynamic linker information for an address.
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U-11-?S: This variable conditionally defines the HAS_GETHOSTBYADDR symbol, which
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U:12:?S: indicates to the C program that the gethostbyaddr() routine is available
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U-13-?S: to look up hosts by their IP addresses.
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U-15-?C:HAS_GETHOSTBYADDR:
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U:16:?C: This symbol, if defined, indicates that the gethostbyaddr() routine is
perl-5.32.0/regen-configure/U/modified/d_gethbyad.U-17-?C: available to look up hosts by their IP addresses.
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-155- shift
perl-5.32.0/regen-configure/U/modified/d_gethname.U:156: file=`./loc $file $file $pth`
perl-5.32.0/regen-configure/U/modified/d_gethname.U:157: aphostname=`echo $file $*`
perl-5.32.0/regen-configure/U/modified/d_gethname.U-158- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-178-
perl-5.32.0/regen-configure/U/modified/d_gethname.U:179: popen("$aphostname","r")
perl-5.32.0/regen-configure/U/modified/d_gethname.U-180-
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-215-
perl-5.32.0/regen-configure/U/modified/d_gethname.U:216: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/U/modified/d_gethname.U-217-
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-249-
perl-5.32.0/regen-configure/U/modified/d_gethname.U:250: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/U/modified/d_gethname.U-251-
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-259- *)
perl-5.32.0/regen-configure/U/modified/d_gethname.U:260: echo "I'll use 'popen("'"'$aphostname'", "r")'"' to get your hostname." >&4
perl-5.32.0/regen-configure/U/modified/d_gethname.U-261- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/d_gethname.U-275-
perl-5.32.0/regen-configure/U/modified/d_gethname.U:276: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/U/modified/d_gethname.U-277-
##############################################
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U-11-?S: This variable conditionally defines the HAS_GETNETBYADDR symbol, which
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U:12:?S: indicates to the C program that the getnetbyaddr() routine is available
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U-13-?S: to look up networks by their IP addresses.
##############################################
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U-15-?C:HAS_GETNETBYADDR:
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U:16:?C: This symbol, if defined, indicates that the getnetbyaddr() routine is
perl-5.32.0/regen-configure/U/modified/d_getnbyad.U-17-?C: available to look up networks by their IP addresses.
##############################################
perl-5.32.0/regen-configure/U/modified/d_longdbl.U-197- if eval $compile; then
perl-5.32.0/regen-configure/U/modified/d_longdbl.U:198: longdblsize=`$run ./try`
perl-5.32.0/regen-configure/U/modified/d_longdbl.U-199- echo "Your long doubles are $longdblsize bytes long."
##############################################
perl-5.32.0/regen-configure/U/modified/d_longdbl.U-323-if eval $compile; then
perl-5.32.0/regen-configure/U/modified/d_longdbl.U:324: longdblkind=`$run ./try`
perl-5.32.0/regen-configure/U/modified/d_longdbl.U-325-else
##############################################
perl-5.32.0/regen-configure/U/modified/d_longlong.U-69- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/modified/d_longlong.U:70: longlongsize=`$run ./try`
perl-5.32.0/regen-configure/U/modified/d_longlong.U-71- echo "Your long longs are $longlongsize bytes long."
##############################################
perl-5.32.0/regen-configure/U/modified/d_socket.U-421-for ENUM in MSG_CTRUNC MSG_DONTROUTE MSG_OOB MSG_PEEK MSG_PROXY SCM_RIGHTS; do
perl-5.32.0/regen-configure/U/modified/d_socket.U:422: enum=`$echo $ENUM|./tr '[A-Z]' '[a-z]'`
perl-5.32.0/regen-configure/U/modified/d_socket.U-423- $cat >try.c <<EOF
##############################################
perl-5.32.0/regen-configure/U/modified/d_strtoul.U-95- if eval $compile; then
perl-5.32.0/regen-configure/U/modified/d_strtoul.U:96: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/modified/d_strtoul.U-97- ok) echo "Your strtoul() seems to be working okay." ;;
##############################################
perl-5.32.0/regen-configure/U/modified/d_union_semun.U-150- if eval $compile; then
perl-5.32.0/regen-configure/U/modified/d_union_semun.U:151: xxx=`$run ./try`
perl-5.32.0/regen-configure/U/modified/d_union_semun.U-152- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/U/modified/d_union_semun.U-222- if eval $compile; then
perl-5.32.0/regen-configure/U/modified/d_union_semun.U:223: xxx=`$run ./try`
perl-5.32.0/regen-configure/U/modified/d_union_semun.U-224- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/U/modified/i_termio.U-80- *) if ./Cppsym pyr; then
perl-5.32.0/regen-configure/U/modified/i_termio.U:81: case "`$run /bin/universe`" in
perl-5.32.0/regen-configure/U/modified/i_termio.U-82- ucb) if $test `./findhdr sgtty.h`; then
##############################################
perl-5.32.0/regen-configure/U/modified/libc.U-77- case "$libs" in
perl-5.32.0/regen-configure/U/modified/libc.U:78: *-lc_s*) libc=`./loc libc_s$_a $libc $libpth`
perl-5.32.0/regen-configure/U/modified/libc.U-79- esac
##############################################
perl-5.32.0/regen-configure/U/modified/libc.U-89- -l*)
perl-5.32.0/regen-configure/U/modified/libc.U:90: thislib=`echo $thislib | $sed -e 's/^-l//'`
perl-5.32.0/regen-configure/U/modified/libc.U:91: if try=`./loc lib$thislib.$so.'*' X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-92- :
perl-5.32.0/regen-configure/U/modified/libc.U:93: elif try=`./loc lib$thislib.$so X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-94- :
perl-5.32.0/regen-configure/U/modified/libc.U:95: elif try=`./loc lib$thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-96- :
perl-5.32.0/regen-configure/U/modified/libc.U:97: elif try=`./loc $thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-98- :
perl-5.32.0/regen-configure/U/modified/libc.U:99: elif try=`./loc lib$thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-100- :
perl-5.32.0/regen-configure/U/modified/libc.U:101: elif try=`./loc $thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-102- :
perl-5.32.0/regen-configure/U/modified/libc.U:103: elif try=`./loc Slib$thislib$_a X $xlibpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/U/modified/libc.U-104- :
##############################################
perl-5.32.0/regen-configure/U/modified/libc.U-185-else
perl-5.32.0/regen-configure/U/modified/libc.U:186: if tans=`./loc libc$_a blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/U/modified/libc.U-187- :
perl-5.32.0/regen-configure/U/modified/libc.U:188: elif tans=`./loc libc blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/U/modified/libc.U:189: libnames="$libnames "`./loc clib blurfl/dyick $libpth`
perl-5.32.0/regen-configure/U/modified/libc.U:190: elif tans=`./loc clib blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/U/modified/libc.U-191- :
perl-5.32.0/regen-configure/U/modified/libc.U:192: elif tans=`./loc Slibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/U/modified/libc.U-193- :
perl-5.32.0/regen-configure/U/modified/libc.U:194: elif tans=`./loc Mlibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/U/modified/libc.U-195- :
perl-5.32.0/regen-configure/U/modified/libc.U-196- else
perl-5.32.0/regen-configure/U/modified/libc.U:197: tans=`./loc Llibc$_a blurfl/dyick $xlibpth`
perl-5.32.0/regen-configure/U/modified/libc.U-198- fi
##############################################
perl-5.32.0/regen-configure/U/modified/libpth.U-108- $echo 'extern int foo;' > try.c
perl-5.32.0/regen-configure/U/modified/libpth.U:109: set X `$cppstdin -v try.c 2>&1 | $awk '/^#include </,/^End of search /'|$cppfilter $grep '/include'`
perl-5.32.0/regen-configure/U/modified/libpth.U-110- shift
##############################################
perl-5.32.0/regen-configure/U/modified/libpth.U-112- incpth="$incpth $*"
perl-5.32.0/regen-configure/U/modified/libpth.U:113: incpth="`$echo $incpth|$sed 's/^ //'`"
perl-5.32.0/regen-configure/U/modified/libpth.U-114- for i in $*; do
perl-5.32.0/regen-configure/U/modified/libpth.U:115: j="`$echo $i|$sed 's,/include$,/lib,'`"
perl-5.32.0/regen-configure/U/modified/libpth.U-116- if $test -d $j; then
##############################################
perl-5.32.0/regen-configure/U/modified/libpth.U-119- done
perl-5.32.0/regen-configure/U/modified/libpth.U:120: libpth="`$echo $libpth|$sed 's/^ //'`"
perl-5.32.0/regen-configure/U/modified/libpth.U-121- for xxx in $libpth $loclibpth $plibpth $glibpth; do
##############################################
perl-5.32.0/regen-configure/U/modified/libs.U-126- if $test ! -f "$xxx" -a "X$ignore_versioned_solibs" = "X"; then
perl-5.32.0/regen-configure/U/modified/libs.U:127: xxx=`ls $thisdir/lib$thislib.$so.[0-9] 2>/dev/null|sed -n '$p'`
perl-5.32.0/regen-configure/U/modified/libs.U-128- $test -f "$xxx" && eval $libscheck
perl-5.32.0/regen-configure/U/modified/libs.U-129- $test -f "$xxx" && libstyle=shared
perl-5.32.0/regen-configure/U/modified/libs.U:130: xxx=`ls $thisdir/lib$thislib.[0-9].$so 2>/dev/null|sed -n '$p'`
perl-5.32.0/regen-configure/U/modified/libs.U-131- $test -f "$xxx" && eval $libscheck
##############################################
perl-5.32.0/regen-configure/U/modified/libs.U-169- libsfound="$libsfound $xxx"
perl-5.32.0/regen-configure/U/modified/libs.U:170: yyy=`basename $xxx`
perl-5.32.0/regen-configure/U/modified/libs.U-171- libsfiles="$libsfiles $yyy"
perl-5.32.0/regen-configure/U/modified/libs.U:172: yyy=`echo $xxx|$sed -e "s%/$yyy\\$%%"`
perl-5.32.0/regen-configure/U/modified/libs.U-173- case " $libsdirs " in
##############################################
perl-5.32.0/regen-configure/U/modified/mallocsrc.U-138- echo "Removing unneeded -lmalloc from library list" >&4
perl-5.32.0/regen-configure/U/modified/mallocsrc.U:139: set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
perl-5.32.0/regen-configure/U/modified/mallocsrc.U-140- shift
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-103- echo 'Oh well, maybe I can mine it out of whoami.h...'
perl-5.32.0/regen-configure/U/modified/myhostname.U:104: if tans=`sh -c $contains' sysname $usrinc/whoami.h' 2>&1` ; then
perl-5.32.0/regen-configure/U/modified/myhostname.U:105: myhostname=`echo "$tans" | $sed 's/^.*"\(.*\)"/\1/'`
perl-5.32.0/regen-configure/U/modified/myhostname.U-106- phostname="sed -n -e '"'/sysname/s/^.*\"\\(.*\\)\"/\1/{'"' -e p -e q -e '}' <$usrinc/whoami.h"
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-148- echo "(Normalizing case in your host name)"
perl-5.32.0/regen-configure/U/modified/myhostname.U:149: myhostname=`echo $myhostname | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/regen-configure/U/modified/myhostname.U-150- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-157-*.*)
perl-5.32.0/regen-configure/U/modified/myhostname.U:158: dflt=`expr "X$myhostname" : "X[^.]*\(\..*\)"`
perl-5.32.0/regen-configure/U/modified/myhostname.U:159: myhostname=`expr "X$myhostname" : "X\([^.]*\)\."`
perl-5.32.0/regen-configure/U/modified/myhostname.U-160- echo "(Trimming domain name from host name--host name is now $myhostname)"
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-190- $sed -n -e "s/$myhostname\.\([-a-zA-Z0-9_.]\)/\1/p"`
perl-5.32.0/regen-configure/U/modified/myhostname.U:191: case `$echo X$dflt` in
perl-5.32.0/regen-configure/U/modified/myhostname.U-192- X*\ *) echo "(Several hosts in the database matched hostname)"
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-224- '') dflt='.';;
perl-5.32.0/regen-configure/U/modified/myhostname.U:225: .nis.*|.yp.*|.main.*) dflt=`echo $dflt | $sed -e 's/^\.[^.]*//'`;;
perl-5.32.0/regen-configure/U/modified/myhostname.U-226- esac
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-230- .os390) echo "(Attempting domain name extraction from //'SYS1.TCPPARMS(TCPDATA)')"
perl-5.32.0/regen-configure/U/modified/myhostname.U:231: dflt=.`awk '/^DOMAINORIGIN/ {print $2}' "//'SYS1.TCPPARMS(TCPDATA)'" 2>/dev/null`
perl-5.32.0/regen-configure/U/modified/myhostname.U-232- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-258- echo "(Normalizing case in your domain name)"
perl-5.32.0/regen-configure/U/modified/myhostname.U:259: mydomain=`echo $mydomain | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/regen-configure/U/modified/myhostname.U-260- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/myhostname.U-267-*)
perl-5.32.0/regen-configure/U/modified/myhostname.U:268: case `$phostname | ./tr '[A-Z]' '[a-z]'` in
perl-5.32.0/regen-configure/U/modified/myhostname.U-269- $myhostname$mydomain|$myhostname) ;;
##############################################
perl-5.32.0/regen-configure/U/modified/package.U-40-@if spackage
perl-5.32.0/regen-configure/U/modified/package.U:41:first=`echo $package | sed -e 's/^\(.\).*/\1/'`
perl-5.32.0/regen-configure/U/modified/package.U:42:last=`echo $package | sed -e 's/^.\(.*\)/\1/'`
perl-5.32.0/regen-configure/U/modified/package.U-43-?X:
##############################################
perl-5.32.0/regen-configure/U/modified/package.U-48-case "`echo AbyZ | tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/regen-configure/U/modified/package.U:49:ABYZ-abyz) spackage=`echo $first | tr '[:lower:]' '[:upper:]'`$last;;
perl-5.32.0/regen-configure/U/modified/package.U:50:*) spackage=`echo $first | tr '[a-z]' '[A-Z]'`$last;;
perl-5.32.0/regen-configure/U/modified/package.U-51-esac
##############################################
perl-5.32.0/regen-configure/U/modified/sh.U-62- : Build up a list and do a single loop so we can 'break' out.
perl-5.32.0/regen-configure/U/modified/sh.U:63: pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/regen-configure/U/modified/sh.U-64- for xxx in sh bash ksh pdksh ash; do
##############################################
perl-5.32.0/regen-configure/U/modified/sig_name.U-131- . ./signal_cmd
perl-5.32.0/regen-configure/U/modified/sig_name.U:132: sig_count=`$awk '/^NSIG/ { printf "%d", $2 }' signal.lst`
perl-5.32.0/regen-configure/U/modified/sig_name.U-133- sig_name=`$awk 'BEGIN { printf "ZERO " }
##############################################
perl-5.32.0/regen-configure/U/modified/sig_name.U-160-}'
perl-5.32.0/regen-configure/U/modified/sig_name.U:161:sig_size=`echo $sig_name | awk '{print NF}'`
perl-5.32.0/regen-configure/U/modified/sig_name.U-162-$rm -f signal signal.c signal.awk signal.lst signal_cmd
##############################################
perl-5.32.0/regen-configure/U/modified/so.U-38-'')
perl-5.32.0/regen-configure/U/modified/so.U:39: if xxx=`./loc libc.sl X $libpth`; $test -f "$xxx"; then
perl-5.32.0/regen-configure/U/modified/so.U-40- dflt='sl'
##############################################
perl-5.32.0/regen-configure/U/modified/sysman.U-41- syspath="$syspath /usr/man/man.L /local/man/man1 /usr/local/man/man1"
perl-5.32.0/regen-configure/U/modified/sysman.U:42: sysman=`./loc . /usr/man/man1 $syspath`
perl-5.32.0/regen-configure/U/modified/sysman.U-43- ;;
##############################################
perl-5.32.0/regen-configure/U/modified/usenm.U-68- case "$dflt" in
perl-5.32.0/regen-configure/U/modified/usenm.U:69: '') dflt=`$egrep 'inlibc|csym' $rsrc/Configure | wc -l 2>/dev/null`
perl-5.32.0/regen-configure/U/modified/usenm.U-70- if $test $dflt -gt 20; then
##############################################
perl-5.32.0/regen-configure/U/modified/Myinit.U-37-: This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/regen-configure/U/modified/Myinit.U:38:glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/regen-configure/U/modified/Myinit.U-39-glibpth="/usr/shlib $glibpth"
##############################################
perl-5.32.0/regen-configure/U/nullified/lib.U-42-?X:'')
perl-5.32.0/regen-configure/U/nullified/lib.U:43:?X: dflt=`./loc . "." $prefixexp/lib /usr/local/lib /usr/lib /lib`
perl-5.32.0/regen-configure/U/nullified/lib.U-44-?X: set dflt
##############################################
perl-5.32.0/regen-configure/U/perl/Checkcc.U-58- # ./trygcc: line 23: cc: command not found
perl-5.32.0/regen-configure/U/perl/Checkcc.U:59: # case "`$cc -v -c try.c 2>&1`" in
perl-5.32.0/regen-configure/U/perl/Checkcc.U-60- # *gcc*) trygcc=no ;;
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-145- # x86_64-w64-mingw32-gcc.exe -> x86_64-w64-mingw32
perl-5.32.0/regen-configure/U/perl/Cross.U:146: targetarch=`$echo $cc|$sed 's/-g[c\+][c\+].*$//'`
perl-5.32.0/regen-configure/U/perl/Cross.U:147: ar=`$echo $cc|$sed 's/-g[c\+][c\+]/-ar/'`
perl-5.32.0/regen-configure/U/perl/Cross.U-148- # leave out ld, choosing it is more complex
perl-5.32.0/regen-configure/U/perl/Cross.U:149: nm=`$echo $cc|$sed 's/-g[c\+][c\+]/-nm/'`
perl-5.32.0/regen-configure/U/perl/Cross.U:150: ranlib=`$echo $cc|$sed 's/-g[c\+][c\+]/-ranlib/'`
perl-5.32.0/regen-configure/U/perl/Cross.U-151- # We are in a weird spot. Just before us, some values
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-198- fi
perl-5.32.0/regen-configure/U/perl/Cross.U:199: hostosname=`$hostperl -le 'print $^O'`
perl-5.32.0/regen-configure/U/perl/Cross.U-200- ;;
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-232- ;;
perl-5.32.0/regen-configure/U/perl/Cross.U:233: *) pwd=`$test -f ../Configure & cd ..; pwd`
perl-5.32.0/regen-configure/U/perl/Cross.U-234- run=$pwd/Cross/run
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-325- /*)
perl-5.32.0/regen-configure/U/perl/Cross.U:326: $targetmkdir \`dirname \$f\`
perl-5.32.0/regen-configure/U/perl/Cross.U-327- $targetto -P $targetport -r $q \$f $targetuser@$targethost:\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-329- *)
perl-5.32.0/regen-configure/U/perl/Cross.U:330: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/U/perl/Cross.U-331- $targetto -P $targetport -r $q \$f $targetuser@$targethost:$targetdir/\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-343- /*)
perl-5.32.0/regen-configure/U/perl/Cross.U:344: $mkdir -p $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/U/perl/Cross.U-345- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/regen-configure/U/perl/Cross.U-347- *)
perl-5.32.0/regen-configure/U/perl/Cross.U:348: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/U/perl/Cross.U-349- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/regen-configure/U/perl/Devel.U-30-: See if we are using a devel version and want that
perl-5.32.0/regen-configure/U/perl/Devel.U:31:xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/Devel.U-32-case "$usedevel" in
##############################################
perl-5.32.0/regen-configure/U/perl/Extensions.U-96- *)
perl-5.32.0/regen-configure/U/perl/Extensions.U:97: this_ext=`echo "$xxx" | $sed -e s/-/\\\//g`;
perl-5.32.0/regen-configure/U/perl/Extensions.U-98- case "$this_ext" in
##############################################
perl-5.32.0/regen-configure/U/perl/Extensions.U-147-shift
perl-5.32.0/regen-configure/U/perl/Extensions.U:148:xs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/regen-configure/U/perl/Extensions.U-149-set X $nonxs_extensions
perl-5.32.0/regen-configure/U/perl/Extensions.U-150-shift
perl-5.32.0/regen-configure/U/perl/Extensions.U:151:nonxs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/regen-configure/U/perl/Extensions.U-152-cd "$tdir"
perl-5.32.0/regen-configure/U/perl/Extensions.U:153:known_extensions=`echo $nonxs_extensions $xs_extensions | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/regen-configure/U/perl/Extensions.U-154-
##############################################
perl-5.32.0/regen-configure/U/perl/Extensions.U-474- cd "$rsrc/cpan"
perl-5.32.0/regen-configure/U/perl/Extensions.U:475: for xxx in `ls Encode/*/Makefile.PL|awk -F/ '{print $2}'`; do
perl-5.32.0/regen-configure/U/perl/Extensions.U-476- static_ext="$static_ext Encode/$xxx"
##############################################
perl-5.32.0/regen-configure/U/perl/d_c99_variadic.U-38-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/regen-configure/U/perl/d_c99_variadic.U:39: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/d_c99_variadic.U-40- "123 456 789")
##############################################
perl-5.32.0/regen-configure/U/perl/d_dlsymun.U-96- $cc -o fred $ccflags $ldflags $cccdlflags $ccdlflags fred.c $libs > /dev/null 2>&1 && $to dyna.$dlext; then
perl-5.32.0/regen-configure/U/perl/d_dlsymun.U:97: xxx=`$run ./fred`
perl-5.32.0/regen-configure/U/perl/d_dlsymun.U-98- case $xxx in
##############################################
perl-5.32.0/regen-configure/U/perl/d_futimes.U-44-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_futimes.U:45: `$run ./try`
perl-5.32.0/regen-configure/U/perl/d_futimes.U-46- rc=$?
##############################################
perl-5.32.0/regen-configure/U/perl/d_gai_strerror.U-40-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_gai_strerror.U:41: `$run ./try`
perl-5.32.0/regen-configure/U/perl/d_gai_strerror.U-42- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/d_libm_lib_version.U-35-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_libm_lib_version.U:36: foo=`$run ./try`
perl-5.32.0/regen-configure/U/perl/d_libm_lib_version.U-37- echo "Yes, it does ($foo)" >&4
##############################################
perl-5.32.0/regen-configure/U/perl/d_procselfexe.U-49- $ls -l $try > reflect
perl-5.32.0/regen-configure/U/perl/d_procselfexe.U:50: if $contains /`basename $ls` reflect >/dev/null 2>&1; then
perl-5.32.0/regen-configure/U/perl/d_procselfexe.U-51- echo "You have $type-like $try."
##############################################
perl-5.32.0/regen-configure/U/perl/d_snprintf.U-78- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_snprintf.U:79: `$run ./try`
perl-5.32.0/regen-configure/U/perl/d_snprintf.U-80- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/d_strtoll.U-64- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_strtoll.U:65: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/d_strtoll.U-66- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/d_strtoull.U-62- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_strtoull.U:63: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/d_strtoull.U-64- ok) echo "Your strtoull() seems to be working okay." ;;
##############################################
perl-5.32.0/regen-configure/U/perl/d_strtouq.U-60- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_strtouq.U:61: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/d_strtouq.U-62- ok) echo "Your strtouq() seems to be working okay." ;;
##############################################
perl-5.32.0/regen-configure/U/perl/d_wcscmp.U-38-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_wcscmp.U:39: `$run ./try`
perl-5.32.0/regen-configure/U/perl/d_wcscmp.U-40- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/d_wcsxfrm.U-39-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/d_wcsxfrm.U:40: `$run ./try`
perl-5.32.0/regen-configure/U/perl/d_wcsxfrm.U-41- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/dlsrc.U-123- : emulate basename
perl-5.32.0/regen-configure/U/perl/dlsrc.U:124: dlsrc=`echo $ans | $sed -e 's%.*/\([^/]*\)$%\1%'`
perl-5.32.0/regen-configure/U/perl/dlsrc.U-125-
##############################################
perl-5.32.0/regen-configure/U/perl/fflushall.U-156- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/regen-configure/U/perl/fflushall.U:157: fflushNULL="`$cat try.out`"
perl-5.32.0/regen-configure/U/perl/fflushall.U-158- else
##############################################
perl-5.32.0/regen-configure/U/perl/fflushall.U-293- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/regen-configure/U/perl/fflushall.U:294: fflushall="`$cat try.out`"
perl-5.32.0/regen-configure/U/perl/fflushall.U-295- fi
##############################################
perl-5.32.0/regen-configure/U/perl/fpossize.U-42-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/fpossize.U:43: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/fpossize.U-44- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/gccvers.U-61-if $cc -o try $ccflags $ldflags try.c; then
perl-5.32.0/regen-configure/U/perl/gccvers.U:62: gccversion=`$run ./try`
perl-5.32.0/regen-configure/U/perl/gccvers.U-63- case "$gccversion" in
##############################################
perl-5.32.0/regen-configure/U/perl/gccvers.U-82-case "$gccversion" in
perl-5.32.0/regen-configure/U/perl/gccvers.U:83:1.*) cpp=`./loc gcc-cpp $cpp $pth` ;;
perl-5.32.0/regen-configure/U/perl/gccvers.U-84-esac
##############################################
perl-5.32.0/regen-configure/U/perl/gccvers.U-86-'') gccosandvers='' ;;
perl-5.32.0/regen-configure/U/perl/gccvers.U:87:*) gccshortvers=`echo "$gccversion"|sed 's/ .*//'`
perl-5.32.0/regen-configure/U/perl/gccvers.U:88: gccosandvers=`$cc -v 2>&1|grep '/specs$'|sed "s!.*/[^-/]*-[^-/]*-\([^-/]*\)/$gccshortvers/specs!\1!"`
perl-5.32.0/regen-configure/U/perl/gccvers.U-89- gccshortvers=''
##############################################
perl-5.32.0/regen-configure/U/perl/gccvers.U-97- Your gcc has not been compiled for the exact release of
perl-5.32.0/regen-configure/U/perl/gccvers.U:98: your operating system ($gccosandvers versus $osname$osvers).
perl-5.32.0/regen-configure/U/perl/gccvers.U-99-
##############################################
perl-5.32.0/regen-configure/U/perl/gccvers.U-128- if test "X$warn" != X; then
perl-5.32.0/regen-configure/U/perl/gccvers.U:129: locincpth=`echo " $locincpth " | sed "s! $incdir ! !"`
perl-5.32.0/regen-configure/U/perl/gccvers.U-130- fi
##############################################
perl-5.32.0/regen-configure/U/perl/i_db.U-164- echo 'Looks OK.' >&4
perl-5.32.0/regen-configure/U/perl/i_db.U:165: set `$run ./try 1`
perl-5.32.0/regen-configure/U/perl/i_db.U-166- db_version_major=$1
##############################################
perl-5.32.0/regen-configure/U/perl/i_db.U-175- echo "Removing unusable -ldb from library list" >&4
perl-5.32.0/regen-configure/U/perl/i_db.U:176: set `echo X $libs | $sed -e 's/-ldb / /' -e 's/-ldb$//'`
perl-5.32.0/regen-configure/U/perl/i_db.U-177- shift
##############################################
perl-5.32.0/regen-configure/U/perl/infnan.U-112-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/infnan.U:113: doubleinfbytes=`$run ./try 1`
perl-5.32.0/regen-configure/U/perl/infnan.U:114: doublenanbytes=`$run ./try 2`
perl-5.32.0/regen-configure/U/perl/infnan.U-115- case "$d_longdbl" in
perl-5.32.0/regen-configure/U/perl/infnan.U-116- $define)
perl-5.32.0/regen-configure/U/perl/infnan.U:117: longdblinfbytes=`$run ./try 3`
perl-5.32.0/regen-configure/U/perl/infnan.U:118: longdblnanbytes=`$run ./try 4`
perl-5.32.0/regen-configure/U/perl/infnan.U-119- ;;
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-363-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:364: doublekind=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-365-else
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-428- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:429: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-430- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-450- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:451: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-452- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-472- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:473: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-474- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-494- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:495: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-496- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/longdblfio.U-544- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/longdblfio.U:545: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/longdblfio.U-546- fi
##############################################
perl-5.32.0/regen-configure/U/perl/mantbits.U-76-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/mantbits.U:77: doublemantbits=`$run ./try`
perl-5.32.0/regen-configure/U/perl/mantbits.U-78-else
##############################################
perl-5.32.0/regen-configure/U/perl/mantbits.U-118-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/mantbits.U:119: longdblmantbits=`$run ./try`
perl-5.32.0/regen-configure/U/perl/mantbits.U-120-else
##############################################
perl-5.32.0/regen-configure/U/perl/need_va_copy.U-73-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/regen-configure/U/perl/need_va_copy.U:74: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/need_va_copy.U-75- "that's all right, then")
##############################################
perl-5.32.0/regen-configure/U/perl/patchlevel.U-117-if $test -r $rsrc/patchlevel.h;then
perl-5.32.0/regen-configure/U/perl/patchlevel.U:118: revision=`awk '/define[ ]+PERL_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:119: patchlevel=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:120: subversion=`awk '/define[ ]+PERL_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:121: api_revision=`awk '/define[ ]+PERL_API_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:122: api_version=`awk '/define[ ]+PERL_API_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:123: api_subversion=`awk '/define[ ]+PERL_API_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/patchlevel.U:124: perl_patchlevel=`egrep ',"(MAINT|SMOKE)[0-9][0-9]*"' $rsrc/patchlevel.h|tail -1|sed 's/[^0-9]//g'`
perl-5.32.0/regen-configure/U/perl/patchlevel.U-125-else
##############################################
perl-5.32.0/regen-configure/U/perl/patchlevel.U-138-0|'') ;;
perl-5.32.0/regen-configure/U/perl/patchlevel.U:139:*) perl_patchlevel=`echo $perl_patchlevel | sed 's/.* //'`
perl-5.32.0/regen-configure/U/perl/patchlevel.U-140- version_patchlevel_string="$version_patchlevel_string patch $perl_patchlevel"
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-354- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/perlxv.U:355: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/perlxv.U-356- int16_t)
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-396- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/perlxv.U:397: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/perlxv.U-398- int32_t)
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-475-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/perlxv.U:476: nv_preserves_uv_bits="`$run ./try`"
perl-5.32.0/regen-configure/U/perl/perlxv.U-477-fi
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-479-\-[1-9]*)
perl-5.32.0/regen-configure/U/perl/perlxv.U:480: nv_preserves_uv_bits=`expr 0 - $nv_preserves_uv_bits`
perl-5.32.0/regen-configure/U/perl/perlxv.U-481- $echo "Your NVs can preserve all $nv_preserves_uv_bits bits of your UVs." 2>&1
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-546-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/perlxv.U:547: xxx="`$run ./try`"
perl-5.32.0/regen-configure/U/perl/perlxv.U-548- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/perlxv.U-659-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/perlxv.U:660: xxx="`$run ./try`"
perl-5.32.0/regen-configure/U/perl/perlxv.U-661- case "$?" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-115- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:116: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-117- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-137- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:138: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-139- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-160- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:161: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-162- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-182- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:183: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-184- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-204- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:205: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-206- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/quadfio.U-226- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/quadfio.U:227: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/quadfio.U-228- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/perl/selectminbits.U-35-case "$selectminbits" in
perl-5.32.0/regen-configure/U/perl/selectminbits.U:36:'') safebits=`expr $ptrsize \* 8`
perl-5.32.0/regen-configure/U/perl/selectminbits.U-37- case "$d_select" in
##############################################
perl-5.32.0/regen-configure/U/perl/selectminbits.U-107- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/selectminbits.U:108: selectminbits=`$run ./try 2>/dev/null`
perl-5.32.0/regen-configure/U/perl/selectminbits.U-109- case "$selectminbits" in
##############################################
perl-5.32.0/regen-configure/U/perl/st_ino_def.U-46-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/st_ino_def.U:47: val=`$run ./try`
perl-5.32.0/regen-configure/U/perl/st_ino_def.U-48- case "$val" in
##############################################
perl-5.32.0/regen-configure/U/perl/st_ino_def.U-78-if eval $compile; then
perl-5.32.0/regen-configure/U/perl/st_ino_def.U:79: val=`$run ./try`
perl-5.32.0/regen-configure/U/perl/st_ino_def.U-80- case "$val" in
##############################################
perl-5.32.0/regen-configure/U/perl/startperl.U-67- *) startperl="#!$ans"
perl-5.32.0/regen-configure/U/perl/startperl.U:68: if $test 30 -lt `echo "$ans" | wc -c`; then
perl-5.32.0/regen-configure/U/perl/startperl.U-69- $cat >&4 <<EOM
##############################################
perl-5.32.0/regen-configure/U/perl/stdio_streams.U-52- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/stdio_streams.U:53: case "`$run ./try`" in
perl-5.32.0/regen-configure/U/perl/stdio_streams.U-54- yes) stdio_stream_array=$s; break ;;
##############################################
perl-5.32.0/regen-configure/U/perl/time_size.U-123- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/time_size.U:124: eval `$run ./try 2>/dev/null`
perl-5.32.0/regen-configure/U/perl/time_size.U-125- else
##############################################
perl-5.32.0/regen-configure/U/perl/time_size.U-203- if eval $compile; then
perl-5.32.0/regen-configure/U/perl/time_size.U:204: eval `$run ./try 2>/dev/null`
perl-5.32.0/regen-configure/U/perl/time_size.U-205- else
##############################################
perl-5.32.0/regen-configure/U/perl/use64bits.U-248- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/use64bits.U:249: libcquad=`$run ./try`
perl-5.32.0/regen-configure/U/perl/use64bits.U-250- echo "Your C library's 64-bit functions are $libcquad."
##############################################
perl-5.32.0/regen-configure/U/perl/usefaststdio.U-29-$define|true|[yY]*|'')
perl-5.32.0/regen-configure/U/perl/usefaststdio.U:30: xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/regen-configure/U/perl/usefaststdio.U-31- case "$xversion" in
##############################################
perl-5.32.0/regen-configure/U/perl/uselfs.U-115- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/uselfs.U:116: lseeksize=`$run ./try`
perl-5.32.0/regen-configure/U/perl/uselfs.U-117- $echo "Your file offsets are now $lseeksize bytes long."
##############################################
perl-5.32.0/regen-configure/U/perl/uselfs.U-144- if eval $compile_ok; then
perl-5.32.0/regen-configure/U/perl/uselfs.U:145: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/perl/uselfs.U-146- dflt="$lseeksize"
##############################################
perl-5.32.0/regen-configure/U/perl/End.U-39- $define|true|[yY]*)
perl-5.32.0/regen-configure/U/perl/End.U:40: set X `echo " $libs " | sed -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldb @ @'`
perl-5.32.0/regen-configure/U/perl/End.U-41- shift
##############################################
perl-5.32.0/regen-configure/U/protos/d_gethostprotos.U-21-?C: prototypes for gethostent(), gethostbyname(), and
perl-5.32.0/regen-configure/U/protos/d_gethostprotos.U:22:?C: gethostbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/regen-configure/U/protos/d_gethostprotos.U-23-?C: them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/regen-configure/U/protos/d_getnetprotos.U-21-?C: prototypes for getnetent(), getnetbyname(), and
perl-5.32.0/regen-configure/U/protos/d_getnetprotos.U:22:?C: getnetbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/regen-configure/U/protos/d_getnetprotos.U-23-?C: them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/regen-configure/U/protos/d_getprotoprotos.U-21-?C: prototypes for getprotoent(), getprotobyname(), and
perl-5.32.0/regen-configure/U/protos/d_getprotoprotos.U:22:?C: getprotobyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/regen-configure/U/protos/d_getprotoprotos.U-23-?C: them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/regen-configure/U/protos/d_getservprotos.U-21-?C: prototypes for getservent(), getservbyname(), and
perl-5.32.0/regen-configure/U/protos/d_getservprotos.U:22:?C: getservbyaddr(). Otherwise, it is up to the program to guess
perl-5.32.0/regen-configure/U/protos/d_getservprotos.U-23-?C: them. See netdbtype.U for probing for various Netdb_xxx_t types.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-18-?S: This variable holds the type used for the 1st argument to
perl-5.32.0/regen-configure/U/protos/netdbtype.U:19:?S: gethostbyaddr(). Usually, this is char * or void *, possibly
perl-5.32.0/regen-configure/U/protos/netdbtype.U-20-?S: with or without a const prefix.
perl-5.32.0/regen-configure/U/protos/netdbtype.U:21:?S: This is only useful if you have gethostbyaddr(), naturally.
perl-5.32.0/regen-configure/U/protos/netdbtype.U-22-?S:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-24-?S: This variable holds the type used for the 2nd argument to
perl-5.32.0/regen-configure/U/protos/netdbtype.U:25:?S: gethostbyaddr(). Usually, this is int or size_t or unsigned.
perl-5.32.0/regen-configure/U/protos/netdbtype.U:26:?S: This is only useful if you have gethostbyaddr(), naturally.
perl-5.32.0/regen-configure/U/protos/netdbtype.U-27-?S:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-34-?S: This variable holds the type used for the 1st argument to
perl-5.32.0/regen-configure/U/protos/netdbtype.U:35:?S: getnetbyaddr(). Usually, this is int or long.
perl-5.32.0/regen-configure/U/protos/netdbtype.U:36:?S: This is only useful if you have getnetbyaddr(), naturally.
perl-5.32.0/regen-configure/U/protos/netdbtype.U-37-?S:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-39-?C: This symbol holds the type used for the 1st argument
perl-5.32.0/regen-configure/U/protos/netdbtype.U:40:?C: to gethostbyaddr().
perl-5.32.0/regen-configure/U/protos/netdbtype.U-41-?C:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-43-?C: This symbol holds the type used for the 2nd argument
perl-5.32.0/regen-configure/U/protos/netdbtype.U:44:?C: to gethostbyaddr().
perl-5.32.0/regen-configure/U/protos/netdbtype.U-45-?C:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-51-?C: This symbol holds the type used for the 1st argument to
perl-5.32.0/regen-configure/U/protos/netdbtype.U:52:?C: getnetbyaddr().
perl-5.32.0/regen-configure/U/protos/netdbtype.U-53-?C:.
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-66-
perl-5.32.0/regen-configure/U/protos/netdbtype.U:67:Checking to see what type of arguments are accepted by gethostbyaddr().
perl-5.32.0/regen-configure/U/protos/netdbtype.U-68-EOM
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-78- case "$netdb_host_type" in
perl-5.32.0/regen-configure/U/protos/netdbtype.U:79: '') try="$extern_C struct hostent *gethostbyaddr($xxx, $yyy, int);"
perl-5.32.0/regen-configure/U/protos/netdbtype.U-80- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-109- # prototype clash!
perl-5.32.0/regen-configure/U/protos/netdbtype.U:110: # netdb_host_type=`echo "$netdb_host_type" | sed 's/^const //'`
perl-5.32.0/regen-configure/U/protos/netdbtype.U-111-fi
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-160-
perl-5.32.0/regen-configure/U/protos/netdbtype.U:161:Checking to see what type of 1st argument is accepted by getnetbyaddr().
perl-5.32.0/regen-configure/U/protos/netdbtype.U-162-EOM
##############################################
perl-5.32.0/regen-configure/U/protos/netdbtype.U-169- case "$netdb_net_type" in
perl-5.32.0/regen-configure/U/protos/netdbtype.U:170: '') try="$extern_C struct netent *getnetbyaddr($xxx, int);"
perl-5.32.0/regen-configure/U/protos/netdbtype.U-171- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/regen-configure/U/threads/archname.U-56-?X: the user for confirmation.
perl-5.32.0/regen-configure/U/threads/archname.U:57:if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
perl-5.32.0/regen-configure/U/threads/archname.U-58- tarch=`arch`"-$osname"
perl-5.32.0/regen-configure/U/threads/archname.U:59:elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
perl-5.32.0/regen-configure/U/threads/archname.U-60- if uname -m > tmparch 2>&1 ; then
##############################################
perl-5.32.0/regen-configure/U/threads/archname.U-79-?X: Very GCCian.
perl-5.32.0/regen-configure/U/threads/archname.U:80:*) archname=`echo $targetarch|sed 's,^[^-]*-,,'` ;;
perl-5.32.0/regen-configure/U/threads/archname.U-81-esac
##############################################
perl-5.32.0/regen-configure/U/typedefs/gidsign.U-43-if eval $compile; then
perl-5.32.0/regen-configure/U/typedefs/gidsign.U:44: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/gidsign.U-45- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/typedefs/gidsize.U-42-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/typedefs/gidsize.U:43: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/gidsize.U-44- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/typedefs/gidtype.U-50- xxx=`./findhdr sys/user.h`
perl-5.32.0/regen-configure/U/typedefs/gidtype.U:51: set `grep 'groups\[NGROUPS\];' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/regen-configure/U/typedefs/gidtype.U-52- case $1 in
##############################################
perl-5.32.0/regen-configure/U/typedefs/lseektype.U-64-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/typedefs/lseektype.U:65: lseeksize=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/lseektype.U-66- echo "Your file offsets are $lseeksize bytes long."
##############################################
perl-5.32.0/regen-configure/U/typedefs/sizesize.U-42-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/typedefs/sizesize.U:43: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/sizesize.U-44- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/typedefs/uidsign.U-43-if eval $compile; then
perl-5.32.0/regen-configure/U/typedefs/uidsign.U:44: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/uidsign.U-45- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/typedefs/uidsize.U-42-if eval $compile_ok; then
perl-5.32.0/regen-configure/U/typedefs/uidsize.U:43: yyy=`$run ./try`
perl-5.32.0/regen-configure/U/typedefs/uidsize.U-44- case "$yyy" in
##############################################
perl-5.32.0/regen-configure/U/typedefs/uidtype.U-46- xxx=`./findhdr sys/user.h`
perl-5.32.0/regen-configure/U/typedefs/uidtype.U:47: set `grep '_ruid;' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/regen-configure/U/typedefs/uidtype.U-48- case $1 in
##############################################
perl-5.32.0/regen-configure/bin/jmake-413- close MAKE;
perl-5.32.0/regen-configure/bin/jmake:414: chop($_ = `make -f $make all | grep ^OUTPUT:`);
perl-5.32.0/regen-configure/bin/jmake-415- unlink($make);
##############################################
perl-5.32.0/regen-configure/bin/jmkmf-52- here=`pwd`
perl-5.32.0/regen-configure/bin/jmkmf:53: top=`cd $topdir; pwd`
perl-5.32.0/regen-configure/bin/jmkmf-54- curdir=`perl -e \
##############################################
perl-5.32.0/regen-configure/bin/kitpost-50-$orgname = &tilda_expand($orgname);
perl-5.32.0/regen-configure/bin/kitpost:51:chop($orgname = `cat $orgname`) if $orgname =~ m|^/|;
perl-5.32.0/regen-configure/bin/kitpost-52-
##############################################
perl-5.32.0/regen-configure/bin/kitsend-48-$orgname = &tilda_expand($orgname);
perl-5.32.0/regen-configure/bin/kitsend:49:chop($orgname = `cat $orgname`) if $orgname =~ m|^/|;
perl-5.32.0/regen-configure/bin/kitsend-50-
##############################################
perl-5.32.0/regen-configure/bin/makeSH-27- fi
perl-5.32.0/regen-configure/bin/makeSH:28: base=`basename $file`
perl-5.32.0/regen-configure/bin/makeSH-29-
##############################################
perl-5.32.0/regen-configure/bin/makeSH-46-case "\$0" in
perl-5.32.0/regen-configure/bin/makeSH:47:*/*) cd \`expr X\$0 : 'X\(.*\)/'\` ;;
perl-5.32.0/regen-configure/bin/makeSH-48-esac
##############################################
perl-5.32.0/regen-configure/bin/makeSH-56-
perl-5.32.0/regen-configure/bin/makeSH:57: case `sed q $file` in
perl-5.32.0/regen-configure/bin/makeSH-58- */bin/sh) echo '$startsh' >>$file.SH ;;
##############################################
perl-5.32.0/regen-configure/bin/mconfig-1368- s/<BASEREV>/$baserev/g;
perl-5.32.0/regen-configure/bin/mconfig:1369: s/<\$(\w+)>/eval("\$$1")/ge; # <$var> -> $var substitution
perl-5.32.0/regen-configure/bin/mconfig-1370- print CONFIGURE unless &skipped || !&interpret($_);
##############################################
perl-5.32.0/regen-configure/bin/mconfig-1641- local($val2) = pop(@val);
perl-5.32.0/regen-configure/bin/mconfig:1642: push(@val, eval("$val1 $op $val2") ? 1: 0);
perl-5.32.0/regen-configure/bin/mconfig-1643-}
##############################################
perl-5.32.0/regen-configure/bin/metaconfig-1745- s/<BASEREV>/$baserev/g;
perl-5.32.0/regen-configure/bin/metaconfig:1746: s/<\$(\w+)>/eval("\$$1")/ge; # <$var> -> $var substitution
perl-5.32.0/regen-configure/bin/metaconfig-1747- print CONFIGURE unless &skipped || !&interpret($_);
##############################################
perl-5.32.0/regen-configure/bin/metaconfig-2028- local($val2) = pop(@val);
perl-5.32.0/regen-configure/bin/metaconfig:2029: push(@val, eval("$val1 $op $val2") ? 1: 0);
perl-5.32.0/regen-configure/bin/metaconfig-2030-}
##############################################
perl-5.32.0/regen-configure/bin/metalint-1321- s!#(\s*)include(\s+)"([\w.]+)"!! ||
perl-5.32.0/regen-configure/bin/metalint:1322: s!(\.\s+|`\s*)(\S*UU|\.)/([^\$/`\s;]+)\s*!! ||
perl-5.32.0/regen-configure/bin/metalint:1323: s!(`\s*\$?)cat\s+(\./)?([^\$/`\s;]+)\s*`!! ||
perl-5.32.0/regen-configure/bin/metalint-1324- s!(\s+)(\./)([^\$/`\s;]+)\s*!! ||
##############################################
perl-5.32.0/regen-configure/bin/metalint-1327- $file = $3;
perl-5.32.0/regen-configure/bin/metalint:1328: # Found some ". ./file" or `./file` execution, `$cat file`, or even
perl-5.32.0/regen-configure/bin/metalint-1329- # "blah <file"...
##############################################
perl-5.32.0/regen-configure/bin/metalint-1345- while (
perl-5.32.0/regen-configure/bin/metalint:1346: s!(\.\s+|`\s*)([^\$/`\s;]+)\s*!: ! || # . myread or `loc`
perl-5.32.0/regen-configure/bin/metalint-1347- s!(if|\|\||&&)\s+([^\$/`\s;]+)\s*!: ! # if prog, || prog, && prog
##############################################
perl-5.32.0/regen-configure/bin/metalint-1558- $defined = 0;
perl-5.32.0/regen-configure/bin/metalint:1559: $where = $shmaster{"\$$sym"};
perl-5.32.0/regen-configure/bin/metalint-1560- $defined = 1 if $tempmaster{"\$$sym"} =~ /$unit\b/;
##############################################
perl-5.32.0/regen-configure/bin/metalint-1579- $defined = 0;
perl-5.32.0/regen-configure/bin/metalint:1580: $where = $filemaster{$file}; # Where file is created
perl-5.32.0/regen-configure/bin/metalint-1581- $defined = 1 if $unit eq $where; # We're in the unit defining it
##############################################
perl-5.32.0/regen-configure/bin/metalint-1611- next unless defined $filemaster{$tmpfile};
perl-5.32.0/regen-configure/bin/metalint:1612: $where = $filemaster{$tmpfile};
perl-5.32.0/regen-configure/bin/metalint-1613- foreach $unit (split(' ', $filesetin{$tmpfile})) {
##############################################
perl-5.32.0/regen-configure/bin/metalint-1626- # If symbol is exported read-only, report the attempt to set it.
perl-5.32.0/regen-configure/bin/metalint:1627: $where = $shmaster{"\$$sym"};
perl-5.32.0/regen-configure/bin/metalint-1628- study $where;
perl-5.32.0/regen-configure/bin/metalint-1629- foreach $special (split(' ', $shspecial{$unit})) {
perl-5.32.0/regen-configure/bin/metalint:1630: $defined = 1 if $where =~ /\b$special\b/;
perl-5.32.0/regen-configure/bin/metalint-1631- last if $defined;
##############################################
perl-5.32.0/regen-configure/bin/mlint-311- local ($_) = @_;
perl-5.32.0/regen-configure/bin/mlint:312: my $where = "\"$file\", line $. (?MAKE:)";
perl-5.32.0/regen-configure/bin/mlint-313- unless (s/^\t+//) {
##############################################
perl-5.32.0/regen-configure/bin/mlint-1026- while (
perl-5.32.0/regen-configure/bin/mlint:1027: s!(\.\s+|`\s*)(\S*UU|\.)/([^\$/`\s;]+)\s*!! ||
perl-5.32.0/regen-configure/bin/mlint:1028: s!(`\s*\$?)cat\s+(\./)?([^\$/`\s;]+)\s*`!! ||
perl-5.32.0/regen-configure/bin/mlint-1029- s!(\s+)(\./)([^\$/`\s;]+)\s*!! ||
##############################################
perl-5.32.0/regen-configure/bin/mlint-1032- $file = $3;
perl-5.32.0/regen-configure/bin/mlint:1033: # Found some ". ./file" or `./file` execution, `$cat file`, or even
perl-5.32.0/regen-configure/bin/mlint-1034- # "blah <file"...
##############################################
perl-5.32.0/regen-configure/bin/mlint-1048- while (
perl-5.32.0/regen-configure/bin/mlint:1049: s!(\.\s+|`\s*)([^\$/`\s;]+)\s*!: ! || # . myread or `loc`
perl-5.32.0/regen-configure/bin/mlint-1050- s!(if|\|\||&&)\s+([^\$/`\s;]+)\s*!: ! # if prog, || prog, && prog
##############################################
perl-5.32.0/regen-configure/bin/mlint-1256- $defined = 0;
perl-5.32.0/regen-configure/bin/mlint:1257: $where = $shmaster{"\$$sym"};
perl-5.32.0/regen-configure/bin/mlint-1258- $defined = 1 if $tempmaster{"\$$sym"} =~ /$unit\b/;
##############################################
perl-5.32.0/regen-configure/bin/mlint-1277- $defined = 0;
perl-5.32.0/regen-configure/bin/mlint:1278: $where = $filemaster{$file}; # Where file is created
perl-5.32.0/regen-configure/bin/mlint-1279- $defined = 1 if $unit eq $where; # We're in the unit defining it
##############################################
perl-5.32.0/regen-configure/bin/mlint-1309- next unless defined $filemaster{$tmpfile};
perl-5.32.0/regen-configure/bin/mlint:1310: $where = $filemaster{$tmpfile};
perl-5.32.0/regen-configure/bin/mlint-1311- foreach $unit (split(' ', $filesetin{$tmpfile})) {
##############################################
perl-5.32.0/regen-configure/bin/mlint-1324- # If symbol is exported read-only, report the attempt to set it.
perl-5.32.0/regen-configure/bin/mlint:1325: $where = $shmaster{"\$$sym"};
perl-5.32.0/regen-configure/bin/mlint-1326- study $where;
perl-5.32.0/regen-configure/bin/mlint-1327- foreach $special (split(' ', $shspecial{$unit})) {
perl-5.32.0/regen-configure/bin/mlint:1328: $defined = 1 if $where =~ /\b$special\b/;
perl-5.32.0/regen-configure/bin/mlint-1329- last if $defined;
##############################################
perl-5.32.0/regen-configure/bin/packinit-107- if ($dflt eq '') {
perl-5.32.0/regen-configure/bin/packinit:108: $rlog = `rlog $rcs`;
perl-5.32.0/regen-configure/bin/packinit-109- ($dflt) = ($rlog =~ /\nhead:\s*(\d+\.\d+)/);
perl-5.32.0/regen-configure/bin/packinit:110: $rlog = `rlog -r$dflt.1- -r$dflt.2- -r$dflt.3- -r$dflt.4- $rcs`;
perl-5.32.0/regen-configure/bin/packinit-111- ($revs) = ($rlog =~ /selected revisions:\s*([\d.]+)/);
##############################################
perl-5.32.0/regen-configure/bin/patbase-69- $revs=0;
perl-5.32.0/regen-configure/bin/patbase:70: $rlog = `rlog -r$baserev -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patbase-71- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patbase-154- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patbase:155: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patbase-156- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patbase-158- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patbase:159: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patbase-160- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patcil-193- $blank = " " x $spacenum unless $spacenum < 1;
perl-5.32.0/regen-configure/bin/patcil:194: `echo '${file}${blank}$file_comment' >>MANIFEST.new`;
perl-5.32.0/regen-configure/bin/patcil-195- if (-f 'MANIFEST') {
##############################################
perl-5.32.0/regen-configure/bin/patcil-198- # differ and thus manifest will get patched correctly.
perl-5.32.0/regen-configure/bin/patcil:199: `echo '${file}${blank}$file_comment (new)' >>MANIFEST`;
perl-5.32.0/regen-configure/bin/patcil-200- print MODS "MANIFEST\n";
##############################################
perl-5.32.0/regen-configure/bin/patcil-207- $revs = 0; # Makes revs a numeric variable
perl-5.32.0/regen-configure/bin/patcil:208: $rlog = `rlog -r$baserev -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patcil-209- ($total) = ($rlog =~ /total revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patcil-229- rename($file, "$file.xxx");
perl-5.32.0/regen-configure/bin/patcil:230: `cp /dev/null $file` unless -f $file;
perl-5.32.0/regen-configure/bin/patcil-231- &cil_col("empty\n", $baserev);
##############################################
perl-5.32.0/regen-configure/bin/patcil-247- if ($revs == 1) {
perl-5.32.0/regen-configure/bin/patcil:248: $delta = `rcsdiff -r$baserev $files 2>/dev/null`;
perl-5.32.0/regen-configure/bin/patcil-249- } else {
perl-5.32.0/regen-configure/bin/patcil:250: $delta = `rcsdiff -r$revbranch $files 2>/dev/null`;
perl-5.32.0/regen-configure/bin/patcil-251- }
##############################################
perl-5.32.0/regen-configure/bin/patcil-366- if ($line =~ /^E$/) {
perl-5.32.0/regen-configure/bin/patcil:367: $mess .= "\n" . `rcsdiff -c -rlastpat $files`;
perl-5.32.0/regen-configure/bin/patcil-368- }
##############################################
perl-5.32.0/regen-configure/bin/patcil-375- # Will do something like:
perl-5.32.0/regen-configure/bin/patcil:376: # &add_history($file, `rcsdiff -c -rlastpat $files`);
perl-5.32.0/regen-configure/bin/patcil-377- # HISTORY
##############################################
perl-5.32.0/regen-configure/bin/patcil-490- system $EDITOR, "/tmp/cil$$";
perl-5.32.0/regen-configure/bin/patcil:491: $text = `cat /tmp/cil$$`;
perl-5.32.0/regen-configure/bin/patcil-492- unlink "/tmp/cil$$";
##############################################
perl-5.32.0/regen-configure/bin/patcil-628- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patcil:629: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patcil-630- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patcil-632- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patcil:633: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patcil-634- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patclean-97- @files = split(' ', $files);
perl-5.32.0/regen-configure/bin/patclean:98: $rlog = `rlog -rlastpat- $files 2>&1`;
perl-5.32.0/regen-configure/bin/patclean-99- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patclean-106- if ($revs == 1) {
perl-5.32.0/regen-configure/bin/patclean:107: $rlog = `rlog -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patclean-108- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patclean-274- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patclean:275: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patclean-276- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patclean-278- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patclean:279: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patclean-280- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patcol-117- }
perl-5.32.0/regen-configure/bin/patcol:118: $rlog = `rlog -rlastpat- $files 2>&1`;
perl-5.32.0/regen-configure/bin/patcol-119- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patcol-128- if ($revs == 1) {
perl-5.32.0/regen-configure/bin/patcol:129: $rlog = `rlog -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patcol-130- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patcol-321- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patcol:322: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patcol-323- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patcol-325- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patcol:326: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patcol-327- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patdiff-84- $revs=0;
perl-5.32.0/regen-configure/bin/patdiff:85: $rlog = `rlog -rlastpat- $files 2>&1`;
perl-5.32.0/regen-configure/bin/patdiff-86- ($lastpat) = ($rlog =~ /lastpat: ([\d.]+)/);
##############################################
perl-5.32.0/regen-configure/bin/patdiff-102- $revs=0;
perl-5.32.0/regen-configure/bin/patdiff:103: $rlog = `rlog -r$revbranch- $files 2>&1`;
perl-5.32.0/regen-configure/bin/patdiff-104- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patdiff-268- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patdiff:269: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patdiff-270- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patdiff-272- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patdiff:273: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patdiff-274- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patftp-79- $patnum = shift;
perl-5.32.0/regen-configure/bin/patftp:80: `cp patch$patnum $ftpdir`;
perl-5.32.0/regen-configure/bin/patftp-81-}
##############################################
perl-5.32.0/regen-configure/bin/patindex-38- if $test -f $i; then
perl-5.32.0/regen-configure/bin/patindex:39: name=`echo $i | $sed "s|\.Z$||"`
perl-5.32.0/regen-configure/bin/patindex-40- echo "=== $name ==="
##############################################
perl-5.32.0/regen-configure/bin/patmake-343- print "The following people are on the recipient list:\n\n";
perl-5.32.0/regen-configure/bin/patmake:344: foreach $addr (split(' ', $recipients)) {
perl-5.32.0/regen-configure/bin/patmake-345- print "\t$addr\n";
##############################################
perl-5.32.0/regen-configure/bin/patmake-366- print "The following people are on the notify list:\n\n";
perl-5.32.0/regen-configure/bin/patmake:367: foreach $addr (split(' ', $notify)) {
perl-5.32.0/regen-configure/bin/patmake-368- print "\t$addr\n";
##############################################
perl-5.32.0/regen-configure/bin/patname-96- @files = split(' ', $files);
perl-5.32.0/regen-configure/bin/patname:97: $rlog = `rlog -rlastpat- $files 2>&1`;
perl-5.32.0/regen-configure/bin/patname-98- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patname-105- if ($revs == 1) {
perl-5.32.0/regen-configure/bin/patname:106: $rlog = `rlog -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patname-107- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patname-112- if ($revs == 1) {
perl-5.32.0/regen-configure/bin/patname:113: $delta = `rcsdiff -r$baserev $files 2>/dev/null`;
perl-5.32.0/regen-configure/bin/patname-114- } else {
perl-5.32.0/regen-configure/bin/patname:115: $delta = `rcsdiff -r$revbranch $files 2>/dev/null`;
perl-5.32.0/regen-configure/bin/patname-116- }
##############################################
perl-5.32.0/regen-configure/bin/patname-121- # Have to re-run rlog after a new ci
perl-5.32.0/regen-configure/bin/patname:122: $rlog = `rlog -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patname-123- }
##############################################
perl-5.32.0/regen-configure/bin/patname-264- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patname:265: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patname-266- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patname-268- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patname:269: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patname-270- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/bin/patpost-62-$orgname = &tilda_expand($orgname);
perl-5.32.0/regen-configure/bin/patpost:63:chop($orgname = `cat $orgname`) if $orgname =~ m|^/|;
perl-5.32.0/regen-configure/bin/patpost-64-
##############################################
perl-5.32.0/regen-configure/bin/patsend-66-$orgname = &tilda_expand($orgname);
perl-5.32.0/regen-configure/bin/patsend:67:chop($orgname = `cat $orgname`) if $orgname =~ m|^/|;
perl-5.32.0/regen-configure/bin/patsend-68-
##############################################
perl-5.32.0/regen-configure/bin/patsnap-66- $revs=0;
perl-5.32.0/regen-configure/bin/patsnap:67: $rlog = `rlog -r$baserev -r$revbranch $files 2>&1`;
perl-5.32.0/regen-configure/bin/patsnap-68- ($revs) = ($rlog =~ /selected revisions: (\d+)/);
##############################################
perl-5.32.0/regen-configure/bin/patsnap-156- if ($wasrcs) {
perl-5.32.0/regen-configure/bin/patsnap:157: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patsnap-158- $dir =~ s|RCS/||;
##############################################
perl-5.32.0/regen-configure/bin/patsnap-160- $dir .= 'RCS/';
perl-5.32.0/regen-configure/bin/patsnap:161: `mkdir $dir` unless -d $dir;
perl-5.32.0/regen-configure/bin/patsnap-162- $file .= $RCSEXT;
##############################################
perl-5.32.0/regen-configure/dist/Glossary-8452- libscheck='case "$xxx" in
perl-5.32.0/regen-configure/dist/Glossary:8453: *.a) /bin/ar p $xxx `/bin/ar t $xxx | sed q` >$$.o;
perl-5.32.0/regen-configure/dist/Glossary:8454: case "`/usr/bin/file $$.o`" in
perl-5.32.0/regen-configure/dist/Glossary-8455- *N32*) rm -f $$.o ;;
##############################################
perl-5.32.0/regen-configure/dist/Glossary-8457- esac ;;
perl-5.32.0/regen-configure/dist/Glossary:8458: *) case "`/usr/bin/file $xxx`" in
perl-5.32.0/regen-configure/dist/Glossary-8459- *N32*) ;;
##############################################
perl-5.32.0/regen-configure/dist/Glossary-9073- This variable is "true" if the components of libraries must be ordered
perl-5.32.0/regen-configure/dist/Glossary:9074: (with `lorder $* | tsort`) before placing them in an archive. Set to
perl-5.32.0/regen-configure/dist/Glossary-9075- "false" if ranlib or ar can generate random libraries.
##############################################
perl-5.32.0/regen-configure/dist/U/Checkcc.U-62- esac
perl-5.32.0/regen-configure/dist/U/Checkcc.U:63: case "`$cc -v -c try.c 2>&1`" in
perl-5.32.0/regen-configure/dist/U/Checkcc.U-64- *gcc*) trygcc=no ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Chk_MANI.U-48- for filelist in x??; do
perl-5.32.0/regen-configure/dist/U/Chk_MANI.U:49: (cd "$rsrc"; ls `cat "$tmppwd/$filelist"` \
perl-5.32.0/regen-configure/dist/U/Chk_MANI.U-50- >/dev/null 2>>"$tmppwd/missing")
##############################################
perl-5.32.0/regen-configure/dist/U/Config_h.U-71-case "$0" in
perl-5.32.0/regen-configure/dist/U/Config_h.U:72:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/dist/U/Config_h.U-73-esac
##############################################
perl-5.32.0/regen-configure/dist/U/Config_sh.U-79- eval sfile="\$$file"
perl-5.32.0/regen-configure/dist/U/Config_sh.U:80: sfile=`echo $sfile | $xsed -e 's,.*/\(.*\),\1,'`
perl-5.32.0/regen-configure/dist/U/Config_sh.U-81- eval $file="$sfile"
##############################################
perl-5.32.0/regen-configure/dist/U/Cppsym.U-215-EOF
perl-5.32.0/regen-configure/dist/U/Cppsym.U:216:for i in \`$cc -v -c tmp.c 2>&1 $postprocess_cc_v\`
perl-5.32.0/regen-configure/dist/U/Cppsym.U-217-do
##############################################
perl-5.32.0/regen-configure/dist/U/Cppsym.U-252- ccsymbols=''
perl-5.32.0/regen-configure/dist/U/Cppsym.U:253: cppsymbols=`$cat Cppsym.true`
perl-5.32.0/regen-configure/dist/U/Cppsym.U:254: cppsymbols=`echo $cppsymbols`
perl-5.32.0/regen-configure/dist/U/Cppsym.U-255- cppccsymbols="$cppsymbols"
##############################################
perl-5.32.0/regen-configure/dist/U/Cppsym.U-261- symbols='ones'
perl-5.32.0/regen-configure/dist/U/Cppsym.U:262: cppccsymbols=`$cat ccsym.com`
perl-5.32.0/regen-configure/dist/U/Cppsym.U:263: cppccsymbols=`echo $cppccsymbols`
perl-5.32.0/regen-configure/dist/U/Cppsym.U-264- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cppsym.U-270- also='further '
perl-5.32.0/regen-configure/dist/U/Cppsym.U:271: cppsymbols=`$cat ccsym.cpp`
perl-5.32.0/regen-configure/dist/U/Cppsym.U:272: cppsymbols=`echo $cppsymbols`
perl-5.32.0/regen-configure/dist/U/Cppsym.U-273- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cppsym.U-279- $sed -e 's/\(..*\)=.*/\1/' ccsym.own | $uniq >>Cppsym.true
perl-5.32.0/regen-configure/dist/U/Cppsym.U:280: ccsymbols=`$cat ccsym.own`
perl-5.32.0/regen-configure/dist/U/Cppsym.U:281: ccsymbols=`echo $ccsymbols`
perl-5.32.0/regen-configure/dist/U/Cppsym.U-282- $test "$silent" || sleep 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-111-?X: A cross-compiling gcc, probably.
perl-5.32.0/regen-configure/dist/U/Cross.U:112: targetarch=`$echo $cc|$sed 's/-gcc$//'`
perl-5.32.0/regen-configure/dist/U/Cross.U-113- ar=$targetarch-ar
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-122- incpth="$incpth $*"
perl-5.32.0/regen-configure/dist/U/Cross.U:123: incpth="`$echo $incpth|$sed 's/^ //'`"
perl-5.32.0/regen-configure/dist/U/Cross.U-124- echo "Guessing incpth '$incpth'." >&4
perl-5.32.0/regen-configure/dist/U/Cross.U-125- for i in $*; do
perl-5.32.0/regen-configure/dist/U/Cross.U:126: j="`$echo $i|$sed 's,/include$,/lib,'`"
perl-5.32.0/regen-configure/dist/U/Cross.U-127- if $test -d $j; then
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-130- done
perl-5.32.0/regen-configure/dist/U/Cross.U:131: libpth="`$echo $libpth|$sed 's/^ //'`"
perl-5.32.0/regen-configure/dist/U/Cross.U-132- echo "Guessing libpth '$libpth'." >&4
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-178- ;;
perl-5.32.0/regen-configure/dist/U/Cross.U:179: *) pwd=`$test -f ../Configure & cd ..; pwd`
perl-5.32.0/regen-configure/dist/U/Cross.U-180- run=$pwd/Cross/run
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-260- /*)
perl-5.32.0/regen-configure/dist/U/Cross.U:261: $targetmkdir \`dirname \$f\`
perl-5.32.0/regen-configure/dist/U/Cross.U-262- $targetto $q \$f $targetuser@$targethost:\$f || exit 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-264- *)
perl-5.32.0/regen-configure/dist/U/Cross.U:265: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/dist/U/Cross.U-266- $targetto $q \$f $targetuser@$targethost:$targetdir/\$f || exit 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-278- /*)
perl-5.32.0/regen-configure/dist/U/Cross.U:279: $mkdir -p $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/dist/U/Cross.U-280- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/regen-configure/dist/U/Cross.U-282- *)
perl-5.32.0/regen-configure/dist/U/Cross.U:283: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/regen-configure/dist/U/Cross.U-284- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/regen-configure/dist/U/Extract.U-39-if test -f "$SRC/MANIFEST"; then
perl-5.32.0/regen-configure/dist/U/Extract.U:40: set x `awk '{print $1}' <$SRC/MANIFEST | grep '\.SH'`
perl-5.32.0/regen-configure/dist/U/Extract.U-41-else
perl-5.32.0/regen-configure/dist/U/Extract.U-42- echo "(Looking for .SH files under the source directory.)"
perl-5.32.0/regen-configure/dist/U/Extract.U:43: set x `(cd "$SRC"; find . -name "*.SH" -print)`
perl-5.32.0/regen-configure/dist/U/Extract.U-44-fi
##############################################
perl-5.32.0/regen-configure/dist/U/Extract.U-46-case $# in
perl-5.32.0/regen-configure/dist/U/Extract.U:47:0) set x `(cd "$SRC"; echo *.SH)`; shift;;
perl-5.32.0/regen-configure/dist/U/Extract.U-48-esac
##############################################
perl-5.32.0/regen-configure/dist/U/Extract.U-56- */*)
perl-5.32.0/regen-configure/dist/U/Extract.U:57: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/regen-configure/dist/U/Extract.U:58: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/regen-configure/dist/U/Extract.U-59- (cd $dir && . ./$file)
##############################################
perl-5.32.0/regen-configure/dist/U/Extract.U-85- */*)
perl-5.32.0/regen-configure/dist/U/Extract.U:86: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/regen-configure/dist/U/Extract.U:87: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/regen-configure/dist/U/Extract.U-88- ./mkdirp $dir
##############################################
perl-5.32.0/regen-configure/dist/U/Filexp.U-48- else
perl-5.32.0/regen-configure/dist/U/Filexp.U:49: name=\`$expr x\$1 : '..\([^/]*\)'\`
perl-5.32.0/regen-configure/dist/U/Filexp.U:50: dir=\`$sed -n -e "/^\${name}:/{s/^[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\).*"'\$'"/\1/" -e p -e q -e '}' </etc/passwd\`
perl-5.32.0/regen-configure/dist/U/Filexp.U-51- if $test ! -d "\$dir"; then
perl-5.32.0/regen-configure/dist/U/Filexp.U:52: me=\`basename \$0\`
perl-5.32.0/regen-configure/dist/U/Filexp.U-53- echo "\$me: can't locate home directory for: \$name" >&2
##############################################
perl-5.32.0/regen-configure/dist/U/Filexp.U-57- */*)
perl-5.32.0/regen-configure/dist/U/Filexp.U:58: echo \$dir/\`$expr x\$1 : '..[^/]*/\(.*\)'\`
perl-5.32.0/regen-configure/dist/U/Filexp.U-59- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Findhdr.U-66- while $test \$# -gt 0; do
perl-5.32.0/regen-configure/dist/U/Findhdr.U:67: if $test $testaccess \`echo \$1 | $tr -d '"'\`; then
perl-5.32.0/regen-configure/dist/U/Findhdr.U-68- echo "\$pos"
##############################################
perl-5.32.0/regen-configure/dist/U/Findhdr.U-71- shift
perl-5.32.0/regen-configure/dist/U/Findhdr.U:72: pos=\`expr \$pos + 1\`
perl-5.32.0/regen-configure/dist/U/Findhdr.U-73- done
##############################################
perl-5.32.0/regen-configure/dist/U/Findhdr.U-106-while read cline; do
perl-5.32.0/regen-configure/dist/U/Findhdr.U:107: name=\`echo \$cline | $awk "\$awkprg" | $tr -d '"'\`
perl-5.32.0/regen-configure/dist/U/Findhdr.U-108- case "\$name" in
##############################################
perl-5.32.0/regen-configure/dist/U/Getfile.U-116- expr "$fn" : '.*(\(.*\)).*' | $tr ',' $trnl >getfile.ok
perl-5.32.0/regen-configure/dist/U/Getfile.U:117: fn=`echo $fn | sed 's/(.*)//'`
perl-5.32.0/regen-configure/dist/U/Getfile.U-118- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Getfile.U-125-*:*)
perl-5.32.0/regen-configure/dist/U/Getfile.U:126: loc_file=`expr $fn : '.*:\(.*\)'`
perl-5.32.0/regen-configure/dist/U/Getfile.U:127: fn=`expr $fn : '\(.*\):.*'`
perl-5.32.0/regen-configure/dist/U/Getfile.U-128- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Getfile.U-199- *)
perl-5.32.0/regen-configure/dist/U/Getfile.U:200: value=`UU/filexp $ans`
perl-5.32.0/regen-configure/dist/U/Getfile.U-201- case $? in
##############################################
perl-5.32.0/regen-configure/dist/U/Guess.U-131- echo exit 0 >osf1
perl-5.32.0/regen-configure/dist/U/Guess.U:132:elif test `echo abc | $tr a-z A-Z` = Abc ; then
perl-5.32.0/regen-configure/dist/U/Guess.U:133: xxx=`./loc addbib blurfl $pth`
perl-5.32.0/regen-configure/dist/U/Guess.U-134- if $test -f $xxx; then
##############################################
perl-5.32.0/regen-configure/dist/U/Head.U-120-*/*)
perl-5.32.0/regen-configure/dist/U/Head.U:121: me=`echo $0 | sed -e 's!.*/\(.*\)!\1!' 2>/dev/null`
perl-5.32.0/regen-configure/dist/U/Head.U-122- test "$me" || me=$0
##############################################
perl-5.32.0/regen-configure/dist/U/Inhdr.U-52-while $test "$cont"; do
perl-5.32.0/regen-configure/dist/U/Inhdr.U:53: xxx=`./findhdr $1`
perl-5.32.0/regen-configure/dist/U/Inhdr.U-54- var=$2; eval "was=\$$2";
##############################################
perl-5.32.0/regen-configure/dist/U/Loc.U-216- uname uniq uuname vi zcat zip
perl-5.32.0/regen-configure/dist/U/Loc.U:217:pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/regen-configure/dist/U/Loc.U-218-pth="$pth /lib /usr/lib"
##############################################
perl-5.32.0/regen-configure/dist/U/Loc.U-233- ./warn "no $xxx -- ignoring your setting for $file."
perl-5.32.0/regen-configure/dist/U/Loc.U:234: xxx=`./loc $file $file $pth`
perl-5.32.0/regen-configure/dist/U/Loc.U-235- fi
perl-5.32.0/regen-configure/dist/U/Loc.U-236- ;;
perl-5.32.0/regen-configure/dist/U/Loc.U:237: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/regen-configure/dist/U/Loc.U:238: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/regen-configure/dist/U/Loc.U-239- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Loc.U-268- ./warn "no $xxx -- ignoring your setting for $file."
perl-5.32.0/regen-configure/dist/U/Loc.U:269: xxx=`./loc $file $file $pth`
perl-5.32.0/regen-configure/dist/U/Loc.U-270- fi
perl-5.32.0/regen-configure/dist/U/Loc.U-271- ;;
perl-5.32.0/regen-configure/dist/U/Loc.U:272: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/regen-configure/dist/U/Loc.U:273: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/regen-configure/dist/U/Loc.U-274- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Mkdirp.U-38- create="$name $create"
perl-5.32.0/regen-configure/dist/U/Mkdirp.U:39: name=`echo $name | sed -e "s|^[^/]*$||"`
perl-5.32.0/regen-configure/dist/U/Mkdirp.U:40: name=`echo $name | sed -e "s|\(.*\)/.*|\1|"`
perl-5.32.0/regen-configure/dist/U/Mkdirp.U-41- else
##############################################
perl-5.32.0/regen-configure/dist/U/Mksymlinks.U-73- for filelist in x??; do
perl-5.32.0/regen-configure/dist/U/Mksymlinks.U:74: (cd ..; ls `cat "$tmppwd/$filelist"` \
perl-5.32.0/regen-configure/dist/U/Mksymlinks.U-75- >/dev/null 2>>"$tmppwd/missing")
##############################################
perl-5.32.0/regen-configure/dist/U/Myread.U-74- *)
perl-5.32.0/regen-configure/dist/U/Myread.U:75: if test \`echo \"\$rp [\$xxxm] \" | wc -c\` -ge $COLUMNS; then
perl-5.32.0/regen-configure/dist/U/Myread.U-76- echo \"\$rp\" >&4
##############################################
perl-5.32.0/regen-configure/dist/U/Myread.U-139- !*)
perl-5.32.0/regen-configure/dist/U/Myread.U:140: set x \`expr "X\$ans" : "X!\(.*\)\$"\`
perl-5.32.0/regen-configure/dist/U/Myread.U-141- shift
##############################################
perl-5.32.0/regen-configure/dist/U/Myread.U-154- \\&*)
perl-5.32.0/regen-configure/dist/U/Myread.U:155: set x \`expr "X\$ans" : "X&\(.*\)\$"\`
perl-5.32.0/regen-configure/dist/U/Myread.U-156- shift
##############################################
perl-5.32.0/regen-configure/dist/U/Myread.U-174- xxxm="\$ans"
perl-5.32.0/regen-configure/dist/U/Myread.U:175: ans=\`echo $n "\$ans$c" | tr '$trnl' ' '\`
perl-5.32.0/regen-configure/dist/U/Myread.U-176- xxxm="\$ans"
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-110-: Determine the name of the machine
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:111:myuname=`$uname -a 2>/dev/null`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-112-$test -z "$myuname" && myuname=`hostname 2>/dev/null`
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-132-$test -f /lynx.os && osname=lynxos
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:133:$test -f /unicos && osname=unicos && osvers=`$uname -r`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:134:$test -f /unicosmk && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:135:$test -f /unicosmk.ar && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-136-$test -f /bin/mips && /bin/mips && osname=mips
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-181- i386*)
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:182: tmp=`/bin/uname -X 2>/dev/null|awk '/3\.2v[45]/{ print $(NF) }'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-183- if $test "$tmp" != "" -a "$3" = "3.2" -a -f '/etc/systemid'; then
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-232- bsd386) osname=bsd386
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:233: osvers=`$uname -r`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-234- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-252- dynixptx*) osname=dynixptx
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:253: osvers=`echo "$4"|sed 's/^v//'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-254- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-262- hp*) osname=hpux
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:263: osvers=`echo "$3" | $sed 's,.*\.\([0-9]*\.[0-9]*\),\1,'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-264- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-304- case "$3" in
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:305: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-306- *) osvers="$3" ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-311- 5*) osname=solaris
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:312: osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-313- *) osvers="$3" ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-337- [1-9].[0-9]*) ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:338: *) osvers=`echo "$3" | sed 's/^[xvt]//'` ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-339- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-368- if $test -f /stand/boot ; then
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:369: eval `$grep '^INITPROG=[a-z/0-9]*$' /stand/boot`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-370- if $test -n "$INITPROG" -a -f "$INITPROG"; then
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-382- osname=sco
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:383: set `echo $3 | $sed 's/\./ /g'` $4
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-384- if $test -f $src/hints/sco_$1_$2_$3.sh; then
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-434- if $contains myuname= ../config.sh >/dev/null 2>&1; then
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:435: eval "`$grep myuname= ../config.sh`"
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-436- fi
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-503-*) hostarch=$osname
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:504: osname=`echo $targetarch|sed 's,^[^-]*-,,'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-505- osvers=''
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-527- ''|' ')
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:528: file=`echo "${osname}_${osvers}" | $sed -e 's%\.%_%g' -e 's%_$%%'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-529- : Also try without trailing minor version numbers.
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:530: xfile=`echo $file | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:531: xxfile=`echo $xfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:532: xxxfile=`echo $xxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:533: xxxxfile=`echo $xxxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-534- case "$file" in
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-566- *)
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:567: dflt=`echo $hintfile | $sed 's/\.sh$//'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-568- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-649- ''|' '|none) dflt=none ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:650: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/_.*$//'` ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-651- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-658-none) osname='' ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:659:*) osname=`echo "$ans" | $sed -e 's/[ ][ ]*/_/g' | ./tr '[A-Z]' '[a-z]'`;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-660-esac
##############################################
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-669- ''|' '|none) dflt=none ;;
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:670: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/^[^_]*//'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U:671: dflt=`echo $dflt | $sed -e 's/^_//' -e 's/_/./g'`
perl-5.32.0/regen-configure/dist/U/Oldconfig.U-672- case "$dflt" in
##############################################
perl-5.32.0/regen-configure/dist/U/Options.U-84- args_exp="$args_exp$args_sep'$arg_exp'"
perl-5.32.0/regen-configure/dist/U/Options.U:85: argn=`expr $argn + 1`
perl-5.32.0/regen-configure/dist/U/Options.U-86- args_sep=' '
##############################################
perl-5.32.0/regen-configure/dist/U/Options.U-234- case "$yyy" in
perl-5.32.0/regen-configure/dist/U/Options.U:235: *=*) zzz=`echo "$yyy"|sed 's!=.*!!'`
perl-5.32.0/regen-configure/dist/U/Options.U-236- case "$zzz" in
##############################################
perl-5.32.0/regen-configure/dist/U/Options.U-238- *) xxx=append
perl-5.32.0/regen-configure/dist/U/Options.U:239: zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/regen-configure/dist/U/Options.U:240: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/regen-configure/dist/U/Options.U-241- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Options.U-245- '') case "$yyy" in
perl-5.32.0/regen-configure/dist/U/Options.U:246: *:*) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/regen-configure/dist/U/Options.U:247: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'`
perl-5.32.0/regen-configure/dist/U/Options.U:248: zzz=`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/regen-configure/dist/U/Options.U:249: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/regen-configure/dist/U/Options.U:250: *) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/regen-configure/dist/U/Options.U:251: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
perl-5.32.0/regen-configure/dist/U/Options.U-252- esac
##############################################
perl-5.32.0/regen-configure/dist/U/Prefixit.U-63- /*-$oldprefix/*|\~*-$oldprefix/*)
perl-5.32.0/regen-configure/dist/U/Prefixit.U:64: eval "$1=\`echo \$$2 | sed \"s,^$oldprefix,$prefix,\"\`";;
perl-5.32.0/regen-configure/dist/U/Prefixit.U-65- *) eval "$1=\"\$$2\"";;
##############################################
perl-5.32.0/regen-configure/dist/U/Prefixup.U-35-"$prefix") ;;
perl-5.32.0/regen-configure/dist/U/Prefixup.U:36:*) eval "$1=\`echo \$$1 | sed \"s,^$prefixexp,$prefix,\"\`";;
perl-5.32.0/regen-configure/dist/U/Prefixup.U-37-esac'
##############################################
perl-5.32.0/regen-configure/dist/U/Signal.U-227- : Now look at all the signal names, one at a time.
perl-5.32.0/regen-configure/dist/U/Signal.U:228: for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
perl-5.32.0/regen-configure/dist/U/Signal.U-229- $cat > signal.c <<EOCP
##############################################
perl-5.32.0/regen-configure/dist/U/Tr.U-36-echo " "
perl-5.32.0/regen-configure/dist/U/Tr.U:37:case "`echo AbyZ | LC_ALL=C $tr '[:lower:]' '[:upper:]' 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/Tr.U-38-ABYZ)
##############################################
perl-5.32.0/regen-configure/dist/U/Tr.U-45- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/dist/U/Tr.U:46: case "`echo IJ | LC_ALL=C $tr '[I-J]' '[i-j]' 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/Tr.U-47- ij) up='[A-Z]'
##############################################
perl-5.32.0/regen-configure/dist/U/Tr.U-52- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/dist/U/Tr.U:53: case "`echo IJ | LC_ALL=C $tr I-J i-j 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/Tr.U-54- ij) up='A-Z'
##############################################
perl-5.32.0/regen-configure/dist/U/Tr.U-71- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/regen-configure/dist/U/Tr.U:72: case "`echo IJ | LC_ALL=C $tr A-IJ-RS-Z a-ij-rs-z 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/Tr.U-73- ij) up='A-IJ-RS-Z'
##############################################
perl-5.32.0/regen-configure/dist/U/Tr.U-81-esac
perl-5.32.0/regen-configure/dist/U/Tr.U:82:case "`echo IJ | LC_ALL=C $tr \"$up\" \"$low\" 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/Tr.U-83-ij)
##############################################
perl-5.32.0/regen-configure/dist/U/archlib.U-77- '')
perl-5.32.0/regen-configure/dist/U/archlib.U:78: dflt=`./loc . "." $prefixexp/lib /usr/local/lib /usr/lib /lib`
perl-5.32.0/regen-configure/dist/U/archlib.U-79- set dflt
##############################################
perl-5.32.0/regen-configure/dist/U/archlib.U-109- case "$installarchlib" in
perl-5.32.0/regen-configure/dist/U/archlib.U:110: '') dflt=`echo $archlibexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/archlib.U-111- *) dflt="$installarchlib";;
##############################################
perl-5.32.0/regen-configure/dist/U/archname.U-47-?X: the user for confirmation.
perl-5.32.0/regen-configure/dist/U/archname.U:48:if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
perl-5.32.0/regen-configure/dist/U/archname.U-49- tarch=`arch`"-$osname"
perl-5.32.0/regen-configure/dist/U/archname.U:50:elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
perl-5.32.0/regen-configure/dist/U/archname.U-51- if uname -m > tmparch 2>&1 ; then
##############################################
perl-5.32.0/regen-configure/dist/U/bin.U-77- case "$installbin" in
perl-5.32.0/regen-configure/dist/U/bin.U:78: '') dflt=`echo $binexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/bin.U-79- *) dflt="$installbin";;
##############################################
perl-5.32.0/regen-configure/dist/U/cf_email.U-38- if $test -s /etc/mailname; then
perl-5.32.0/regen-configure/dist/U/cf_email.U:39: maildomain=`$cat /etc/mailname`
perl-5.32.0/regen-configure/dist/U/cf_email.U-40- else
##############################################
perl-5.32.0/regen-configure/dist/U/cf_name.U-53- *)
perl-5.32.0/regen-configure/dist/U/cf_name.U:54: cf_name=`$cat $fn`
perl-5.32.0/regen-configure/dist/U/cf_name.U-55- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/cf_who.U-37-?X: Ensure English date -- Jarkko Hietaniemi
perl-5.32.0/regen-configure/dist/U/cf_who.U:38:cf_time=`LC_ALL=C; LANGUAGE=C; export LC_ALL; export LANGUAGE; $date 2>&1`
perl-5.32.0/regen-configure/dist/U/cf_who.U-39-?X:
##############################################
perl-5.32.0/regen-configure/dist/U/d_NeWS.U-52-if $test -d $d_newshome; then
perl-5.32.0/regen-configure/dist/U/d_NeWS.U:53: d_newshome=`(cd $d_newshome ; /bin/pwd)`
perl-5.32.0/regen-configure/dist/U/d_NeWS.U-54- echo "Ah...found myself a NeWS in $d_newshome..."
##############################################
perl-5.32.0/regen-configure/dist/U/d_crypt.U-48- else
perl-5.32.0/regen-configure/dist/U/d_crypt.U:49: cryptlib=`./loc Slibcrypt$_a "" $xlibpth`
perl-5.32.0/regen-configure/dist/U/d_crypt.U-50- if $test -z "$cryptlib"; then
perl-5.32.0/regen-configure/dist/U/d_crypt.U:51: cryptlib=`./loc Mlibcrypt$_a "" $xlibpth`
perl-5.32.0/regen-configure/dist/U/d_crypt.U-52- else
##############################################
perl-5.32.0/regen-configure/dist/U/d_crypt.U-55- if $test -z "$cryptlib"; then
perl-5.32.0/regen-configure/dist/U/d_crypt.U:56: cryptlib=`./loc Llibcrypt$_a "" $xlibpth`
perl-5.32.0/regen-configure/dist/U/d_crypt.U-57- else
##############################################
perl-5.32.0/regen-configure/dist/U/d_crypt.U-60- if $test -z "$cryptlib"; then
perl-5.32.0/regen-configure/dist/U/d_crypt.U:61: cryptlib=`./loc libcrypt$_a "" $libpth`
perl-5.32.0/regen-configure/dist/U/d_crypt.U-62- else
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-145- shift
perl-5.32.0/regen-configure/dist/U/d_gethname.U:146: file=`./loc $file $file $pth`
perl-5.32.0/regen-configure/dist/U/d_gethname.U:147: aphostname=`echo $file $*`
perl-5.32.0/regen-configure/dist/U/d_gethname.U-148- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-168-
perl-5.32.0/regen-configure/dist/U/d_gethname.U:169: popen("$aphostname","r")
perl-5.32.0/regen-configure/dist/U/d_gethname.U-170-
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-205-
perl-5.32.0/regen-configure/dist/U/d_gethname.U:206: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/dist/U/d_gethname.U-207-
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-239-
perl-5.32.0/regen-configure/dist/U/d_gethname.U:240: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/dist/U/d_gethname.U-241-
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-249- *)
perl-5.32.0/regen-configure/dist/U/d_gethname.U:250: echo "I'll use 'popen("'"'$aphostname'", "r")'"' to get your hostname." >&4
perl-5.32.0/regen-configure/dist/U/d_gethname.U-251- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/d_gethname.U-265-
perl-5.32.0/regen-configure/dist/U/d_gethname.U:266: `grep sysname $usrinc/whoami.h`
perl-5.32.0/regen-configure/dist/U/d_gethname.U-267-
##############################################
perl-5.32.0/regen-configure/dist/U/d_gnulibc.U-87- val="$define"
perl-5.32.0/regen-configure/dist/U/d_gnulibc.U:88: gnulibc_version=`$cat glibc.ver`
perl-5.32.0/regen-configure/dist/U/d_gnulibc.U-89- echo "You are using the GNU C Library version $gnulibc_version"
##############################################
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-43-echo " "
perl-5.32.0/regen-configure/dist/U/d_havetlib.U:44:xxx=`./loc libcurses$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-45-case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-51- echo "Terminfo library found." >&4
perl-5.32.0/regen-configure/dist/U/d_havetlib.U:52: elif $test "x`$uname 2>/dev/null`" = xAIX; then
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-53- # Ok, do the AIX shr.o fun thing
##############################################
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-69-x)
perl-5.32.0/regen-configure/dist/U/d_havetlib.U:70: xxx=`./loc libtermlib$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-71- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-82- *)
perl-5.32.0/regen-configure/dist/U/d_havetlib.U:83: xxx=`./loc libtermcap$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-84- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-110- . ./myread
perl-5.32.0/regen-configure/dist/U/d_havetlib.U:111: termlib=`./filexp $ans`
perl-5.32.0/regen-configure/dist/U/d_havetlib.U-112- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/d_hidnet.U-59- case "$hiddennet" in
perl-5.32.0/regen-configure/dist/U/d_hidnet.U:60: '') dflt=`echo $mydomain | $sed -e 's/^\.//'`;;
perl-5.32.0/regen-configure/dist/U/d_hidnet.U-61- *) dflt="$hiddennet";;
##############################################
perl-5.32.0/regen-configure/dist/U/d_keepsig.U-61-?X: (reported by Xavier LeVourch <xavierl@eiffel.com>)
perl-5.32.0/regen-configure/dist/U/d_keepsig.U:62: echo `sh -c $run ./try >try.out 2>/dev/null` >/dev/null
perl-5.32.0/regen-configure/dist/U/d_keepsig.U-63- if $contains abc try.out >/dev/null 2>&1; then
##############################################
perl-5.32.0/regen-configure/dist/U/d_strerror.U-84- fi
perl-5.32.0/regen-configure/dist/U/d_strerror.U:85:elif xxx=`./findhdr string.h`; test "$xxx" || xxx=`./findhdr strings.h`; \
perl-5.32.0/regen-configure/dist/U/d_strerror.U-86- $contains '#[ ]*define.*strerror' "$xxx" >/dev/null 2>&1; then
##############################################
perl-5.32.0/regen-configure/dist/U/gccvers.U-46-if $cc -o try $ccflags $ldflags try.c >/dev/null 2>&1; then
perl-5.32.0/regen-configure/dist/U/gccvers.U:47: gccversion=`$run ./try`
perl-5.32.0/regen-configure/dist/U/gccvers.U-48- case "$gccversion" in
##############################################
perl-5.32.0/regen-configure/dist/U/gccvers.U-67-case "$gccversion" in
perl-5.32.0/regen-configure/dist/U/gccvers.U:68:1*) cpp=`./loc gcc-cpp $cpp $pth` ;;
perl-5.32.0/regen-configure/dist/U/gccvers.U-69-esac
##############################################
perl-5.32.0/regen-configure/dist/U/gccvers.U-71-'') gccosandvers='' ;;
perl-5.32.0/regen-configure/dist/U/gccvers.U:72:*) gccshortvers=`echo "$gccversion"|sed 's/ .*//'`
perl-5.32.0/regen-configure/dist/U/gccvers.U-73- gccosandvers=`$cc -v 2>&1 | \
##############################################
perl-5.32.0/regen-configure/dist/U/gccvers.U-83- Your gcc has not been compiled for the exact release of
perl-5.32.0/regen-configure/dist/U/gccvers.U:84: your operating system ($gccosandvers versus $osname$osvers).
perl-5.32.0/regen-configure/dist/U/gccvers.U-85-
##############################################
perl-5.32.0/regen-configure/dist/U/gccvers.U-112- sed '1,/^#include <\.\.\.>/d;/^End of search list/,$d;s/^ //'` ; do
perl-5.32.0/regen-configure/dist/U/gccvers.U:113: locincpth=`echo $locincpth | sed s!$incdir!!`
perl-5.32.0/regen-configure/dist/U/gccvers.U-114- done
##############################################
perl-5.32.0/regen-configure/dist/U/gidtype.U-48- xxx=`./findhdr sys/user.h`
perl-5.32.0/regen-configure/dist/U/gidtype.U:49: set `grep 'groups\[NGROUPS\];' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/regen-configure/dist/U/gidtype.U-50- case $1 in
##############################################
perl-5.32.0/regen-configure/dist/U/ilp.U-60-$echo $n "Computing CPU architecture type...$c" >&4
perl-5.32.0/regen-configure/dist/U/ilp.U:61:ilp=`expr $longsize \* 8`
perl-5.32.0/regen-configure/dist/U/ilp.U-62-case "$ptrsize" in
##############################################
perl-5.32.0/regen-configure/dist/U/inc.U-28-'')
perl-5.32.0/regen-configure/dist/U/inc.U:29: dflt=`./loc . "." /usr/local/include /usr/include/local $usrinc`
perl-5.32.0/regen-configure/dist/U/inc.U-30- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/issymlink.U-46- /*) ;;
perl-5.32.0/regen-configure/dist/U/issymlink.U:47: *) pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/regen-configure/dist/U/issymlink.U-48- for p in $pth
##############################################
perl-5.32.0/regen-configure/dist/U/lib.U-41-'')
perl-5.32.0/regen-configure/dist/U/lib.U:42: dflt=`./loc . "." $prefixexp/lib /usr/local/lib /usr/lib /lib`
perl-5.32.0/regen-configure/dist/U/lib.U-43- set dflt
##############################################
perl-5.32.0/regen-configure/dist/U/libc.U-79- case "$libs" in
perl-5.32.0/regen-configure/dist/U/libc.U:80: *-lc_s*) libc=`./loc libc_s$_a $libc $libpth`
perl-5.32.0/regen-configure/dist/U/libc.U-81- esac
##############################################
perl-5.32.0/regen-configure/dist/U/libc.U-91- -l*)
perl-5.32.0/regen-configure/dist/U/libc.U:92: thislib=`echo $thislib | $sed -e 's/^-l//'`
perl-5.32.0/regen-configure/dist/U/libc.U:93: if try=`./loc lib$thislib.$so.'*' X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-94- :
perl-5.32.0/regen-configure/dist/U/libc.U:95: elif try=`./loc lib$thislib.$so X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-96- :
perl-5.32.0/regen-configure/dist/U/libc.U:97: elif try=`./loc lib$thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-98- :
perl-5.32.0/regen-configure/dist/U/libc.U:99: elif try=`./loc $thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-100- :
perl-5.32.0/regen-configure/dist/U/libc.U:101: elif try=`./loc lib$thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-102- :
perl-5.32.0/regen-configure/dist/U/libc.U:103: elif try=`./loc $thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-104- :
perl-5.32.0/regen-configure/dist/U/libc.U:105: elif try=`./loc Slib$thislib$_a X $xlibpth`; $test -f "$try"; then
perl-5.32.0/regen-configure/dist/U/libc.U-106- :
##############################################
perl-5.32.0/regen-configure/dist/U/libc.U-187-else
perl-5.32.0/regen-configure/dist/U/libc.U:188: if tans=`./loc libc$_a blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/dist/U/libc.U-189- :
perl-5.32.0/regen-configure/dist/U/libc.U:190: elif tans=`./loc libc blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/dist/U/libc.U:191: libnames="$libnames "`./loc clib blurfl/dyick $libpth`
perl-5.32.0/regen-configure/dist/U/libc.U:192: elif tans=`./loc clib blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/dist/U/libc.U-193- :
perl-5.32.0/regen-configure/dist/U/libc.U:194: elif tans=`./loc Slibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/dist/U/libc.U-195- :
perl-5.32.0/regen-configure/dist/U/libc.U:196: elif tans=`./loc Mlibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/regen-configure/dist/U/libc.U-197- :
perl-5.32.0/regen-configure/dist/U/libc.U-198- else
perl-5.32.0/regen-configure/dist/U/libc.U:199: tans=`./loc Llibc$_a blurfl/dyick $xlibpth`
perl-5.32.0/regen-configure/dist/U/libc.U-200- fi
##############################################
perl-5.32.0/regen-configure/dist/U/libdbm.U-34-else
perl-5.32.0/regen-configure/dist/U/libdbm.U:35: xxx=`./loc libdbm$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libdbm.U-36- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/libflex.U-35-*flex)
perl-5.32.0/regen-configure/dist/U/libflex.U:36: xxx=`./loc libfl$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libflex.U-37- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/libflex.U-48-*lex)
perl-5.32.0/regen-configure/dist/U/libflex.U:49: xxx=`./loc libl$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libflex.U-50- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/libnlist.U-34-else
perl-5.32.0/regen-configure/dist/U/libnlist.U:35: xxx=`./loc libelf$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libnlist.U-36- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/libnm.U-32-else
perl-5.32.0/regen-configure/dist/U/libnm.U:33: ans=`./loc libnm$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libnm.U-34- case "$ans" in
##############################################
perl-5.32.0/regen-configure/dist/U/libs.U-72-?S: libscheck='case "$xxx" in
perl-5.32.0/regen-configure/dist/U/libs.U:73:?S: *.a) /bin/ar p $xxx `/bin/ar t $xxx | sed q` >$$.o;
perl-5.32.0/regen-configure/dist/U/libs.U:74:?S: case "`/usr/bin/file $$.o`" in
perl-5.32.0/regen-configure/dist/U/libs.U-75-?S: *N32*) rm -f $$.o ;;
##############################################
perl-5.32.0/regen-configure/dist/U/libs.U-77-?S: esac ;;
perl-5.32.0/regen-configure/dist/U/libs.U:78:?S: *) case "`/usr/bin/file $xxx`" in
perl-5.32.0/regen-configure/dist/U/libs.U-79-?S: *N32*) ;;
##############################################
perl-5.32.0/regen-configure/dist/U/libs.U-141- if $test ! -f "$xxx" ; then
perl-5.32.0/regen-configure/dist/U/libs.U:142: xxx=`ls $thisdir/lib$thislib.$so.[0-9]* 2>/dev/null | $sed -n '1p'`
perl-5.32.0/regen-configure/dist/U/libs.U-143- $test -f "$xxx" && eval $libscheck
##############################################
perl-5.32.0/regen-configure/dist/U/libs.U-197- libsfound="$libsfound $xxx"
perl-5.32.0/regen-configure/dist/U/libs.U:198: yyy=`basename $xxx`
perl-5.32.0/regen-configure/dist/U/libs.U-199- libsfiles="$libsfiles $yyy"
perl-5.32.0/regen-configure/dist/U/libs.U:200: yyy=`echo $xxx|$sed -e "s%/$yyy\\$%%"`
perl-5.32.0/regen-configure/dist/U/libs.U-201- case " $libsdirs " in
##############################################
perl-5.32.0/regen-configure/dist/U/libyacc.U-42-*yacc)
perl-5.32.0/regen-configure/dist/U/libyacc.U:43: xxx=`./loc liby$_a x $libpth`
perl-5.32.0/regen-configure/dist/U/libyacc.U-44- case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/mailfile.U-54-. ./myread
perl-5.32.0/regen-configure/dist/U/mailfile.U:55:mailfile=`./filexp "$ans"`
perl-5.32.0/regen-configure/dist/U/mailfile.U-56-
##############################################
perl-5.32.0/regen-configure/dist/U/make.U-48-?X: GNU make sometimes prints "make[1]: Entering...", which would confuse us
perl-5.32.0/regen-configure/dist/U/make.U:49: case "`$make -f testmake.mak 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/make.U-50- *maketemp=*) make_set_make='#' ;;
##############################################
perl-5.32.0/regen-configure/dist/U/mallocsrc.U-107- echo "Removing unneeded -lmalloc from library list" >&4
perl-5.32.0/regen-configure/dist/U/mallocsrc.U:108: set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
perl-5.32.0/regen-configure/dist/U/mallocsrc.U-109- shift
##############################################
perl-5.32.0/regen-configure/dist/U/man1dir.U-75- case "$sysman" in
perl-5.32.0/regen-configure/dist/U/man1dir.U:76: */?_man*) dflt=`./loc . $prefixexp/l_man/man1 $lookpath` ;;
perl-5.32.0/regen-configure/dist/U/man1dir.U:77: *) dflt=`./loc . $prefixexp/man/man1 $lookpath` ;;
perl-5.32.0/regen-configure/dist/U/man1dir.U-78- esac
##############################################
perl-5.32.0/regen-configure/dist/U/man1dir.U-106- case "$installman1dir" in
perl-5.32.0/regen-configure/dist/U/man1dir.U:107: '') dflt=`echo $man1direxp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/man1dir.U-108- *) dflt="$installman1dir";;
##############################################
perl-5.32.0/regen-configure/dist/U/man3dir.U-117- case "$installman3dir" in
perl-5.32.0/regen-configure/dist/U/man3dir.U:118: '') dflt=`echo $man3direxp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/man3dir.U-119- *) dflt="$installman3dir";;
##############################################
perl-5.32.0/regen-configure/dist/U/manfmt.U-71- lookpath="$lookpath /usr/catman/u_man/man1 /usr/catman/man1"
perl-5.32.0/regen-configure/dist/U/manfmt.U:72: dflt=`./loc . none $lookpath`
perl-5.32.0/regen-configure/dist/U/manfmt.U-73- set dflt
##############################################
perl-5.32.0/regen-configure/dist/U/manfmt.U-95- case "$installmanfmt" in
perl-5.32.0/regen-configure/dist/U/manfmt.U:96: '') dflt=`echo $manfmtexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/manfmt.U-97- *) dflt="$installmanfmt";;
##############################################
perl-5.32.0/regen-configure/dist/U/mansrc.U-92- lookpath="$lookpath /usr/man/man.L"
perl-5.32.0/regen-configure/dist/U/mansrc.U:93: mansrc=`./loc . $prefixexp/man/man1 $lookpath`
perl-5.32.0/regen-configure/dist/U/mansrc.U-94- if $test -d "$mansrc"; then
##############################################
perl-5.32.0/regen-configure/dist/U/mansrc.U-127- case "$installmansrc" in
perl-5.32.0/regen-configure/dist/U/mansrc.U:128: '') dflt=`echo $mansrcexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/mansrc.U-129- *) dflt="$installmansrc";;
##############################################
perl-5.32.0/regen-configure/dist/U/mkdep.U-160- esac
perl-5.32.0/regen-configure/dist/U/mkdep.U:161: filebase=\`basename \$srcfile \$c\`
perl-5.32.0/regen-configure/dist/U/mkdep.U-162- <\$srcfile $cpp $cppminus $cppflags \$flags 2>/dev/null | \\
##############################################
perl-5.32.0/regen-configure/dist/U/mkdep.U-194- -I*)
perl-5.32.0/regen-configure/dist/U/mkdep.U:195: dir=\`echo \$1 | sed -e 's/^-I//'\`
perl-5.32.0/regen-configure/dist/U/mkdep.U-196- inc="\$inc:\$dir"
##############################################
perl-5.32.0/regen-configure/dist/U/mkdep.U-210- esac
perl-5.32.0/regen-configure/dist/U/mkdep.U:211: filebase=\`basename \$srcfile \$c\`
perl-5.32.0/regen-configure/dist/U/mkdep.U-212- echo \$filebase$_o: \$srcfile
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-102- echo 'Oh well, maybe I can mine it out of whoami.h...'
perl-5.32.0/regen-configure/dist/U/myhostname.U:103: if tans=`sh -c $contains' sysname $usrinc/whoami.h' 2>&1` ; then
perl-5.32.0/regen-configure/dist/U/myhostname.U:104: myhostname=`echo "$tans" | $sed 's/^.*"\(.*\)"/\1/'`
perl-5.32.0/regen-configure/dist/U/myhostname.U-105- phostname="sed -n -e '"'/sysname/s/^.*\"\\(.*\\)\"/\1/{'"' -e p -e q -e '}' <$usrinc/whoami.h"
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-147- echo "(Normalizing case in your host name)"
perl-5.32.0/regen-configure/dist/U/myhostname.U:148: myhostname=`echo $myhostname | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/regen-configure/dist/U/myhostname.U-149- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-156-*.*)
perl-5.32.0/regen-configure/dist/U/myhostname.U:157: dflt=`expr "X$myhostname" : "X[^.]*\(\..*\)"`
perl-5.32.0/regen-configure/dist/U/myhostname.U:158: myhostname=`expr "X$myhostname" : "X\([^.]*\)\."`
perl-5.32.0/regen-configure/dist/U/myhostname.U-159- echo "(Trimming domain name from host name--host name is now $myhostname)"
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-187- $sed -n -e "s/$myhostname\.\([-a-zA-Z0-9_.]\)/\1/p"`
perl-5.32.0/regen-configure/dist/U/myhostname.U:188: case `$echo X$dflt` in
perl-5.32.0/regen-configure/dist/U/myhostname.U-189- X*\ *) echo "(Several hosts in /etc/hosts matched hostname)"
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-223- '') dflt='.';;
perl-5.32.0/regen-configure/dist/U/myhostname.U:224: .nis.*|.yp.*|.main.*) dflt=`echo $dflt | $sed -e 's/^\.[^.]*//'`;;
perl-5.32.0/regen-configure/dist/U/myhostname.U-225- esac
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-231- echo "(Attempting domain name extraction from $file)"
perl-5.32.0/regen-configure/dist/U/myhostname.U:232: dflt=.`awk '/^DOMAINORIGIN/ {print $2}' "$file" 2>/dev/null`
perl-5.32.0/regen-configure/dist/U/myhostname.U-233- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-259- echo "(Normalizing case in your domain name)"
perl-5.32.0/regen-configure/dist/U/myhostname.U:260: mydomain=`echo $mydomain | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/regen-configure/dist/U/myhostname.U-261- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/myhostname.U-268-*)
perl-5.32.0/regen-configure/dist/U/myhostname.U:269: case `$phostname | ./tr '[A-Z]' '[a-z]'` in
perl-5.32.0/regen-configure/dist/U/myhostname.U-270- $myhostname$mydomain|$myhostname) ;;
##############################################
perl-5.32.0/regen-configure/dist/U/nblock_io.U-196- case $? in
perl-5.32.0/regen-configure/dist/U/nblock_io.U:197: 0) eagain=`$cat try.out`;;
perl-5.32.0/regen-configure/dist/U/nblock_io.U-198- 1) echo "Could not perform non-blocking setting!";;
##############################################
perl-5.32.0/regen-configure/dist/U/nblock_io.U-202- esac
perl-5.32.0/regen-configure/dist/U/nblock_io.U:203: rd_nodata=`$cat try.ret`
perl-5.32.0/regen-configure/dist/U/nblock_io.U-204- echo "A read() system call with no data present returns $rd_nodata."
##############################################
perl-5.32.0/regen-configure/dist/U/nblock_io.U-220- esac
perl-5.32.0/regen-configure/dist/U/nblock_io.U:221: status=`$cat try.err`
perl-5.32.0/regen-configure/dist/U/nblock_io.U-222- case "$status" in
##############################################
perl-5.32.0/regen-configure/dist/U/orderlib.U-32-?S: This variable is "true" if the components of libraries must be ordered
perl-5.32.0/regen-configure/dist/U/orderlib.U:33:?S: (with `lorder $* | tsort`) before placing them in an archive. Set to
perl-5.32.0/regen-configure/dist/U/orderlib.U-34-?S: "false" if ranlib or ar can generate random libraries.
##############################################
perl-5.32.0/regen-configure/dist/U/orgname.U-35-case "$orgname" in
perl-5.32.0/regen-configure/dist/U/orgname.U:36:'') if xxx=`./loc news/src/defs.h x $longshots`; then
perl-5.32.0/regen-configure/dist/U/orgname.U:37: dflt=`$sed -n 's/^.*MYORG[ ]*"\(.*\)".*$/\1/p' $xxx`
perl-5.32.0/regen-configure/dist/U/orgname.U-38- else
##############################################
perl-5.32.0/regen-configure/dist/U/package.U-43-@if spackage
perl-5.32.0/regen-configure/dist/U/package.U:44:first=`echo $package | sed -e 's/^\(.\).*/\1/'`
perl-5.32.0/regen-configure/dist/U/package.U:45:last=`echo $package | sed -e 's/^.\(.*\)/\1/'`
perl-5.32.0/regen-configure/dist/U/package.U-46-?X:
##############################################
perl-5.32.0/regen-configure/dist/U/package.U-51-case "`echo AbyZ | tr '[:lower:]' '[:upper:]' 2>/dev/null`" in
perl-5.32.0/regen-configure/dist/U/package.U:52:ABYZ) spackage=`echo $first | tr '[:lower:]' '[:upper:]'`$last;;
perl-5.32.0/regen-configure/dist/U/package.U:53:*) spackage=`echo $first | tr '[a-z]' '[A-Z]'`$last;;
perl-5.32.0/regen-configure/dist/U/package.U-54-esac
##############################################
perl-5.32.0/regen-configure/dist/U/pkgsrc.U-23-/*) pkgsrc=$src;;
perl-5.32.0/regen-configure/dist/U/pkgsrc.U:24:*) pkgsrc=`cd $rsrc; pwd`;;
perl-5.32.0/regen-configure/dist/U/pkgsrc.U-25-esac
##############################################
perl-5.32.0/regen-configure/dist/U/privlib.U-85- case "$installprivlib" in
perl-5.32.0/regen-configure/dist/U/privlib.U:86: '') dflt=`echo $privlibexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/privlib.U-87- *) dflt="$installprivlib";;
##############################################
perl-5.32.0/regen-configure/dist/U/rcs_branch.U-25-echo "Checking to see if RCS understands the -b switch..." >&4
perl-5.32.0/regen-configure/dist/U/rcs_branch.U:26:xxx=`./loc rcs '' $pth`
perl-5.32.0/regen-configure/dist/U/rcs_branch.U-27-case "$xxx" in
##############################################
perl-5.32.0/regen-configure/dist/U/rootid.U-29-: determine root id
perl-5.32.0/regen-configure/dist/U/rootid.U:30:rootid=`$sed -e "/^root:/{s/^[^:]*:[^:]*:\([^:]*\).*"'$'"/\1/" -e "q" -e "}" -e "d" </etc/passwd`
perl-5.32.0/regen-configure/dist/U/rootid.U-31-case "$rootid" in
##############################################
perl-5.32.0/regen-configure/dist/U/scriptdir.U-99- case "$installscript" in
perl-5.32.0/regen-configure/dist/U/scriptdir.U:100: '') dflt=`echo $scriptdirexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/scriptdir.U-101- *) dflt="$installscript";;
##############################################
perl-5.32.0/regen-configure/dist/U/sh.U-57- : Build up a list and do a single loop so we can 'break' out.
perl-5.32.0/regen-configure/dist/U/sh.U:58: pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/regen-configure/dist/U/sh.U-59- for xxx in sh bash ksh pdksh ash; do
##############################################
perl-5.32.0/regen-configure/dist/U/sig_name.U-125- . ./signal_cmd
perl-5.32.0/regen-configure/dist/U/sig_name.U:126: sig_count=`$awk '/^NSIG/ { printf "%d", $2 }' signal.lst`
perl-5.32.0/regen-configure/dist/U/sig_name.U-127- sig_name=`$awk 'BEGIN { printf "ZERO " }
##############################################
perl-5.32.0/regen-configure/dist/U/sig_name.U-154-}'
perl-5.32.0/regen-configure/dist/U/sig_name.U:155:sig_size=`echo $sig_name | awk '{print NF}'`
perl-5.32.0/regen-configure/dist/U/sig_name.U-156-$rm -f signal signal.c signal.awk signal.lst signal_cmd
##############################################
perl-5.32.0/regen-configure/dist/U/sitearch.U-52-: determine where site specific architecture-dependent libraries go.
perl-5.32.0/regen-configure/dist/U/sitearch.U:53:xxx=`echo $sitelib/$archname | sed 's!^$prefix!!'`
perl-5.32.0/regen-configure/dist/U/sitearch.U-54-: xxx is usually lib/site_perl/archname.
##############################################
perl-5.32.0/regen-configure/dist/U/sitearch.U-83- case "$installsitearch" in
perl-5.32.0/regen-configure/dist/U/sitearch.U:84: '') dflt=`echo $sitearchexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/sitearch.U-85- *) dflt="$installsitearch";;
##############################################
perl-5.32.0/regen-configure/dist/U/sitelib.U-57-?X: remove any trailing -3.0 or other version indentification
perl-5.32.0/regen-configure/dist/U/sitelib.U:58: prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/regen-configure/dist/U/sitelib.U-59- dflt="$privlib/site_$prog" ;;
##############################################
perl-5.32.0/regen-configure/dist/U/sitelib.U-86- case "$installsitelib" in
perl-5.32.0/regen-configure/dist/U/sitelib.U:87: '') dflt=`echo $sitelibexp | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/regen-configure/dist/U/sitelib.U-88- *) dflt="$installsitelib";;
##############################################
perl-5.32.0/regen-configure/dist/U/so.U-31-'')
perl-5.32.0/regen-configure/dist/U/so.U:32: if xxx=`./loc libc.sl X $libpth`; $test -f "$xxx"; then
perl-5.32.0/regen-configure/dist/U/so.U-33- dflt='sl'
##############################################
perl-5.32.0/regen-configure/dist/U/spitshell.U-50-?X: echo "Checking your $sh to see if it knows about # comments..." >&2
perl-5.32.0/regen-configure/dist/U/spitshell.U:51:if `$sh -c '#' >/dev/null 2>&1`; then
perl-5.32.0/regen-configure/dist/U/spitshell.U-52-?X: echo "Your $sh handles # comments correctly."
##############################################
perl-5.32.0/regen-configure/dist/U/spitshell.U-59- if test ! -f $xcat$_exe; then
perl-5.32.0/regen-configure/dist/U/spitshell.U:60: for p in `echo $PATH | sed -e "s/$p_/ /g"` $paths; do
perl-5.32.0/regen-configure/dist/U/spitshell.U-61- if test -f $p/cat$_exe; then
##############################################
perl-5.32.0/regen-configure/dist/U/src.U-34-'') case "$0" in
perl-5.32.0/regen-configure/dist/U/src.U:35: */*) src=`echo $0 | sed -e 's%/[^/][^/]*$%%'`
perl-5.32.0/regen-configure/dist/U/src.U-36- case "$src" in
##############################################
perl-5.32.0/regen-configure/dist/U/src.U-38- .) ;;
perl-5.32.0/regen-configure/dist/U/src.U:39: *) src=`cd ../$src && pwd` ;;
perl-5.32.0/regen-configure/dist/U/src.U-40- esac
##############################################
perl-5.32.0/regen-configure/dist/U/ssizetype.U-73- ./ssize > ssize.out 2>/dev/null && test -s ssize.out ; then
perl-5.32.0/regen-configure/dist/U/ssizetype.U:74: ssizetype=`$cat ssize.out`
perl-5.32.0/regen-configure/dist/U/ssizetype.U-75- echo "I'll be using $ssizetype for functions returning a byte count." >&4
##############################################
perl-5.32.0/regen-configure/dist/U/sysman.U-41- syspath="$syspath /usr/man/man.L /local/man/man1 /usr/local/man/man1"
perl-5.32.0/regen-configure/dist/U/sysman.U:42: sysman=`./loc . /usr/man/man1 $syspath`
perl-5.32.0/regen-configure/dist/U/sysman.U-43- ;;
##############################################
perl-5.32.0/regen-configure/dist/U/uidtype.U-44- xxx=`./findhdr sys/user.h`
perl-5.32.0/regen-configure/dist/U/uidtype.U:45: set `grep '_ruid;' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/regen-configure/dist/U/uidtype.U-46- case $1 in
##############################################
perl-5.32.0/regen-configure/dist/U/usenm.U-73- else
perl-5.32.0/regen-configure/dist/U/usenm.U:74: dflt=`$egrep 'inlibc|csym' $rsrc/Configure | wc -l 2>/dev/null`
perl-5.32.0/regen-configure/dist/U/usenm.U-75- if $test $dflt -gt 20; then
##############################################
perl-5.32.0/regen-configure/dist/U/yacc.U-39-'')
perl-5.32.0/regen-configure/dist/U/yacc.U:40: yacc=`./loc yacc yacc $pth`
perl-5.32.0/regen-configure/dist/U/yacc.U-41- if $test -f "$yacc$_exe"; then
##############################################
perl-5.32.0/regen-configure/dist/configure-59- --prefix=*)
perl-5.32.0/regen-configure/dist/configure:60: arg=`echo $1 | sed 's/--prefix=/-Dprefix=/'`
perl-5.32.0/regen-configure/dist/configure-61- opts="$opts $arg"
##############################################
perl-5.32.0/regen-configure/dist/configure-69- --srcdir=*)
perl-5.32.0/regen-configure/dist/configure:70: arg=`echo $1 | sed 's/--srcdir=//'`
perl-5.32.0/regen-configure/dist/configure-71- srcdir=$arg
##############################################
perl-5.32.0/regen-configure/dist/configure-94- --*)
perl-5.32.0/regen-configure/dist/configure:95: opt=`echo $1 | sed 's/=.*//'`
perl-5.32.0/regen-configure/dist/configure-96- echo "This GNU configure front end does not understand $opt"
##############################################
perl-5.32.0/regen-configure/dist/configure-133-case "$srcdir" in
perl-5.32.0/regen-configure/dist/configure:134:'') srcdir=`echo $0 | sed -e 's%/[^/][^/]*$%%'`;;
perl-5.32.0/regen-configure/dist/configure-135-esac
##############################################
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-51-case "$0" in
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl:52:*/#*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-53-esac
##############################################
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-56--expand
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl:57:DIR=`echo $CURRENT/ | sed -e 's/\.\///g'`
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-58-echo "Extracting ${DIR}Makefile (with variable substitutions)"
##############################################
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-61- */
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl:62:?INSTALL:INSTALL=`echo $install | sed -e 's,\./i,\$(TOP)/i,'`
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl:63:?INSTALLDIR:INSTALLDIR=`echo $installdir | sed -e 's,\./i,\$(TOP)/i,'`
perl-5.32.0/regen-configure/dist/files/Jmake.tmpl-64-DATE=`date`
##############################################
perl-5.32.0/regen-configure/dist/lib/errnolist.SH-34-case "$0" in
perl-5.32.0/regen-configure/dist/lib/errnolist.SH:35:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/dist/lib/errnolist.SH-36-esac
##############################################
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-14-case "$0" in
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:15:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-16-esac
##############################################
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-87-gotnone=true
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:88:for file in `$cat .clist`; do
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-89-# for file in `cat /dev/null`; do
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-90- case "$file" in
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:91: *.c) filebase=`basename $file .c` ;;
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:92: *.y) filebase=`basename $file .c` ;;
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-93- '') continue ;;
##############################################
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-118- for file in `cat .shlist`; do
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:119: $echo `$expr X$file : 'X\(.*\).SH`: $file config.sh \; \
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-120- /bin/sh $file >> .deptmp
##############################################
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-148- >> Makefile.new
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:149: for file in `$cat .shlist`; do
perl-5.32.0/regen-configure/dist/lib/makedepend.SH:150: $echo `$expr X$file : 'X\(.*\).SH`: $file config.sh \; \
perl-5.32.0/regen-configure/dist/lib/makedepend.SH-151- /bin/sh $file >> Makefile.new
##############################################
perl-5.32.0/regen-configure/dist/lib/makedir.SH-14-case "$0" in
perl-5.32.0/regen-configure/dist/lib/makedir.SH:15:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/dist/lib/makedir.SH-16-esac
##############################################
perl-5.32.0/regen-configure/dist/lib/makedir.SH-56-case X\$2 in
perl-5.32.0/regen-configure/dist/lib/makedir.SH:57: X1) set \`$echo \$1 | $sed 's:\(.*\)/[^/]*\$:\1:'\` ;;
perl-5.32.0/regen-configure/dist/lib/makedir.SH-58- *) set \$1 ;;
##############################################
perl-5.32.0/regen-configure/dist/lib/makedir.SH-70- list="\$1 \$list"
perl-5.32.0/regen-configure/dist/lib/makedir.SH:71: set \`echo \$1 | $sed 's:\(.*\)/:\1 :'\`
perl-5.32.0/regen-configure/dist/lib/makedir.SH-72- ;;
##############################################
perl-5.32.0/regen-configure/metaconfig.html-660-case "$0" in
perl-5.32.0/regen-configure/metaconfig.html:661:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/metaconfig.html-662-esac
##############################################
perl-5.32.0/regen-configure/metaconfig.html-738-case "$0" in
perl-5.32.0/regen-configure/metaconfig.html:739:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/metaconfig.html-740-esac
##############################################
perl-5.32.0/regen-configure/metaconfig.html-784-case "$0" in
perl-5.32.0/regen-configure/metaconfig.html:785:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/regen-configure/metaconfig.html-786-esac
##############################################
perl-5.32.0/regen-configure/metaconfig.html-1265--pick </R><I><FONT color=#001050>cmd</I></FONT><R> $@ </R><I><FONT color=#001050>target_file</I></FONT><R>
perl-5.32.0/regen-configure/metaconfig.html:1266:where </R><I><FONT color=#001050>$@</I></FONT><R> is the standard macro within Makefiles standing for the current
perl-5.32.0/regen-configure/metaconfig.html-1267-target (the name of the unit being built, with the final .U extension stripped).
##############################################
perl-5.32.0/regen-configure/metaconfig.html-1382-beginning with tildes. A typical use is:
perl-5.32.0/regen-configure/metaconfig.html:1383:exp_name=`./filexp $name`
perl-5.32.0/regen-configure/metaconfig.html-1384-to assign the expanded file name in </R><I><FONT color=#001050>exp_name</I></FONT><R>.
##############################################
perl-5.32.0/debian/changelog-4694- startperl should be #!/usr/bin/perl-$(version)
perl-5.32.0/debian/changelog:4695: the asm *.ph directories should be =version=/=arch=-version
perl-5.32.0/debian/changelog-4696- * perl-$(version)-base should conflict with perl-base rather than perl.
##############################################
perl-5.32.0/debian/changelog-5001- * Pre-generated all the *.ph files that people will probably need. The
perl-5.32.0/debian/changelog:5002: correct asm directory will have a symbolic link set during postinst.
perl-5.32.0/debian/changelog-5003- (fixes Bugs #4493, 4739, 1856, 3770, 3277, 3803, 3814, 1099, 3784,
##############################################
perl-5.32.0/debian/cross/download-deb-24-done
perl-5.32.0/debian/cross/download-deb:25:shift `expr $OPTIND - 1`
perl-5.32.0/debian/cross/download-deb-26-
##############################################
perl-5.32.0/debian/gen-patchlevel-31-done
perl-5.32.0/debian/gen-patchlevel:32:shift `expr $OPTIND - 1`
perl-5.32.0/debian/gen-patchlevel-33-
##############################################
perl-5.32.0/debian/patches/debian/configure-regen.diff-22- : This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/debian/patches/debian/configure-regen.diff:23: glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/debian/patches/debian/configure-regen.diff-24-@@ -23896,7 +23895,7 @@ sunos*X4*)
##############################################
perl-5.32.0/debian/patches/debian/configure-regen.diff-27- $define|true|[yY]*)
perl-5.32.0/debian/patches/debian/configure-regen.diff:28:- set X `echo " $libs " | sed -e 's@ -lndbm @ @' -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldbm @ @' -e 's@ -ldb @ @'`
perl-5.32.0/debian/patches/debian/configure-regen.diff:29:+ set X `echo " $libs " | sed -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldb @ @'`
perl-5.32.0/debian/patches/debian/configure-regen.diff-30- shift
##############################################
perl-5.32.0/debian/patches/debian/fakeroot.diff-23-- case "$LD_LIBRARY_PATH" in
perl-5.32.0/debian/patches/debian/fakeroot.diff:24:- '') ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `" ;;
perl-5.32.0/debian/patches/debian/fakeroot.diff:25:- *) ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `:` quote "$LD_LIBRARY_PATH" `" ;;
perl-5.32.0/debian/patches/debian/fakeroot.diff-26-- esac
perl-5.32.0/debian/patches/debian/fakeroot.diff:27:+ ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `"'$${LD_LIBRARY_PATH:+:}$$LD_LIBRARY_PATH'
perl-5.32.0/debian/patches/debian/fakeroot.diff-28-
##############################################
perl-5.32.0/debian/patches/debian/prune_libs.diff-28- : This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/debian/patches/debian/prune_libs.diff:29: glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/debian/patches/debian/prune_libs.diff-30-diff --git a/regen-configure/U/perl/End.U b/regen-configure/U/perl/End.U
##############################################
perl-5.32.0/debian/patches/debian/prune_libs.diff-37- $define|true|[yY]*)
perl-5.32.0/debian/patches/debian/prune_libs.diff:38:- set X `echo " $libs " | sed -e 's@ -lndbm @ @' -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldbm @ @' -e 's@ -ldb @ @'`
perl-5.32.0/debian/patches/debian/prune_libs.diff:39:+ set X `echo " $libs " | sed -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldb @ @'`
perl-5.32.0/debian/patches/debian/prune_libs.diff-40- shift
##############################################
perl-5.32.0/debian/rules-52-ifeq (,$(perlabi))
perl-5.32.0/debian/rules:53:subst_perlapi = -Vperlapi:Provides="`$(PERL_TO_USE) debian/mkprovides`"
perl-5.32.0/debian/rules-54-else
##############################################
perl-5.32.0/debian/rules-199- &$(srcdir)/build-static/utils/h2ph -a -d $(srcdir)/$(tmp)/$(lib) \
perl-5.32.0/debian/rules:200: `cat $(srcdir)/debian/headers`
perl-5.32.0/debian/rules-201-
##############################################
perl-5.32.0/debian/rules-206- # Verify that the headers are usable
perl-5.32.0/debian/rules:207: for ph in `< debian/headers sed -e 's/\.h$$/.ph/'`; do \
perl-5.32.0/debian/rules-208- if [ ! -f $(tmp)/$(lib)/$$ph ]; then \
##############################################
perl-5.32.0/.pc/debian/errno_ver.diff/ext/Errno/Errno_pm.PL-51- defined($file) && !-f $file) {
perl-5.32.0/.pc/debian/errno_ver.diff/ext/Errno/Errno_pm.PL:52: chomp($file = `cygpath -w "$file"`);
perl-5.32.0/.pc/debian/errno_ver.diff/ext/Errno/Errno_pm.PL-53- }
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2694-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2695: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2696- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2724- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2725: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2726- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2828- my $devnull = File::Spec->devnull;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2829: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2830-}
##############################################
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3038- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3039: eval($line); ## no critic
perl-5.32.0/.pc/debian/writable_site_dirs.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3040- return ${$name};
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2694-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2695: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2696- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2724- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2725: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2726- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2828- my $devnull = File::Spec->devnull;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2829: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2830-}
##############################################
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3038- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3039: eval($line); ## no critic
perl-5.32.0/.pc/debian/extutils_set_libperl_path.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3040- return ${$name};
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2694-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2695: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2696- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2724- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2725: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2726- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2828- my $devnull = File::Spec->devnull;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2829: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2830-}
##############################################
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3038- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3039: eval($line); ## no critic
perl-5.32.0/.pc/debian/no_packlist_perllocal.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3040- return ${$name};
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-36-case "$0" in
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:37:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-38-esac
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-51- case "$LD_LIBRARY_PATH" in
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:52: '') ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `" ;;
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:53: *) ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `:` quote "$LD_LIBRARY_PATH" `" ;;
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-54- esac
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-105- shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:106: linklibperl="-L $archlibexp/CORE -L `pwd | sed 's/\/UU$//'` -lperl"
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-107- linklibperl_nonshr='-lperl_nonshr'
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-117- shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:118: linklibperl="-L $archlibexp/CORE -L `pwd | sed 's/\/UU$//'` -lperl"
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-119- linklibperl_nonshr='-lperl_nonshr'
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-123- hpux*)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:124: linklibperl="-L `pwd | sed 's/\/UU$//'` -Wl,+s -Wl,+b$archlibexp/CORE -lperl"
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-125- ;;
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-142- case "$ldlibpthval" in
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:143: '') ldlibpth="$ldlibpthname=` quote "$pwd" `" ;;
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:144: *) ldlibpth="$ldlibpthname=` quote "$pwd" `:` quote "$ldlibpthval" `" ;;
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-145- esac
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-205- : the dependency named here will never exist
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:206: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-207- this_target="lib/auto/$f/$base.$dlext"
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-220-for f in $static_ext; do
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:221: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-222- static_list="$static_list lib/auto/$f/$base\$(LIB_EXT)"
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-234-for f in $nonxs_ext; do
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:235: p=`echo "$f" | tr / -`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-236- for d in ext dist cpan; do
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-486-SH='Makefile.SH cflags.SH config_h.SH makedepend.SH myconfig.SH runtests.SH pod/Makefile.SH'
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:487:shextract=`SH_to_target $SH`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-488-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-628-.c$(OBJ_EXT):
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:629: @echo `$(CCCMD)` $(PLDLFLAGS) $*.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:630: @`$(CCCMD)` $(PLDLFLAGS) $*.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-631-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-632-.c.i: perl.h config.h
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:633: @echo `$(CCCMDSRC)` -E $*.c \> $*.i
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:634: @`$(CCCMDSRC)` -E $*.c > $*.i
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-635-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-636-.c.s: perl.h config.h
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:637: @echo `$(CCCMDSRC)` -S $*.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:638: @`$(CCCMDSRC)` -S $*.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-639-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-721-${file}mini\$(OBJ_EXT): ${file}mini.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:722: echo @\`\$(CCCMD)\` \$(PLDLFLAGS) $DPERL_IS_MINIPERL $DPERL_EXTERNAL_GLOB ${file}mini.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:723: @\`\$(CCCMD)\` \$(PLDLFLAGS) $DPERL_IS_MINIPERL $DPERL_EXTERNAL_GLOB ${file}mini.c
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-724-!GROK!THIS!
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-814-# extensions *after* Perl has been built and installed)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:815:CCDLFLAGS = `echo $ccdlflags|sed -e 's@-bE:.*/perl\.exp@-bE:perl.exp@'`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-816-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-921- $(ECHO) >dtrace_main.c && \
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:922: `$(CCCMD)` $(PLDLFLAGS) dtrace_main.c && \
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-923- rm -f dtrace_main.c )
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1163- -@for x in `grep -l '^=[a-z]' README.* | grep -v README.vms` ; do \
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1164: nx=`echo $$x | sed -e "s/README\.//"`; \
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1165- $(LNS) ../$$x "pod/perl"$$nx".pod" ; \
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1169-extras.make: $(PERL_EXE)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1170: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&make(@ARGV)' `cat extras.lst`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1171-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1172-extras.test: $(PERL_EXE)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1173: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&test(@ARGV)' `cat extras.lst`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1174-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1175-extras.install: $(PERL_EXE)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1176: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&install(@ARGV)' `cat extras.lst`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1177-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1190- flags="--$name";
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1191: flags=`echo $flags | sed -e 's/--all//'`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1192- if test "X$hostperl" != X; then
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1207-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1208: test $name = notify || echo ' -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -Ilib -MCPAN -e '\''@ARGV&&install(@ARGV)'\'' `cat extras.lst`' >>$Makefile
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1209-done
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1222- $(RUN_PERL) installperl --destdir=$(DESTDIR) $(INSTALLFLAGS) $(STRIPFLAGS)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1223: -@test ! -s extras.lst || PATH="`pwd`:\${PATH}" PERL5LIB="`pwd`/lib" \$(RUN_PERL) -Ilib -MCPAN -e '@ARGV&&install(@ARGV)' `cat extras.lst`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1224-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1301-META.yml: FORCE
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1302: PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) Porting/makemeta -y
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1303-
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1304-META.json: FORCE
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1305: PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) Porting/makemeta -j
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1306-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1349-printconfig:
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1350: @eval `$(RUN_PERL) -V:$(CONFIGVAR)`; echo $$$(CONFIGVAR)
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1351-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1400- rm -f realclean.sh veryclean.sh
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1401: -rm -f `grep -v ^# mkppport.lst | grep . | sed -e 's/$$/\/ppport.h/'`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1402-
##############################################
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1509-for f in $SH; do
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH:1510: file=`SH_to_target $f`
perl-5.32.0/.pc/debian/fakeroot.diff/Makefile.SH-1511- $spitshell >>$Makefile <<!GROK!THIS!
##############################################
perl-5.32.0/.pc/debian/instmodsh_doc.diff/cpan/ExtUtils-MakeMaker/bin/instmodsh-121- my($first, @rest) = $Inst->files($module);
perl-5.32.0/.pc/debian/instmodsh_doc.diff/cpan/ExtUtils-MakeMaker/bin/instmodsh:122: system('tar', 'cvf', $file, $first);
perl-5.32.0/.pc/debian/instmodsh_doc.diff/cpan/ExtUtils-MakeMaker/bin/instmodsh-123- for my $f (@rest) {
perl-5.32.0/.pc/debian/instmodsh_doc.diff/cpan/ExtUtils-MakeMaker/bin/instmodsh:124: system('tar', 'rvf', $file, $f);
perl-5.32.0/.pc/debian/instmodsh_doc.diff/cpan/ExtUtils-MakeMaker/bin/instmodsh-125- }
##############################################
perl-5.32.0/.pc/debian/perlivp.diff/utils/perlivp.PL-453-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/.pc/debian/perlivp.diff/utils/perlivp.PL:454:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/perlivp.diff/utils/perlivp.PL-455-chdir $origdir;
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-328- return $self->success(
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:329: "Has already been *installed and cleaned up in the staging area* within this session, will not work on it again; if you really want to start over, try something like `force get $id`"
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-330- );
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-1339-
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:1340: unless (system($shell) == 0) {
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-1341- my $code = $? >> 8;
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-1528- my($compmt) = Safe->new();
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:1529: $cksum = $compmt->reval($eval);
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-1530- if ($@) {
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2035- else {
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:2036: $ret = system($system);
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2037- }
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2282- else {
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:2283: my $rc = system($system);
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2284- $system_ok = $rc == 0;
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2335- $CPAN::Frontend->mywarn("Expect not installed, falling back to system()\n");
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:2336: return system($system);
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-2337- }
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-3787- } else {
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:3788: $c_ok = system($system) == 0;
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-3789- }
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-3945- }
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:3946: my $system_ok = system($system) == 0;
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-3947- $self->introduce_myself;
##############################################
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-4536- $CPAN::Frontend->mysleep(1);
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm:4537: system("$browser $url");
perl-5.32.0/.pc/debian/find_html2text.diff/cpan/CPAN/lib/CPAN/Distribution.pm-4538- if ($saved_file) { 1 while unlink($saved_file) }
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3959- # We resume execution when the shell terminates.
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:3960: DB::_db_system( $ENV{SHELL} || "/bin/sh" );
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3961- next CMD;
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3964- # System it.
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:3965: DB::_db_system($1);
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3966- next CMD;
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3968- elsif ($my_cmd =~ m#\G\s*(.*)#cgms) {
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:3969: DB::_db_system( $ENV{SHELL} || "/bin/sh", "-c", $1 );
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-3970- next CMD;
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-5614- if ($subrange) {
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:5615: if ( eval($subrange) < -$window ) {
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-5616- $subrange =~ s/-.*/+/;
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-8991- unless ($page) {
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:8992: _db_system("$doccmd $doccmd");
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-8993- return;
##############################################
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-8998- if ( $doccmd ne 'man' ) {
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl:8999: _db_system("$doccmd $page");
perl-5.32.0/.pc/debian/perl5db-x-terminal-emulator.patch/lib/perl5db.pl-9000- return;
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2665-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2666: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2667- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2695- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2696: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2697- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2799- my $devnull = File::Spec->devnull;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2800: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2801-}
##############################################
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3009- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3010: eval($line); ## no critic
perl-5.32.0/.pc/debian/makemaker-pasthru.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3011- return ${$name};
##############################################
perl-5.32.0/.pc/debian/makemaker-manext.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-221- my $make = $self->make || $self->{MAKE};
perl-5.32.0/.pc/debian/makemaker-manext.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm:222: my $minus_v = `"$make" -v $redirect`;
perl-5.32.0/.pc/debian/makemaker-manext.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-223- return $maketype2true{$type} = 1
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-41-case "$0" in
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:42:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-43-esac
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-201- cmd="$cc $flags _cflags.c -o _cflags$_exe"
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:202: out="`$cmd 2>&1`"
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-203- # echo "$cmd --> $out"
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-318- *) echo "cflags.SH: Removing -pedantic*, -std=c89, and -ansi because of $remove."
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:319: ccflags=`echo $ccflags|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-std=c89/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:320: warn=`echo $warn|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:321: stdflags=`echo $stdflags|sed -e 's/-std=c89/ /'`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-322- ;;
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-370- echo "cflags.SH: Removing $f because of g++."
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:371: ccflags=`echo $ccflags|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:372: warn=`echo $warn|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-373- ;;
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-384- echo "cflags.SH: Removing $f from cppflags."
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:385: cppflags=`echo $cppflags|sed 's/$f/ /'` ;;
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-386- esac
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-421-# Protect double or single quotes for better restoring of ccflags.
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:422:myccflags=`echo $ccflags | sed -e 's/"/\\\"/g' -e "s/'/\\\'/g"`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-423-
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-486-
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:487:set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-488-
##############################################
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-521-
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:522: av) ccflags=`echo $ccflags | sed -e s/-pipe//` ;;
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-523- deb) ccflags="$ccflags -fno-jump-tables" ;;
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH:524: hv) warn=`echo $warn | sed -e s/-Wextra//` ;;
perl-5.32.0/.pc/debian/hppa_op_optimize_workaround.diff/cflags.SH-525- toke) optimize=-O0 ;;
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-41-case "$0" in
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:42:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-43-esac
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-201- cmd="$cc $flags _cflags.c -o _cflags$_exe"
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:202: out="`$cmd 2>&1`"
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-203- # echo "$cmd --> $out"
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-318- *) echo "cflags.SH: Removing -pedantic*, -std=c89, and -ansi because of $remove."
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:319: ccflags=`echo $ccflags|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-std=c89/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:320: warn=`echo $warn|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:321: stdflags=`echo $stdflags|sed -e 's/-std=c89/ /'`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-322- ;;
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-370- echo "cflags.SH: Removing $f because of g++."
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:371: ccflags=`echo $ccflags|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:372: warn=`echo $warn|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-373- ;;
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-384- echo "cflags.SH: Removing $f from cppflags."
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:385: cppflags=`echo $cppflags|sed 's/$f/ /'` ;;
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-386- esac
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-421-# Protect double or single quotes for better restoring of ccflags.
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:422:myccflags=`echo $ccflags | sed -e 's/"/\\\"/g' -e "s/'/\\\'/g"`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-423-
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-486-
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:487:set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-488-
##############################################
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-527-
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:528: av) ccflags=`echo $ccflags | sed -e s/-pipe//` ;;
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-529- deb) ccflags="$ccflags -fno-jump-tables" ;;
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH:530: hv) warn=`echo $warn | sed -e s/-Wextra//` ;;
perl-5.32.0/.pc/debian/hppa_opmini_optimize_workaround.diff/cflags.SH-531- toke) optimize=-O0 ;;
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-41-case "$0" in
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:42:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-43-esac
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-201- cmd="$cc $flags _cflags.c -o _cflags$_exe"
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:202: out="`$cmd 2>&1`"
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-203- # echo "$cmd --> $out"
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-318- *) echo "cflags.SH: Removing -pedantic*, -std=c89, and -ansi because of $remove."
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:319: ccflags=`echo $ccflags|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-std=c89/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:320: warn=`echo $warn|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:321: stdflags=`echo $stdflags|sed -e 's/-std=c89/ /'`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-322- ;;
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-370- echo "cflags.SH: Removing $f because of g++."
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:371: ccflags=`echo $ccflags|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:372: warn=`echo $warn|sed 's/$f/ /'`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-373- ;;
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-384- echo "cflags.SH: Removing $f from cppflags."
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:385: cppflags=`echo $cppflags|sed 's/$f/ /'` ;;
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-386- esac
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-421-# Protect double or single quotes for better restoring of ccflags.
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:422:myccflags=`echo $ccflags | sed -e 's/"/\\\"/g' -e "s/'/\\\'/g"`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-423-
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-486-
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:487:set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-488-
##############################################
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-527-
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:528: av) ccflags=`echo $ccflags | sed -e s/-pipe//` ;;
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-529- deb) ccflags="$ccflags -fno-jump-tables" ;;
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH:530: hv) warn=`echo $warn | sed -e s/-Wextra//` ;;
perl-5.32.0/.pc/debian/sh4_op_optimize_workaround.diff/cflags.SH-531- toke) optimize=-O0 ;;
##############################################
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/modified/Myinit.U-38-: This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/modified/Myinit.U:39:glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/modified/Myinit.U-40-glibpth="/usr/shlib $glibpth"
##############################################
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/perl/End.U-39- $define|true|[yY]*)
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/perl/End.U:40: set X `echo " $libs " | sed -e 's@ -lndbm @ @' -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldbm @ @' -e 's@ -ldb @ @'`
perl-5.32.0/.pc/debian/prune_libs.diff/regen-configure/U/perl/End.U-41- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-87-*/*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:88: me=`echo $0 | sed -e 's!.*/\(.*\)!\1!' 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-89- test "$me" || me=$0
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1497-: This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1498:glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1499-glibpth="/usr/shlib $glibpth"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1513- : Build up a list and do a single loop so we can 'break' out.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1514: pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1515- for xxx in sh bash ksh pdksh ash; do
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1552-: see if sh knows # comments
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1553:if `$sh -c '#' >/dev/null 2>&1`; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1554- shsharp=true
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1558- if test ! -f $xcat$_exe; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1559: for p in `echo $PATH | sed -e "s/$p_/ /g"` $paths; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1560- if test -f $p/cat$_exe; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1642- args_exp="$args_exp$args_sep'$arg_exp'"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1643: argn=`expr $argn + 1`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1644- args_sep=' '
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1771- case "$yyy" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1772: *=*) zzz=`echo "$yyy"|sed 's!=.*!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1773- case "$zzz" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1775- *) xxx=append
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1776: zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1777: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1778- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1782- '') case "$yyy" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1783: *:*) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1784: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1785: zzz=`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1786: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1787: *) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1788: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1789- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1904-package='perl5'
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1905:first=`echo $package | sed -e 's/^\(.\).*/\1/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1906:last=`echo $package | sed -e 's/^.\(.*\)/\1/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1907-case "`echo AbyZ | tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1908:ABYZ-abyz) spackage=`echo $first | tr '[:lower:]' '[:upper:]'`$last;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1909:*) spackage=`echo $first | tr '[a-z]' '[A-Z]'`$last;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1910-esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1935-'') case "$0" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1936: */*) src=`echo $0 | sed -e 's%/[^/][^/]*$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1937- case "$src" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1939- .) ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1940: *) src=`cd ../$src && pwd` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1941- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1989-if test -f MANIFEST; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1990: set x `awk '{print $1}' < MANIFEST | grep '\.SH$'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1991-else
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1992- echo "(Looking for .SH files under the source directory.)"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1993: set x `(cd "$src"; find . -name "*.SH" -print)`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1994-fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1996-case $# in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:1997:0) set x `(cd "$src"; echo *.SH)`; shift;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-1998-esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2007- create="$name $create";
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2008: name=`echo $name | sed -e "s|^[^/]*$||"`;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2009: name=`echo $name | sed -e "s|\(.*\)/.*|\1|"`;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2010- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2022- */*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2023: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2024: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2025- (cd "$dir" && . ./$file)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2034- */*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2035: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2036: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2037- (set x $dir; shift; eval $mkdir_p)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2112- for filelist in x??; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2113: (cd "$rsrc"; ls `cat "$tmppwd/$filelist"` \
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2114- >/dev/null 2>>"$tmppwd/missing")
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2186- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2187: if test \`echo \"\$rp [\$xxxm] \" | wc -c\` -ge $COLUMNS; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2188- echo \"\$rp\" >&4
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2229- !*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2230: set x \`expr "X\$ans" : "X!\(.*\)\$"\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2231- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2238- \\&*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2239: set x \`expr "X\$ans" : "X&\(.*\)\$"\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2240- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2258- xxxm="\$ans"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2259: ans=\`echo $n "\$ans$c" | tr '$trnl' ' '\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2260- xxxm="\$ans"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2292-: See if we are using a devel version and want that
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2293:xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2294-case "$usedevel" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2554-"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2555:pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2556-pth="$pth $sysroot/lib $sysroot/usr/lib"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2564- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2565: xxx=`./loc $file $file $pth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2566- fi
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2567- ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2568: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2569: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2570- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2597- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2598: xxx=`./loc $file $file $pth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2599- fi
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2600- ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2601: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2602: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2603- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2744- # ./trygcc: line 23: cc: command not found
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2745: # case "`$cc -v -c try.c 2>&1`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2746- # *gcc*) trygcc=no ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2853- /*) ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2854: *) pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2855- for p in $pth
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2963- # x86_64-w64-mingw32-gcc.exe -> x86_64-w64-mingw32
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2964: targetarch=`$echo $cc|$sed 's/-g[c\+][c\+].*$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2965: ar=`$echo $cc|$sed 's/-g[c\+][c\+]/-ar/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2966- # leave out ld, choosing it is more complex
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2967: nm=`$echo $cc|$sed 's/-g[c\+][c\+]/-nm/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:2968: ranlib=`$echo $cc|$sed 's/-g[c\+][c\+]/-ranlib/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-2969- # We are in a weird spot. Just before us, some values
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3016- fi
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3017: hostosname=`$hostperl -le 'print $^O'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3018- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3050- ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3051: *) pwd=`$test -f ../Configure & cd ..; pwd`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3052- run=$pwd/Cross/run
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3143- /*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3144: $targetmkdir \`dirname \$f\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3145- $targetto -P $targetport -r $q \$f $targetuser@$targethost:\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3147- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3148: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3149- $targetto -P $targetport -r $q \$f $targetuser@$targethost:$targetdir/\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3161- /*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3162: $mkdir -p $targetdir/\`dirname \$f\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3163- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3165- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3166: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3167- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3237-echo " "
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3238:case "`echo AbyZ | $tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | $tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3239-ABYZ-abyz)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3246- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3247: case "`echo RS | $tr '[R-S]' '[r-s]' 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3248- rs) up='[A-Z]'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3253- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3254: case "`echo RS | $tr R-S r-s 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3255- rs) up='A-Z'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3264- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3265: case "`echo RS | $tr '[A-IJ-RS-Z]' '[a-ij-rs-z]' 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3266- rs) up='[A-IJ-RS-Z]'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3271- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3272: case "`echo RS | $tr A-IJ-RS-Z a-ij-rs-z 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3273- rs) up='A-IJ-RS-Z'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3281-esac
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3282:case "`echo RS | $tr \"$up\" \"$low\" 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3283-rs)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3306-'')
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3307:myuname=`$uname -a 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3308-$test -z "$myuname" && myuname=`hostname 2>/dev/null`
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3380- $test -f /lynx.os && osname=lynxos
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3381: $test -f /unicos && osname=unicos && osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3382: $test -f /unicosmk && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3383: $test -f /unicosmk.ar && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3384- $test -f /bin/mips && /bin/mips && osname=mips
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3386- $test -f /etc/saf/_sactab && osname=svr4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3387: $test -d /usr/include/minix && osname=minix && osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3388- $test -f /system/gnu_library/bin/ar.pm && osname=vos
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3422- i386*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3423: tmp=`/bin/uname -X 2>/dev/null|awk '/3\.2v[45]/{ print $(NF) }'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3424- if $test "$tmp" != "" -a "$3" = "3.2" -a -f '/etc/systemid'; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3463- bsd386) osname=bsd386
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3464: osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3465- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3484- dynixptx*) osname=dynixptx
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3485: osvers=`echo "$4"|sed 's/^v//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3486- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3492- hp*) osname=hpux
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3493: osvers=`echo "$3" | $sed 's,.*\.\([0-9]*\.[0-9]*\),\1,'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3494- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3510- minix) osname=minix
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3511: osvers=`$uname -r`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3512- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3540- case "$3" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3541: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3542- *) osvers="$3" ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3547- 5*) osname=solaris
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3548: osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3549- *) osvers="$3" ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3566- osname=dec_osf
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3567: osvers=`sizer -v | awk -FUNIX '{print $2}' | awk '{print $1}' | tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3568- case "$osvers" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3569- [1-9].[0-9]*) ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3570: *) osvers=`echo "$3" | sed 's/^[xvt]//'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3571- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3600- if test -f /stand/boot ; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3601: eval `grep '^INITPROG=[a-z/0-9]*$' /stand/boot`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3602- if test -n "$INITPROG" -a -f "$INITPROG"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3603: isesix=`strings -a $INITPROG|grep 'ESIX SYSTEM V/386 Release 4.0'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3604- if test -n "$isesix"; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3613- osname=sco
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3614: set `echo $3 | $sed 's/\./ /g'` $4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3615- if $test -f $src/hints/sco_$1_$2_$3.sh; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3681- # hints are run is somewhat icky.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3682: set X `$run $uname -a 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3683- shift
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3684- case "$3" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3685: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3686- *) osvers="$3" ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3689- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3690: osname=`echo $targetarch|sed 's,^[^-]*-,,'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3691- osvers=''
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3700- ''|' ')
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3701: file=`echo "${osname}_${osvers}" | $sed -e 's%\.%_%g' -e 's%_$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3702- : Also try without trailing minor version numbers.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3703: xfile=`echo $file | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3704: xxfile=`echo $xfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3705: xxxfile=`echo $xxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3706: xxxxfile=`echo $xxxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3707- case "$file" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3739- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3740: dflt=`echo $hintfile | $sed 's/\.sh$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3741- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3841- ''|' '|none) dflt=none ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3842: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/_.*$//'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3843- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3850-none) osname='' ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3851:*) osname=`echo "$ans" | $sed -e 's/[ ][ ]*/_/g' | ./tr '[A-Z]' '[a-z]'`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3852-esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3857- ''|' '|none) dflt=none ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3858: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/^[^_]*//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3859: dflt=`echo $dflt | $sed -e 's/^_//' -e 's/_/./g'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3860- case "$dflt" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3878-: who configured the system
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3879:cf_time=`LC_ALL=C; LANGUAGE=C; export LC_ALL; export LANGUAGE; $date 2>&1`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3880-case "$cf_by" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3912- else
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3913: name=\`$expr x\$1 : '..\([^/]*\)'\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3914: dir=\`$sed -n -e "/^\${name}:/{s/^[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\).*"'\$'"/\1/" -e p -e q -e '}' </etc/passwd\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3915- if $test ! -d "\$dir"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3916: me=\`basename \$0\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3917- echo "\$me: can't locate home directory for: \$name" >&2
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3921- */*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3922: echo \$dir/\`$expr x\$1 : '..[^/]*/\(.*\)'\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3923- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3960- expr "$fn" : '.*(\(.*\)).*' | $tr ',' $trnl >getfile.ok
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3961: fn=`echo $fn | sed 's/(.*)//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3962- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3966-*:*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3967: loc_file=`expr $fn : '.*:\(.*\)'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:3968: fn=`expr $fn : '\(.*\):.*'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-3969- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4039- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4040: value=`UU/filexp $ans`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4041- case $? in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4205-case "$ans" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4206:*?/) prefix=`echo "$ans" | sed 's/.$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4207- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4211-case "$ansexp" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4212:*?/) prefixexp=`echo "$ansexp" | sed 's/.$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4213- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4250- case "$installprefix" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4251: '') dflt=`echo $prefix | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4252- *) dflt="$installprefix";;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4280-if $test X"$prefix" != X"$installprefix"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4281: eval "install${prefixvar}=\`echo \$${prefixvar}exp | sed \"s#^\$prefixexp#\$installprefixexp#\"\`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4282-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4341-if $test -r $rsrc/patchlevel.h;then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4342: revision=`awk '/define[ ]+PERL_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4343: patchlevel=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4344: subversion=`awk '/define[ ]+PERL_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4345: api_revision=`awk '/define[ ]+PERL_API_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4346: api_version=`awk '/define[ ]+PERL_API_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4347: api_subversion=`awk '/define[ ]+PERL_API_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4348: perl_patchlevel=`egrep ',"(MAINT|SMOKE)[0-9][0-9]*"' $rsrc/patchlevel.h|tail -1|sed 's/[^0-9]//g'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4349-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4362-0|'') ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4363:*) perl_patchlevel=`echo $perl_patchlevel | sed 's/.* //'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4364- version_patchlevel_string="$version_patchlevel_string patch $perl_patchlevel"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4591- echo exit 0 >osf1
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4592:elif test `echo abc | $tr a-z A-Z` = Abc ; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4593: xxx=`./loc addbib blurfl $pth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4594- if $test -f $xxx; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4686-if $cc -o try $ccflags $ldflags try.c; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4687: gccversion=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4688- case "$gccversion" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4706-case "$gccversion" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4707:1.*) cpp=`./loc gcc-cpp $cpp $pth` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4708-esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4710-'') gccosandvers='' ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4711:*) gccshortvers=`echo "$gccversion"|sed 's/ .*//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4712: gccosandvers=`$cc -v 2>&1|grep '/specs$'|sed "s!.*/[^-/]*-[^-/]*-\([^-/]*\)/$gccshortvers/specs!\1!"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4713- gccshortvers=''
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4721- Your gcc has not been compiled for the exact release of
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4722: your operating system ($gccosandvers versus $osname$osvers).
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4723-
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4752- if test "X$warn" != X; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4753: locincpth=`echo " $locincpth " | sed "s! $incdir ! !"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4754- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4983- $echo 'extern int foo;' > try.c
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4984: set X `$cppstdin -v try.c 2>&1 | $awk '/^#include </,/^End of search /'|$cppfilter $grep '/include'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4985- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4987- incpth="$incpth $*"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4988: incpth="`$echo $incpth|$sed 's/^ //'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4989- for i in $*; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4990: j="`$echo $i|$sed 's,/include$,/lib,'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4991- if $test -d $j; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4994- done
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:4995: libpth="`$echo $libpth|$sed 's/^ //'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-4996- for xxx in $libpth $loclibpth $plibpth $glibpth; do
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5104-'')
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5105: if xxx=`./loc libc.sl X $libpth`; $test -f "$xxx"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5106- dflt='sl'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5303- if $test ! -f "$xxx" -a "X$ignore_versioned_solibs" = "X"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5304: xxx=`ls $thisdir/lib$thislib.$so.[0-9] 2>/dev/null|sed -n '$p'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5305- $test -f "$xxx" && eval $libscheck
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5306- $test -f "$xxx" && libstyle=shared
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5307: xxx=`ls $thisdir/lib$thislib.[0-9].$so 2>/dev/null|sed -n '$p'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5308- $test -f "$xxx" && eval $libscheck
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5346- libsfound="$libsfound $xxx"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5347: yyy=`basename $xxx`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5348- libsfiles="$libsfiles $yyy"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5349: yyy=`echo $xxx|$sed -e "s%/$yyy\\$%%"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5350- case " $libsdirs " in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5428- case "$optimize" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5429: *-g*) set `echo "X $optimize " | sed 's/ -g / /'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5430- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5749- if $sh -c "$run ./try " >>try.msg 2>&1; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5750: xxx=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5751- case "$xxx" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5826- if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5827: eval `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5828- echo "Your integers are $intsize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5886- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5887: longlongsize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5888- echo "Your long longs are $longlongsize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5924- while $test \$# -gt 0; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5925: if $test $testaccess \`echo \$1 | $tr -d '"'\`; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5926- echo "\$pos"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5929- shift
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5930: pos=\`expr \$pos + 1\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5931- done
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5964-while read cline; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5965: name=\`echo \$cline | $awk "\$awkprg" | $tr -d '"'\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5966- case "\$name" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5993-while $test "$cont"; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:5994: xxx=`./findhdr $1`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-5995- var=$2; eval "was=\$$2";
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6297- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6298: libcquad=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6299- echo "Your C library's 64-bit functions are $libcquad."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6392- val="$define"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6393: gnulibc_version=`$cat glibc.ver`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6394- echo "You are using the GNU C Library version $gnulibc_version"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6425- case "$dflt" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6426: '') dflt=`$egrep 'inlibc|csym' $rsrc/Configure | wc -l 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6427- if $test $dflt -gt 20; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6502- case "$libs" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6503: *-lc_s*) libc=`./loc libc_s$_a $libc $libpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6504- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6514- -l*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6515: thislib=`echo $thislib | $sed -e 's/^-l//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6516: if try=`./loc lib$thislib.$so.'*' X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6517- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6518: elif try=`./loc lib$thislib.$so X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6519- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6520: elif try=`./loc lib$thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6521- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6522: elif try=`./loc $thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6523- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6524: elif try=`./loc lib$thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6525- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6526: elif try=`./loc $thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6527- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6528: elif try=`./loc Slib$thislib$_a X $xlibpth`; $test -f "$try"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6529- :
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6584-else
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6585: if tans=`./loc libc$_a blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6586- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6587: elif tans=`./loc libc blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6588: libnames="$libnames "`./loc clib blurfl/dyick $libpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6589: elif tans=`./loc clib blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6590- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6591: elif tans=`./loc Slibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6592- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6593: elif tans=`./loc Mlibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6594- :
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6595- else
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6596: tans=`./loc Llibc$_a blurfl/dyick $xlibpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6597- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6897- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6898: doublesize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6899- echo "Your double is $doublesize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6945- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:6946: longdblsize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-6947- echo "Your long doubles are $longdblsize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7070-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7071: longdblkind=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7072-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7114-echo " "
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7115:if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7116- tarch=`arch`"-$osname"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7117:elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7118- if uname -m > tmparch 2>&1 ; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7136-'') ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7137:*) archname=`echo $targetarch|sed 's,^[^-]*-,,'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7138-esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7276- /*-$oldprefix/*|\~*-$oldprefix/*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7277: eval "$1=\`echo \$$2 | sed \"s,^$oldprefix,$prefix,\"\`";;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7278- *) eval "$1=\"\$$2\"";;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7373-"$prefix") ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7374:*) eval "$1=\`echo \$$1 | sed \"s,^$prefixexp,$prefix,\"\`";;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7375-esac'
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7382-: privlib may have an optional trailing /share.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7383:tdflt=`echo $privlib | $sed 's,/share$,,'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7384-tdflt=$tdflt/$archname
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7538-case "$perl5" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7539:'') for tdir in `echo "$binexp$path_sep$PATH" | $sed "s/$path_sep/ /g"`; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7540- : Check if this perl is recent and can load a simple module
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7598-: XXX No longer works with Prefixit stuff.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7599:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7600-case "$sitelib" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7621-. ./setprefixvar
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7622:sitelib_stem=`echo "$sitelibexp" | sed "s,/$version$,,"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7623-
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7681-'') if test -x "$perl5$exe_ext"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7682: dflt=`$perl5 getverlist`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7683- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7776- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7777: ptrsize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7778- echo "Your pointers are $ptrsize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7861- echo "Removing unneeded -lmalloc from library list" >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7862: set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7863- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7923-case "$sitearch" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:7924:'') dflt=`echo $sitelib | $sed 's,/share$,,'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-7925- dflt="$dflt/$archname"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8016- '')
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8017: prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8018- case "$installstyle" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8032-esac
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8033:vendorlib_stem=`echo "$vendorlibexp" | sed "s,/$version$,,"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8034-prefixvar=vendorlib
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8048- case "$vendorarch" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8049: '') dflt=`echo $vendorlib | $sed 's,/share$,,'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8050- dflt="$dflt/$archname"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8277-case "$html3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8278:'') html3dir=`echo "$html1dir" | $sed 's/1$/3$/'` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8279-*) dflt=$html3dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8403- : emulate basename
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8404: dlsrc=`echo $ans | $sed -e 's%.*/\([^/]*\)$%\1%'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8405-
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8885- syspath="$syspath /usr/man/man.L /local/man/man1 /usr/local/man/man1"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8886: sysman=`./loc . /usr/man/man1 $syspath`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8887- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8919- case "$sysman" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8920: */?_man*) dflt=`./loc . $prefixexp/l_man/man1 $lookpath` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:8921: *) dflt=`./loc . $prefixexp/man/man1 $lookpath` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-8922- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9025-echo "If you don't want the manual sources installed, answer 'none'."
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9026:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9027-case "$man3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9028:'') dflt=`echo "$man1dir" | $sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9029- if $test -d "$privlib/man/man3"; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9164- echo 'Oh well, maybe I can mine it out of whoami.h...'
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9165: if tans=`sh -c $contains' sysname $usrinc/whoami.h' 2>&1` ; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9166: myhostname=`echo "$tans" | $sed 's/^.*"\(.*\)"/\1/'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9167- phostname="sed -n -e '"'/sysname/s/^.*\"\\(.*\\)\"/\1/{'"' -e p -e q -e '}' <$usrinc/whoami.h"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9209- echo "(Normalizing case in your host name)"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9210: myhostname=`echo $myhostname | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9211- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9215-*.*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9216: dflt=`expr "X$myhostname" : "X[^.]*\(\..*\)"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9217: myhostname=`expr "X$myhostname" : "X\([^.]*\)\."`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9218- echo "(Trimming domain name from host name--host name is now $myhostname)"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9238- $sed -n -e "s/$myhostname\.\([-a-zA-Z0-9_.]\)/\1/p"`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9239: case `$echo X$dflt` in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9240- X*\ *) echo "(Several hosts in the database matched hostname)"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9271- '') dflt='.';;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9272: .nis.*|.yp.*|.main.*) dflt=`echo $dflt | $sed -e 's/^\.[^.]*//'`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9273- esac
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9277- .os390) echo "(Attempting domain name extraction from //'SYS1.TCPPARMS(TCPDATA)')"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9278: dflt=.`awk '/^DOMAINORIGIN/ {print $2}' "//'SYS1.TCPPARMS(TCPDATA)'" 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9279- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9305- echo "(Normalizing case in your domain name)"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9306: mydomain=`echo $mydomain | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9307- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9313-*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9314: case `$phostname | ./tr '[A-Z]' '[a-z]'` in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9315- $myhostname$mydomain|$myhostname) ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9344- if $test -s /etc/mailname; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9345: maildomain=`$cat /etc/mailname`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9346- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9447- *) startperl="#!$ans"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9448: if $test 30 -lt `echo "$ans" | wc -c`; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9449- $cat >&4 <<EOM
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9549-case "$sitehtml1dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9550:'') dflt=`echo "$html1dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9551-*) dflt=$sitehtml1dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9565-case "$sitehtml3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9566:'') dflt=`echo "$html3dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9567-*) dflt=$sitehtml3dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9579-case "$siteman1dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9580:'') dflt=`echo $man1dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9581-*) dflt=$siteman1dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9593-case "$siteman3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9594:'') dflt=`echo $man3dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9595-*) dflt=$siteman3dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9639-$define|true|[yY]*|'')
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9640: xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9641- case "$xversion" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9740-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9741: lseeksize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9742- echo "Your file offsets are $lseeksize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9778-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9779: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9780- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9858- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9859: lseeksize=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9860- $echo "Your file offsets are now $lseeksize bytes long."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9887- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9888: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9889- dflt="$lseeksize"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9945- case "$vendorhtml1dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9946: '') dflt=`echo "$html1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9947- *) dflt=$vendorhtml1dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9973- case "$vendorhtml3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9974: '') dflt=`echo "$html3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9975- *) dflt=$vendorhtml3dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-9998- case "$vendorman1dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:9999: '') dflt=`echo "$man1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10000- *) dflt=$vendorman1dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10023- case "$vendorman3dir" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10024: '') dflt=`echo "$man3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10025- *) dflt=$vendorman3dir ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10174-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10175: doublekind=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10176-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10239- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10240: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10241- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10261- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10262: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10263- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10283- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10284: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10285- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10305- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10306: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10307- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10355- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10356: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10357- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10551- if test "$d_PRIgldbl" != "$define"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10552: xxx_ld_list="`echo $xxx_ld_list|sed s/sprintf//` sprintf"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10553- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10555- if test "$d_qgcvt" != "$define"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:10556: xxx_ld_list="`echo $xxx_ld_list|sed s/qgcvt//`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-10557- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-11612-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:11613: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-11614- "123 456 789")
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12079-for ENUM in MSG_CTRUNC MSG_DONTROUTE MSG_OOB MSG_PEEK MSG_PROXY SCM_RIGHTS; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12080: enum=`$echo $ENUM|./tr '[A-Z]' '[a-z]'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12081- $cat >try.c <<EOF
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12128- else
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12129: cryptlib=`./loc Slibcrypt$_a "" $xlibpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12130- if $test -z "$cryptlib"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12131: cryptlib=`./loc Mlibcrypt$_a "" $xlibpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12132- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12135- if $test -z "$cryptlib"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12136: cryptlib=`./loc Llibcrypt$_a "" $xlibpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12137- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12140- if $test -z "$cryptlib"; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12141: cryptlib=`./loc libcrypt$_a "" $libpth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12142- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12620- $cc -o fred $ccflags $ldflags $cccdlflags $ccdlflags fred.c $libs > /dev/null 2>&1 && $to dyna.$dlext; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:12621: xxx=`$run ./fred`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-12622- case $xxx in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13293- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:13294: o_nonblock=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13295- case "$o_nonblock" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13411- case $? in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:13412: 0) eagain=`$cat try.out`;;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13413- 1) echo "Could not perform non-blocking setting!";;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13418- esac
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:13419: rd_nodata=`$cat try.ret`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13420- echo "A read() system call with no data present returns $rd_nodata."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13436- esac
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:13437: status=`$cat try.err`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13438- case "$status" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13700- if eval $compile && $to try.c; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:13701: case `$run ./try` in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-13702- Pass_changed)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14146-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:14147: `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14148- rc=$?
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14174-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:14175: `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14176- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14509- shift
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:14510: file=`./loc $file $file $pth`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:14511: aphostname=`echo $file $*`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14512- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14522- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:14523: echo "I'll use 'popen("'"'$aphostname'", "r")'"' to get your hostname." >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-14524- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-15991-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:15992: foo=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-15993- echo "Yes, it does ($foo)" >&4
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16599- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16600: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16601- int16_t)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16641- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16642: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16643- int32_t)
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16720-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16721: nv_preserves_uv_bits="`$run ./try`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16722-fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16724-\-[1-9]*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16725: nv_preserves_uv_bits=`expr 0 - $nv_preserves_uv_bits`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16726- $echo "Your NVs can preserve all $nv_preserves_uv_bits bits of your UVs." 2>&1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16791-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16792: xxx="`$run ./try`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16793- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16904-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:16905: xxx="`$run ./try`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-16906- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17073- $ls -l $try > reflect
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:17074: if $contains /`basename $ls` reflect >/dev/null 2>&1; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17075- echo "You have $type-like $try."
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17621- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:17622: xxx=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17623- case "$xxx" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17693- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:17694: xxx=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-17695- case "$xxx" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18435- xxx=`./findhdr sys/user.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:18436: set `grep '_ruid;' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18437- case $1 in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18659- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:18660: `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18661- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18955- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:18956: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-18957- yes) stdio_stream_array=$s; break ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19145- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19146: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19147- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19230- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19231: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19232- ok) echo "Your strtoul() seems to be working okay." ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19287- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19288: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19289- ok) echo "Your strtoull() seems to be working okay." ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19342- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19343: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19344- ok) echo "Your strtouq() seems to be working okay." ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19713- if eval $compile && $run ./try > /dev/null; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19714: dflt=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19715- case "$dflt" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19955-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19956: `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19957- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19988-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:19989: `$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-19990- case "$?" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20028- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20029: dflt=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20030- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20076- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20077: dflt=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20078- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20206- echo 'Looks OK.' >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20207: set `$run ./try 1`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20208- db_version_major=$1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20217- echo "Removing unusable -ldb from library list" >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20218: set `echo X $libs | $sed -e 's/-ldb / /' -e 's/-ldb$//'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20219- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20400-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20401: doubleinfbytes=`$run ./try 1`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20402: doublenanbytes=`$run ./try 2`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20403- case "$d_longdbl" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20404- $define)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20405: longdblinfbytes=`$run ./try 3`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20406: longdblnanbytes=`$run ./try 4`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20407- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20555-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20556: doublemantbits=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20557-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20597-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20598: longdblmantbits=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20599-else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20626- echo "Removing obsolete -Dmy_rand, -Dmy_srand, and -Drandbits from ccflags." >&4
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20627: ccflags="`echo $ccflags | sed -e 's/-Dmy_rand=random/ /'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20628: ccflags="`echo $ccflags | sed -e 's/-Dmy_srand=srandom/ /'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20629: ccflags="`echo $ccflags | sed -e 's/-Drandbits=[0-9][0-9]*/ /'`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20630- ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20832- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20833: fflushNULL="`$cat try.out`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20834- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20969- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:20970: fflushall="`$cat try.out`"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-20971- fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21041- xxx=`./findhdr sys/user.h`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21042: set `grep 'groups\[NGROUPS\];' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21043- case $1 in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21078-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21079: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21080- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21112-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21113: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21114- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21147- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21148: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21149- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21169- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21170: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21171- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21192- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21193: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21194- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21214- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21215: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21216- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21236- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21237: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21238- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21258- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21259: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21260- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21430-EOF
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21431: case "`$make -f testmake.mak 2>/dev/null`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21432- *maketemp=*) make_set_make='#' ;;
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21486-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21487: case "`$run ./try`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21488- "that's all right, then")
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21513-
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21514:Checking to see what type of arguments are accepted by gethostbyaddr().
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21515-EOM
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21525- case "$netdb_host_type" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21526: '') try="$extern_C struct hostent *gethostbyaddr($xxx, $yyy, int);"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21527- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21556- # prototype clash!
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21557: # netdb_host_type=`echo "$netdb_host_type" | sed 's/^const //'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21558-fi
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21603-
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21604:Checking to see what type of 1st argument is accepted by getnetbyaddr().
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21605-EOM
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21612- case "$netdb_net_type" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21613: '') try="$extern_C struct netent *getnetbyaddr($xxx, int);"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21614- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21790- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21791: eval `$run ./try 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21792- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21870- if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21871: eval `$run ./try 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21872- else
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21930-case "$selectminbits" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:21931:'') safebits=`expr $ptrsize \* 8`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-21932- case "$d_select" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22002- if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22003: selectminbits=`$run ./try 2>/dev/null`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22004- case "$selectminbits" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22214- : Now look at all the signal names, one at a time.
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22215: for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22216- $cat > signal.c <<EOCP
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22274- . ./signal_cmd
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22275: sig_count=`$awk '/^NSIG/ { printf "%d", $2 }' signal.lst`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22276- sig_name=`$awk 'BEGIN { printf "ZERO " }
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22303-}'
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22304:sig_size=`echo $sig_name | awk '{print NF}'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22305-$rm -f signal signal.c signal.awk signal.lst signal_cmd
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22329-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22330: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22331- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22445-if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22446: ssizetype=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22447- echo "I'll be using $ssizetype for functions returning a byte count." >&4
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22481-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22482: val=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22483- case "$val" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22513-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22514: val=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22515- case "$val" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22564-if eval $compile_ok; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22565: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22566- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22598-if eval $compile; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:22599: yyy=`$run ./try`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-22600- case "$yyy" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23172-EOF
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23173:for i in \`$cc -v -c tmp.c 2>&1 $postprocess_cc_v\`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23174-do
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23203- ccsymbols=''
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23204: cppsymbols=`$cat Cppsym.true`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23205: cppsymbols=`echo $cppsymbols`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23206- cppccsymbols="$cppsymbols"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23212- symbols='ones'
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23213: cppccsymbols=`$cat ccsym.com`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23214: cppccsymbols=`echo $cppccsymbols`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23215- $test "$silent" || sleep 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23221- also='further '
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23222: cppsymbols=`$cat ccsym.cpp`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23223: cppsymbols=`echo $cppsymbols`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23224- $test "$silent" || sleep 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23230- $sed -e 's/\(..*\)=.*/\1/' ccsym.own | $uniq >>Cppsym.true
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23231: ccsymbols=`$cat ccsym.own`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23232: ccsymbols=`echo $ccsymbols`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23233- $test "$silent" || sleep 1
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23287- *) if ./Cppsym pyr; then
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23288: case "`$run /bin/universe`" in
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23289- ucb) if $test `./findhdr sgtty.h`; then
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23487- *)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23488: this_ext=`echo "$xxx" | $sed -e s/-/\\\//g`;
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23489- case "$this_ext" in
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23538-shift
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23539:xs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23540-set X $nonxs_extensions
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23541-shift
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23542:nonxs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23543-cd "$tdir"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23544:known_extensions=`echo $nonxs_extensions $xs_extensions | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23545-
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23860- cd "$rsrc/cpan"
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23861: for xxx in `ls Encode/*/Makefile.PL|awk -F/ '{print $2}'`; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23862- static_ext="$static_ext Encode/$xxx"
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23898- $define|true|[yY]*)
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23899: set X `echo " $libs " | sed -e 's@ -lndbm @ @' -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldbm @ @' -e 's@ -ldb @ @'`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23900- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23958- eval temp=\$$file
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:23959: eval $file=`basename $temp`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-23960- done
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-25195- $sort | $uniq -u >UU/oldsyms
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:25196: set X `$cat UU/oldsyms`
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-25197- shift
##############################################
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-25204- echo ": Variables propagated from previous config.sh file." >>config.sh
perl-5.32.0/.pc/debian/configure-regen.diff/Configure:25205: for sym in `$cat UU/oldsyms`; do
perl-5.32.0/.pc/debian/configure-regen.diff/Configure-25206- echo " Propagating $hint variable "'$'"$sym..."
##############################################
perl-5.32.0/.pc/debian/disable-stack-check.diff/dump.c-2570- PERL_DTRACE_PROBE_OP(PL_op);
perl-5.32.0/.pc/debian/disable-stack-check.diff/dump.c:2571: } while ((PL_op = PL_op->op_ppaddr(aTHX)));
perl-5.32.0/.pc/debian/disable-stack-check.diff/dump.c-2572- DEBUG_l(Perl_deb(aTHX_ "leaving RUNOPS level\n"));
##############################################
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL-766- while ( !$report_written ) {
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL:767: my $exit_status = system("$editor $filename");
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL-768- if ($exit_status) {
##############################################
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL-1574-chmod 0755, $file or die "Can't reset permissions for $file: $!\n";
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL:1575:exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/debian/perlbug-editor.diff/utils/perlbug.PL-1576-chdir $origdir;
##############################################
perl-5.32.0/.pc/debian/eu-mm-perl-base.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-221- my $make = $self->make || $self->{MAKE};
perl-5.32.0/.pc/debian/eu-mm-perl-base.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm:222: my $minus_v = `"$make" -v $redirect`;
perl-5.32.0/.pc/debian/eu-mm-perl-base.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Any.pm-223- return $maketype2true{$type} = 1
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-709-print(qq{Executing $(CI) @all\n});
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:710:system(qq{$(CI) @all}) == 0 or die $!;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-711-print(qq{Executing $(RCS_LABEL) ...\n});
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:712:system(qq{$(RCS_LABEL) @all}) == 0 or die $!;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-713-EOF
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1177- if ($Is{BSD}) {
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1178: $val = `$version_check 2>&1`;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1179- } else {
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1180- close STDERR if $stderr_duped;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1181: $val = `$version_check`;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1182-
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1252- continue {
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:1253: system("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':';
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-1254- }
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2694-$(MAP_TARGET) :: %1$s/perlmain$(OBJ_EXT) $(MAP_LIBPERLDEP) $(MAP_STATICDEP) $(INST_ARCHAUTODIR)/extralibs.all
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2695: $(MAP_LINKCMD) %2$s $(OPTIMIZE) %1$s/perlmain$(OBJ_EXT) %3$s $(MAP_STATIC) "$(LLIBPERL)" `cat $(INST_ARCHAUTODIR)/extralibs.all` $(MAP_PRELIBS)
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2696- $(NOECHO) $(ECHO) "To install the new '$(MAP_TARGET)' binary, call"
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2724- MAP_STATIC "$(MAP_STATIC)" \
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2725: MAP_EXTRA "`cat $(INST_ARCHAUTODIR)/extralibs.all`" \
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2726- MAP_LIBPERL "$(MAP_LIBPERL)" \
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2828- my $devnull = File::Spec->devnull;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:2829: return `nm $libfile 2>$devnull` =~ /\b_?boot_/;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-2830-}
##############################################
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3038- $line = $1 if $line =~ m{^(.+)}s;
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm:3039: eval($line); ## no critic
perl-5.32.0/.pc/fixes/respect_umask.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm-3040- return ${$name};
##############################################
perl-5.32.0/.pc/fixes/document_makemaker_ccflags.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm-1256-
perl-5.32.0/.pc/fixes/document_makemaker_ccflags.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm:1257: system("$Config::Config{eunicefix} $finalname")
perl-5.32.0/.pc/fixes/document_makemaker_ccflags.diff/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm-1258- if $Config::Config{eunicefix} ne ":";
##############################################
perl-5.32.0/.pc/fixes/memoize-pod.diff/cpan/Memoize/Memoize.pm-127- } else {
perl-5.32.0/.pc/fixes/memoize-pod.diff/cpan/Memoize/Memoize.pm:128: croak "Unrecognized option to `${context}_CACHE': `$cache_opt' should be one of (@CONTEXT_TAGS); aborting";
perl-5.32.0/.pc/fixes/memoize-pod.diff/cpan/Memoize/Memoize.pm-129- }
##############################################
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm-365- CPAN->debug("eval[$eval]") if $CPAN::DEBUG;
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm:366: eval($eval);
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm-367- warn $@ if $@;
##############################################
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm-954- return MM->maybe_command($perl)
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm:955: && `$perl -MConfig=myconfig -e print -e myconfig` eq Config->myconfig;
perl-5.32.0/.pc/fixes/cpan_web_link.diff/cpan/CPAN/lib/CPAN.pm-956-}
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-395- if( defined $arg->{$host} ) {
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:396: ( $arg->{$host}, my $s ) = $self->split_addr( $arg->{$host} );
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-397- # IO::Socket::INET compat - *Host parsed port always takes precedence
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-957-BEGIN {
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:958: if( eval($IO::Socket::VERSION) < 1.35 ) {
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-959- *socktype = sub {
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1091-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1092:=head2 ( $host, $port ) = IO::Socket::IP->split_addr( $addr )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1093-
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1098-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1099: IO::Socket::IP->split_addr( "hostname:http" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1100- # ( "hostname", "http" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1101-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1102: IO::Socket::IP->split_addr( "192.0.2.1:80" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1103- # ( "192.0.2.1", "80" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1104-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1105: IO::Socket::IP->split_addr( "[2001:db8::1]:80" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1106- # ( "2001:db8::1", "80" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1107-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1108: IO::Socket::IP->split_addr( "something.else" )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1109- # ( "something.else", undef )
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1127-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1128:=head2 $addr = IO::Socket::IP->join_addr( $host, $port )
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1129-
##############################################
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1137-
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm:1138: say "Connected to ", IO::Socket::IP->join_addr( $sock->peerhost_service );
perl-5.32.0/.pc/fixes/io_socket_ip_ipv6.diff/cpan/IO-Socket-IP/lib/IO/Socket/IP.pm-1139-
##############################################
perl-5.32.0/Makefile.SH-36-case "$0" in
perl-5.32.0/Makefile.SH:37:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/Makefile.SH-38-esac
##############################################
perl-5.32.0/Makefile.SH-50- # $ldlibpth so that ./perl finds *this* shared libperl.
perl-5.32.0/Makefile.SH:51: ldlibpth="LD_LIBRARY_PATH=` quote "$pwd" `"'$${LD_LIBRARY_PATH:+:}$$LD_LIBRARY_PATH'
perl-5.32.0/Makefile.SH-52-
##############################################
perl-5.32.0/Makefile.SH-102- shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
perl-5.32.0/Makefile.SH:103: linklibperl="-L $archlibexp/CORE -L `pwd | sed 's/\/UU$//'` -lperl"
perl-5.32.0/Makefile.SH-104- linklibperl_nonshr='-lperl_nonshr'
##############################################
perl-5.32.0/Makefile.SH-114- shrpldflags="$shrpldflags $ldflags $perllibs $cryptlib"
perl-5.32.0/Makefile.SH:115: linklibperl="-L $archlibexp/CORE -L `pwd | sed 's/\/UU$//'` -lperl"
perl-5.32.0/Makefile.SH-116- linklibperl_nonshr='-lperl_nonshr'
##############################################
perl-5.32.0/Makefile.SH-120- hpux*)
perl-5.32.0/Makefile.SH:121: linklibperl="-L `pwd | sed 's/\/UU$//'` -Wl,+s -Wl,+b$archlibexp/CORE -lperl"
perl-5.32.0/Makefile.SH-122- ;;
##############################################
perl-5.32.0/Makefile.SH-139- case "$ldlibpthval" in
perl-5.32.0/Makefile.SH:140: '') ldlibpth="$ldlibpthname=` quote "$pwd" `" ;;
perl-5.32.0/Makefile.SH:141: *) ldlibpth="$ldlibpthname=` quote "$pwd" `:` quote "$ldlibpthval" `" ;;
perl-5.32.0/Makefile.SH-142- esac
##############################################
perl-5.32.0/Makefile.SH-202- : the dependency named here will never exist
perl-5.32.0/Makefile.SH:203: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Makefile.SH-204- this_target="lib/auto/$f/$base.$dlext"
##############################################
perl-5.32.0/Makefile.SH-217-for f in $static_ext; do
perl-5.32.0/Makefile.SH:218: base=`echo "$f" | sed 's/.*\///'`
perl-5.32.0/Makefile.SH-219- static_list="$static_list lib/auto/$f/$base\$(LIB_EXT)"
##############################################
perl-5.32.0/Makefile.SH-231-for f in $nonxs_ext; do
perl-5.32.0/Makefile.SH:232: p=`echo "$f" | tr / -`
perl-5.32.0/Makefile.SH-233- for d in ext dist cpan; do
##############################################
perl-5.32.0/Makefile.SH-483-SH='Makefile.SH cflags.SH config_h.SH makedepend.SH myconfig.SH runtests.SH pod/Makefile.SH'
perl-5.32.0/Makefile.SH:484:shextract=`SH_to_target $SH`
perl-5.32.0/Makefile.SH-485-
##############################################
perl-5.32.0/Makefile.SH-625-.c$(OBJ_EXT):
perl-5.32.0/Makefile.SH:626: @echo `$(CCCMD)` $(PLDLFLAGS) $*.c
perl-5.32.0/Makefile.SH:627: @`$(CCCMD)` $(PLDLFLAGS) $*.c
perl-5.32.0/Makefile.SH-628-
perl-5.32.0/Makefile.SH-629-.c.i: perl.h config.h
perl-5.32.0/Makefile.SH:630: @echo `$(CCCMDSRC)` -E $*.c \> $*.i
perl-5.32.0/Makefile.SH:631: @`$(CCCMDSRC)` -E $*.c > $*.i
perl-5.32.0/Makefile.SH-632-
perl-5.32.0/Makefile.SH-633-.c.s: perl.h config.h
perl-5.32.0/Makefile.SH:634: @echo `$(CCCMDSRC)` -S $*.c
perl-5.32.0/Makefile.SH:635: @`$(CCCMDSRC)` -S $*.c
perl-5.32.0/Makefile.SH-636-
##############################################
perl-5.32.0/Makefile.SH-718-${file}mini\$(OBJ_EXT): ${file}mini.c
perl-5.32.0/Makefile.SH:719: echo @\`\$(CCCMD)\` \$(PLDLFLAGS) $DPERL_IS_MINIPERL $DPERL_EXTERNAL_GLOB ${file}mini.c
perl-5.32.0/Makefile.SH:720: @\`\$(CCCMD)\` \$(PLDLFLAGS) $DPERL_IS_MINIPERL $DPERL_EXTERNAL_GLOB ${file}mini.c
perl-5.32.0/Makefile.SH-721-!GROK!THIS!
##############################################
perl-5.32.0/Makefile.SH-811-# extensions *after* Perl has been built and installed)
perl-5.32.0/Makefile.SH:812:CCDLFLAGS = `echo $ccdlflags|sed -e 's@-bE:.*/perl\.exp@-bE:perl.exp@'`
perl-5.32.0/Makefile.SH-813-
##############################################
perl-5.32.0/Makefile.SH-918- $(ECHO) >dtrace_main.c && \
perl-5.32.0/Makefile.SH:919: `$(CCCMD)` $(PLDLFLAGS) dtrace_main.c && \
perl-5.32.0/Makefile.SH-920- rm -f dtrace_main.c )
##############################################
perl-5.32.0/Makefile.SH-1160- -@for x in `grep -l '^=[a-z]' README.* | grep -v README.vms` ; do \
perl-5.32.0/Makefile.SH:1161: nx=`echo $$x | sed -e "s/README\.//"`; \
perl-5.32.0/Makefile.SH-1162- $(LNS) ../$$x "pod/perl"$$nx".pod" ; \
##############################################
perl-5.32.0/Makefile.SH-1166-extras.make: $(PERL_EXE)
perl-5.32.0/Makefile.SH:1167: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&make(@ARGV)' `cat extras.lst`
perl-5.32.0/Makefile.SH-1168-
perl-5.32.0/Makefile.SH-1169-extras.test: $(PERL_EXE)
perl-5.32.0/Makefile.SH:1170: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&test(@ARGV)' `cat extras.lst`
perl-5.32.0/Makefile.SH-1171-
perl-5.32.0/Makefile.SH-1172-extras.install: $(PERL_EXE)
perl-5.32.0/Makefile.SH:1173: -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -MCPAN -e '@ARGV&&install(@ARGV)' `cat extras.lst`
perl-5.32.0/Makefile.SH-1174-
##############################################
perl-5.32.0/Makefile.SH-1187- flags="--$name";
perl-5.32.0/Makefile.SH:1188: flags=`echo $flags | sed -e 's/--all//'`
perl-5.32.0/Makefile.SH-1189- if test "X$hostperl" != X; then
##############################################
perl-5.32.0/Makefile.SH-1204-
perl-5.32.0/Makefile.SH:1205: test $name = notify || echo ' -@test ! -s extras.lst || PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) -Ilib -MCPAN -e '\''@ARGV&&install(@ARGV)'\'' `cat extras.lst`' >>$Makefile
perl-5.32.0/Makefile.SH-1206-done
##############################################
perl-5.32.0/Makefile.SH-1219- $(RUN_PERL) installperl --destdir=$(DESTDIR) $(INSTALLFLAGS) $(STRIPFLAGS)
perl-5.32.0/Makefile.SH:1220: -@test ! -s extras.lst || PATH="`pwd`:\${PATH}" PERL5LIB="`pwd`/lib" \$(RUN_PERL) -Ilib -MCPAN -e '@ARGV&&install(@ARGV)' `cat extras.lst`
perl-5.32.0/Makefile.SH-1221-
##############################################
perl-5.32.0/Makefile.SH-1298-META.yml: FORCE
perl-5.32.0/Makefile.SH:1299: PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) Porting/makemeta -y
perl-5.32.0/Makefile.SH-1300-
perl-5.32.0/Makefile.SH-1301-META.json: FORCE
perl-5.32.0/Makefile.SH:1302: PATH="`pwd`:${PATH}" PERL5LIB="`pwd`/lib" $(RUN_PERL) Porting/makemeta -j
perl-5.32.0/Makefile.SH-1303-
##############################################
perl-5.32.0/Makefile.SH-1346-printconfig:
perl-5.32.0/Makefile.SH:1347: @eval `$(RUN_PERL) -V:$(CONFIGVAR)`; echo $$$(CONFIGVAR)
perl-5.32.0/Makefile.SH-1348-
##############################################
perl-5.32.0/Makefile.SH-1397- rm -f realclean.sh veryclean.sh
perl-5.32.0/Makefile.SH:1398: -rm -f `grep -v ^# mkppport.lst | grep . | sed -e 's/$$/\/ppport.h/'`
perl-5.32.0/Makefile.SH-1399-
##############################################
perl-5.32.0/Makefile.SH-1506-for f in $SH; do
perl-5.32.0/Makefile.SH:1507: file=`SH_to_target $f`
perl-5.32.0/Makefile.SH-1508- $spitshell >>$Makefile <<!GROK!THIS!
##############################################
perl-5.32.0/cflags.SH-41-case "$0" in
perl-5.32.0/cflags.SH:42:*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
perl-5.32.0/cflags.SH-43-esac
##############################################
perl-5.32.0/cflags.SH-201- cmd="$cc $flags _cflags.c -o _cflags$_exe"
perl-5.32.0/cflags.SH:202: out="`$cmd 2>&1`"
perl-5.32.0/cflags.SH-203- # echo "$cmd --> $out"
##############################################
perl-5.32.0/cflags.SH-318- *) echo "cflags.SH: Removing -pedantic*, -std=c89, and -ansi because of $remove."
perl-5.32.0/cflags.SH:319: ccflags=`echo $ccflags|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-std=c89/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/cflags.SH:320: warn=`echo $warn|sed -e 's/-pedantic-errors/ /' -e 's/-pedantic/ /' -e 's/-ansi/ /' -e 's/-DPERL_GCC_PEDANTIC/ /'`
perl-5.32.0/cflags.SH:321: stdflags=`echo $stdflags|sed -e 's/-std=c89/ /'`
perl-5.32.0/cflags.SH-322- ;;
##############################################
perl-5.32.0/cflags.SH-370- echo "cflags.SH: Removing $f because of g++."
perl-5.32.0/cflags.SH:371: ccflags=`echo $ccflags|sed 's/$f/ /'`
perl-5.32.0/cflags.SH:372: warn=`echo $warn|sed 's/$f/ /'`
perl-5.32.0/cflags.SH-373- ;;
##############################################
perl-5.32.0/cflags.SH-384- echo "cflags.SH: Removing $f from cppflags."
perl-5.32.0/cflags.SH:385: cppflags=`echo $cppflags|sed 's/$f/ /'` ;;
perl-5.32.0/cflags.SH-386- esac
##############################################
perl-5.32.0/cflags.SH-421-# Protect double or single quotes for better restoring of ccflags.
perl-5.32.0/cflags.SH:422:myccflags=`echo $ccflags | sed -e 's/"/\\\"/g' -e "s/'/\\\'/g"`
perl-5.32.0/cflags.SH-423-
##############################################
perl-5.32.0/cflags.SH-486-
perl-5.32.0/cflags.SH:487:set `echo "$* " | sed -e 's/\.[oc] / /g' -e 's/\.obj / /g' -e "s/\\$obj_ext / /g"`
perl-5.32.0/cflags.SH-488-
##############################################
perl-5.32.0/cflags.SH-527-
perl-5.32.0/cflags.SH:528: av) ccflags=`echo $ccflags | sed -e s/-pipe//` ;;
perl-5.32.0/cflags.SH-529- deb) ccflags="$ccflags -fno-jump-tables" ;;
perl-5.32.0/cflags.SH:530: hv) warn=`echo $warn | sed -e s/-Wextra//` ;;
perl-5.32.0/cflags.SH-531- toke) optimize=-O0 ;;
##############################################
perl-5.32.0/Configure-87-*/*)
perl-5.32.0/Configure:88: me=`echo $0 | sed -e 's!.*/\(.*\)!\1!' 2>/dev/null`
perl-5.32.0/Configure-89- test "$me" || me=$0
##############################################
perl-5.32.0/Configure-1496-: This is only used by the lib/ExtUtils/MakeMaker.pm routine extliblist.
perl-5.32.0/Configure:1497:glibpth=`echo " $glibpth " | sed -e 's! /usr/shlib ! !'`
perl-5.32.0/Configure-1498-glibpth="/usr/shlib $glibpth"
##############################################
perl-5.32.0/Configure-1512- : Build up a list and do a single loop so we can 'break' out.
perl-5.32.0/Configure:1513: pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/Configure-1514- for xxx in sh bash ksh pdksh ash; do
##############################################
perl-5.32.0/Configure-1551-: see if sh knows # comments
perl-5.32.0/Configure:1552:if `$sh -c '#' >/dev/null 2>&1`; then
perl-5.32.0/Configure-1553- shsharp=true
##############################################
perl-5.32.0/Configure-1557- if test ! -f $xcat$_exe; then
perl-5.32.0/Configure:1558: for p in `echo $PATH | sed -e "s/$p_/ /g"` $paths; do
perl-5.32.0/Configure-1559- if test -f $p/cat$_exe; then
##############################################
perl-5.32.0/Configure-1641- args_exp="$args_exp$args_sep'$arg_exp'"
perl-5.32.0/Configure:1642: argn=`expr $argn + 1`
perl-5.32.0/Configure-1643- args_sep=' '
##############################################
perl-5.32.0/Configure-1770- case "$yyy" in
perl-5.32.0/Configure:1771: *=*) zzz=`echo "$yyy"|sed 's!=.*!!'`
perl-5.32.0/Configure-1772- case "$zzz" in
##############################################
perl-5.32.0/Configure-1774- *) xxx=append
perl-5.32.0/Configure:1775: zzz=" "`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/Configure:1776: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/Configure-1777- esac
##############################################
perl-5.32.0/Configure-1781- '') case "$yyy" in
perl-5.32.0/Configure:1782: *:*) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/Configure:1783: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'`
perl-5.32.0/Configure:1784: zzz=`echo "$yyy"|sed 's!^[^=]*=!!'`
perl-5.32.0/Configure:1785: yyy=`echo "$yyy"|sed 's!=.*!!'` ;;
perl-5.32.0/Configure:1786: *) xxx=`echo "$yyy"|sed 's!:.*!!'`
perl-5.32.0/Configure:1787: yyy=`echo "$yyy"|sed 's!^[^:]*:!!'` ;;
perl-5.32.0/Configure-1788- esac
##############################################
perl-5.32.0/Configure-1903-package='perl5'
perl-5.32.0/Configure:1904:first=`echo $package | sed -e 's/^\(.\).*/\1/'`
perl-5.32.0/Configure:1905:last=`echo $package | sed -e 's/^.\(.*\)/\1/'`
perl-5.32.0/Configure-1906-case "`echo AbyZ | tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/Configure:1907:ABYZ-abyz) spackage=`echo $first | tr '[:lower:]' '[:upper:]'`$last;;
perl-5.32.0/Configure:1908:*) spackage=`echo $first | tr '[a-z]' '[A-Z]'`$last;;
perl-5.32.0/Configure-1909-esac
##############################################
perl-5.32.0/Configure-1934-'') case "$0" in
perl-5.32.0/Configure:1935: */*) src=`echo $0 | sed -e 's%/[^/][^/]*$%%'`
perl-5.32.0/Configure-1936- case "$src" in
##############################################
perl-5.32.0/Configure-1938- .) ;;
perl-5.32.0/Configure:1939: *) src=`cd ../$src && pwd` ;;
perl-5.32.0/Configure-1940- esac
##############################################
perl-5.32.0/Configure-1988-if test -f MANIFEST; then
perl-5.32.0/Configure:1989: set x `awk '{print $1}' < MANIFEST | grep '\.SH$'`
perl-5.32.0/Configure-1990-else
perl-5.32.0/Configure-1991- echo "(Looking for .SH files under the source directory.)"
perl-5.32.0/Configure:1992: set x `(cd "$src"; find . -name "*.SH" -print)`
perl-5.32.0/Configure-1993-fi
##############################################
perl-5.32.0/Configure-1995-case $# in
perl-5.32.0/Configure:1996:0) set x `(cd "$src"; echo *.SH)`; shift;;
perl-5.32.0/Configure-1997-esac
##############################################
perl-5.32.0/Configure-2006- create="$name $create";
perl-5.32.0/Configure:2007: name=`echo $name | sed -e "s|^[^/]*$||"`;
perl-5.32.0/Configure:2008: name=`echo $name | sed -e "s|\(.*\)/.*|\1|"`;
perl-5.32.0/Configure-2009- else
##############################################
perl-5.32.0/Configure-2021- */*)
perl-5.32.0/Configure:2022: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/Configure:2023: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/Configure-2024- (cd "$dir" && . ./$file)
##############################################
perl-5.32.0/Configure-2033- */*)
perl-5.32.0/Configure:2034: dir=`expr X$file : 'X\(.*\)/'`
perl-5.32.0/Configure:2035: file=`expr X$file : 'X.*/\(.*\)'`
perl-5.32.0/Configure-2036- (set x $dir; shift; eval $mkdir_p)
##############################################
perl-5.32.0/Configure-2111- for filelist in x??; do
perl-5.32.0/Configure:2112: (cd "$rsrc"; ls `cat "$tmppwd/$filelist"` \
perl-5.32.0/Configure-2113- >/dev/null 2>>"$tmppwd/missing")
##############################################
perl-5.32.0/Configure-2185- *)
perl-5.32.0/Configure:2186: if test \`echo \"\$rp [\$xxxm] \" | wc -c\` -ge $COLUMNS; then
perl-5.32.0/Configure-2187- echo \"\$rp\" >&4
##############################################
perl-5.32.0/Configure-2228- !*)
perl-5.32.0/Configure:2229: set x \`expr "X\$ans" : "X!\(.*\)\$"\`
perl-5.32.0/Configure-2230- shift
##############################################
perl-5.32.0/Configure-2237- \\&*)
perl-5.32.0/Configure:2238: set x \`expr "X\$ans" : "X&\(.*\)\$"\`
perl-5.32.0/Configure-2239- shift
##############################################
perl-5.32.0/Configure-2257- xxxm="\$ans"
perl-5.32.0/Configure:2258: ans=\`echo $n "\$ans$c" | tr '$trnl' ' '\`
perl-5.32.0/Configure-2259- xxxm="\$ans"
##############################################
perl-5.32.0/Configure-2291-: See if we are using a devel version and want that
perl-5.32.0/Configure:2292:xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure-2293-case "$usedevel" in
##############################################
perl-5.32.0/Configure-2553-"
perl-5.32.0/Configure:2554:pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/Configure-2555-pth="$pth $sysroot/lib $sysroot/usr/lib"
##############################################
perl-5.32.0/Configure-2563- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/Configure:2564: xxx=`./loc $file $file $pth`
perl-5.32.0/Configure-2565- fi
perl-5.32.0/Configure-2566- ;;
perl-5.32.0/Configure:2567: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/Configure:2568: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/Configure-2569- esac
##############################################
perl-5.32.0/Configure-2596- echo "WARNING: no $xxx -- ignoring your setting for $file." >&4
perl-5.32.0/Configure:2597: xxx=`./loc $file $file $pth`
perl-5.32.0/Configure-2598- fi
perl-5.32.0/Configure-2599- ;;
perl-5.32.0/Configure:2600: '') xxx=`./loc $file $file $pth`;;
perl-5.32.0/Configure:2601: *) xxx=`./loc $xxx $xxx $pth`;;
perl-5.32.0/Configure-2602- esac
##############################################
perl-5.32.0/Configure-2743- # ./trygcc: line 23: cc: command not found
perl-5.32.0/Configure:2744: # case "`$cc -v -c try.c 2>&1`" in
perl-5.32.0/Configure-2745- # *gcc*) trygcc=no ;;
##############################################
perl-5.32.0/Configure-2852- /*) ;;
perl-5.32.0/Configure:2853: *) pth=`echo $PATH | sed -e "s/$p_/ /g"`
perl-5.32.0/Configure-2854- for p in $pth
##############################################
perl-5.32.0/Configure-2962- # x86_64-w64-mingw32-gcc.exe -> x86_64-w64-mingw32
perl-5.32.0/Configure:2963: targetarch=`$echo $cc|$sed 's/-g[c\+][c\+].*$//'`
perl-5.32.0/Configure:2964: ar=`$echo $cc|$sed 's/-g[c\+][c\+]/-ar/'`
perl-5.32.0/Configure-2965- # leave out ld, choosing it is more complex
perl-5.32.0/Configure:2966: nm=`$echo $cc|$sed 's/-g[c\+][c\+]/-nm/'`
perl-5.32.0/Configure:2967: ranlib=`$echo $cc|$sed 's/-g[c\+][c\+]/-ranlib/'`
perl-5.32.0/Configure-2968- # We are in a weird spot. Just before us, some values
##############################################
perl-5.32.0/Configure-3015- fi
perl-5.32.0/Configure:3016: hostosname=`$hostperl -le 'print $^O'`
perl-5.32.0/Configure-3017- ;;
##############################################
perl-5.32.0/Configure-3049- ;;
perl-5.32.0/Configure:3050: *) pwd=`$test -f ../Configure & cd ..; pwd`
perl-5.32.0/Configure-3051- run=$pwd/Cross/run
##############################################
perl-5.32.0/Configure-3142- /*)
perl-5.32.0/Configure:3143: $targetmkdir \`dirname \$f\`
perl-5.32.0/Configure-3144- $targetto -P $targetport -r $q \$f $targetuser@$targethost:\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/Configure-3146- *)
perl-5.32.0/Configure:3147: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/Configure-3148- $targetto -P $targetport -r $q \$f $targetuser@$targethost:$targetdir/\$f 2>/dev/null || exit 1
##############################################
perl-5.32.0/Configure-3160- /*)
perl-5.32.0/Configure:3161: $mkdir -p $targetdir/\`dirname \$f\`
perl-5.32.0/Configure-3162- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/Configure-3164- *)
perl-5.32.0/Configure:3165: $targetmkdir $targetdir/\`dirname \$f\`
perl-5.32.0/Configure-3166- $cp \$f $targetdir/\$f || exit 1
##############################################
perl-5.32.0/Configure-3236-echo " "
perl-5.32.0/Configure:3237:case "`echo AbyZ | $tr '[:lower:]' '[:upper:]' 2>/dev/null`"-"`echo AbyZ | $tr '[:upper:]' '[:lower:]' 2>/dev/null`" in
perl-5.32.0/Configure-3238-ABYZ-abyz)
##############################################
perl-5.32.0/Configure-3245- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/Configure:3246: case "`echo RS | $tr '[R-S]' '[r-s]' 2>/dev/null`" in
perl-5.32.0/Configure-3247- rs) up='[A-Z]'
##############################################
perl-5.32.0/Configure-3252- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/Configure:3253: case "`echo RS | $tr R-S r-s 2>/dev/null`" in
perl-5.32.0/Configure-3254- rs) up='A-Z'
##############################################
perl-5.32.0/Configure-3263- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/Configure:3264: case "`echo RS | $tr '[A-IJ-RS-Z]' '[a-ij-rs-z]' 2>/dev/null`" in
perl-5.32.0/Configure-3265- rs) up='[A-IJ-RS-Z]'
##############################################
perl-5.32.0/Configure-3270- if test "X$up" = X -o "X$low" = X; then
perl-5.32.0/Configure:3271: case "`echo RS | $tr A-IJ-RS-Z a-ij-rs-z 2>/dev/null`" in
perl-5.32.0/Configure-3272- rs) up='A-IJ-RS-Z'
##############################################
perl-5.32.0/Configure-3280-esac
perl-5.32.0/Configure:3281:case "`echo RS | $tr \"$up\" \"$low\" 2>/dev/null`" in
perl-5.32.0/Configure-3282-rs)
##############################################
perl-5.32.0/Configure-3305-'')
perl-5.32.0/Configure:3306:myuname=`$uname -a 2>/dev/null`
perl-5.32.0/Configure-3307-$test -z "$myuname" && myuname=`hostname 2>/dev/null`
##############################################
perl-5.32.0/Configure-3379- $test -f /lynx.os && osname=lynxos
perl-5.32.0/Configure:3380: $test -f /unicos && osname=unicos && osvers=`$uname -r`
perl-5.32.0/Configure:3381: $test -f /unicosmk && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/Configure:3382: $test -f /unicosmk.ar && osname=unicosmk && osvers=`$uname -r`
perl-5.32.0/Configure-3383- $test -f /bin/mips && /bin/mips && osname=mips
##############################################
perl-5.32.0/Configure-3385- $test -f /etc/saf/_sactab && osname=svr4
perl-5.32.0/Configure:3386: $test -d /usr/include/minix && osname=minix && osvers=`$uname -r`
perl-5.32.0/Configure-3387- $test -f /system/gnu_library/bin/ar.pm && osname=vos
##############################################
perl-5.32.0/Configure-3421- i386*)
perl-5.32.0/Configure:3422: tmp=`/bin/uname -X 2>/dev/null|awk '/3\.2v[45]/{ print $(NF) }'`
perl-5.32.0/Configure-3423- if $test "$tmp" != "" -a "$3" = "3.2" -a -f '/etc/systemid'; then
##############################################
perl-5.32.0/Configure-3462- bsd386) osname=bsd386
perl-5.32.0/Configure:3463: osvers=`$uname -r`
perl-5.32.0/Configure-3464- ;;
##############################################
perl-5.32.0/Configure-3483- dynixptx*) osname=dynixptx
perl-5.32.0/Configure:3484: osvers=`echo "$4"|sed 's/^v//'`
perl-5.32.0/Configure-3485- ;;
##############################################
perl-5.32.0/Configure-3491- hp*) osname=hpux
perl-5.32.0/Configure:3492: osvers=`echo "$3" | $sed 's,.*\.\([0-9]*\.[0-9]*\),\1,'`
perl-5.32.0/Configure-3493- ;;
##############################################
perl-5.32.0/Configure-3509- minix) osname=minix
perl-5.32.0/Configure:3510: osvers=`$uname -r`
perl-5.32.0/Configure-3511- ;;
##############################################
perl-5.32.0/Configure-3539- case "$3" in
perl-5.32.0/Configure:3540: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/Configure-3541- *) osvers="$3" ;;
##############################################
perl-5.32.0/Configure-3546- 5*) osname=solaris
perl-5.32.0/Configure:3547: osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/Configure-3548- *) osvers="$3" ;;
##############################################
perl-5.32.0/Configure-3565- osname=dec_osf
perl-5.32.0/Configure:3566: osvers=`sizer -v | awk -FUNIX '{print $2}' | awk '{print $1}' | tr '[A-Z]' '[a-z]' | sed 's/^[xvt]//'`
perl-5.32.0/Configure-3567- case "$osvers" in
perl-5.32.0/Configure-3568- [1-9].[0-9]*) ;;
perl-5.32.0/Configure:3569: *) osvers=`echo "$3" | sed 's/^[xvt]//'` ;;
perl-5.32.0/Configure-3570- esac
##############################################
perl-5.32.0/Configure-3599- if test -f /stand/boot ; then
perl-5.32.0/Configure:3600: eval `grep '^INITPROG=[a-z/0-9]*$' /stand/boot`
perl-5.32.0/Configure-3601- if test -n "$INITPROG" -a -f "$INITPROG"; then
perl-5.32.0/Configure:3602: isesix=`strings -a $INITPROG|grep 'ESIX SYSTEM V/386 Release 4.0'`
perl-5.32.0/Configure-3603- if test -n "$isesix"; then
##############################################
perl-5.32.0/Configure-3612- osname=sco
perl-5.32.0/Configure:3613: set `echo $3 | $sed 's/\./ /g'` $4
perl-5.32.0/Configure-3614- if $test -f $src/hints/sco_$1_$2_$3.sh; then
##############################################
perl-5.32.0/Configure-3680- # hints are run is somewhat icky.
perl-5.32.0/Configure:3681: set X `$run $uname -a 2>/dev/null`
perl-5.32.0/Configure-3682- shift
perl-5.32.0/Configure-3683- case "$3" in
perl-5.32.0/Configure:3684: 5*) osvers=`echo $3 | $sed 's/^5/2/g'` ;;
perl-5.32.0/Configure-3685- *) osvers="$3" ;;
##############################################
perl-5.32.0/Configure-3688- *)
perl-5.32.0/Configure:3689: osname=`echo $targetarch|sed 's,^[^-]*-,,'`
perl-5.32.0/Configure-3690- osvers=''
##############################################
perl-5.32.0/Configure-3699- ''|' ')
perl-5.32.0/Configure:3700: file=`echo "${osname}_${osvers}" | $sed -e 's%\.%_%g' -e 's%_$%%'`
perl-5.32.0/Configure-3701- : Also try without trailing minor version numbers.
perl-5.32.0/Configure:3702: xfile=`echo $file | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/Configure:3703: xxfile=`echo $xfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/Configure:3704: xxxfile=`echo $xxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/Configure:3705: xxxxfile=`echo $xxxfile | $sed -e 's%_[^_]*$%%'`
perl-5.32.0/Configure-3706- case "$file" in
##############################################
perl-5.32.0/Configure-3738- *)
perl-5.32.0/Configure:3739: dflt=`echo $hintfile | $sed 's/\.sh$//'`
perl-5.32.0/Configure-3740- ;;
##############################################
perl-5.32.0/Configure-3840- ''|' '|none) dflt=none ;;
perl-5.32.0/Configure:3841: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/_.*$//'` ;;
perl-5.32.0/Configure-3842- esac
##############################################
perl-5.32.0/Configure-3849-none) osname='' ;;
perl-5.32.0/Configure:3850:*) osname=`echo "$ans" | $sed -e 's/[ ][ ]*/_/g' | ./tr '[A-Z]' '[a-z]'`;;
perl-5.32.0/Configure-3851-esac
##############################################
perl-5.32.0/Configure-3856- ''|' '|none) dflt=none ;;
perl-5.32.0/Configure:3857: *) dflt=`echo $hintfile | $sed -e 's/\.sh$//' -e 's/^[^_]*//'`
perl-5.32.0/Configure:3858: dflt=`echo $dflt | $sed -e 's/^_//' -e 's/_/./g'`
perl-5.32.0/Configure-3859- case "$dflt" in
##############################################
perl-5.32.0/Configure-3877-: who configured the system
perl-5.32.0/Configure:3878:cf_time=`LC_ALL=C; LANGUAGE=C; export LC_ALL; export LANGUAGE; $date 2>&1`
perl-5.32.0/Configure-3879-case "$cf_by" in
##############################################
perl-5.32.0/Configure-3911- else
perl-5.32.0/Configure:3912: name=\`$expr x\$1 : '..\([^/]*\)'\`
perl-5.32.0/Configure:3913: dir=\`$sed -n -e "/^\${name}:/{s/^[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\).*"'\$'"/\1/" -e p -e q -e '}' </etc/passwd\`
perl-5.32.0/Configure-3914- if $test ! -d "\$dir"; then
perl-5.32.0/Configure:3915: me=\`basename \$0\`
perl-5.32.0/Configure-3916- echo "\$me: can't locate home directory for: \$name" >&2
##############################################
perl-5.32.0/Configure-3920- */*)
perl-5.32.0/Configure:3921: echo \$dir/\`$expr x\$1 : '..[^/]*/\(.*\)'\`
perl-5.32.0/Configure-3922- ;;
##############################################
perl-5.32.0/Configure-3959- expr "$fn" : '.*(\(.*\)).*' | $tr ',' $trnl >getfile.ok
perl-5.32.0/Configure:3960: fn=`echo $fn | sed 's/(.*)//'`
perl-5.32.0/Configure-3961- ;;
##############################################
perl-5.32.0/Configure-3965-*:*)
perl-5.32.0/Configure:3966: loc_file=`expr $fn : '.*:\(.*\)'`
perl-5.32.0/Configure:3967: fn=`expr $fn : '\(.*\):.*'`
perl-5.32.0/Configure-3968- ;;
##############################################
perl-5.32.0/Configure-4038- *)
perl-5.32.0/Configure:4039: value=`UU/filexp $ans`
perl-5.32.0/Configure-4040- case $? in
##############################################
perl-5.32.0/Configure-4204-case "$ans" in
perl-5.32.0/Configure:4205:*?/) prefix=`echo "$ans" | sed 's/.$//'`
perl-5.32.0/Configure-4206- ;;
##############################################
perl-5.32.0/Configure-4210-case "$ansexp" in
perl-5.32.0/Configure:4211:*?/) prefixexp=`echo "$ansexp" | sed 's/.$//'`
perl-5.32.0/Configure-4212- ;;
##############################################
perl-5.32.0/Configure-4249- case "$installprefix" in
perl-5.32.0/Configure:4250: '') dflt=`echo $prefix | sed 's#^/afs/#/afs/.#'`;;
perl-5.32.0/Configure-4251- *) dflt="$installprefix";;
##############################################
perl-5.32.0/Configure-4279-if $test X"$prefix" != X"$installprefix"; then
perl-5.32.0/Configure:4280: eval "install${prefixvar}=\`echo \$${prefixvar}exp | sed \"s#^\$prefixexp#\$installprefixexp#\"\`"
perl-5.32.0/Configure-4281-else
##############################################
perl-5.32.0/Configure-4340-if $test -r $rsrc/patchlevel.h;then
perl-5.32.0/Configure:4341: revision=`awk '/define[ ]+PERL_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4342: patchlevel=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4343: subversion=`awk '/define[ ]+PERL_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4344: api_revision=`awk '/define[ ]+PERL_API_REVISION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4345: api_version=`awk '/define[ ]+PERL_API_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4346: api_subversion=`awk '/define[ ]+PERL_API_SUBVERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure:4347: perl_patchlevel=`egrep ',"(MAINT|SMOKE)[0-9][0-9]*"' $rsrc/patchlevel.h|tail -1|sed 's/[^0-9]//g'`
perl-5.32.0/Configure-4348-else
##############################################
perl-5.32.0/Configure-4361-0|'') ;;
perl-5.32.0/Configure:4362:*) perl_patchlevel=`echo $perl_patchlevel | sed 's/.* //'`
perl-5.32.0/Configure-4363- version_patchlevel_string="$version_patchlevel_string patch $perl_patchlevel"
##############################################
perl-5.32.0/Configure-4590- echo exit 0 >osf1
perl-5.32.0/Configure:4591:elif test `echo abc | $tr a-z A-Z` = Abc ; then
perl-5.32.0/Configure:4592: xxx=`./loc addbib blurfl $pth`
perl-5.32.0/Configure-4593- if $test -f $xxx; then
##############################################
perl-5.32.0/Configure-4685-if $cc -o try $ccflags $ldflags try.c; then
perl-5.32.0/Configure:4686: gccversion=`$run ./try`
perl-5.32.0/Configure-4687- case "$gccversion" in
##############################################
perl-5.32.0/Configure-4705-case "$gccversion" in
perl-5.32.0/Configure:4706:1.*) cpp=`./loc gcc-cpp $cpp $pth` ;;
perl-5.32.0/Configure-4707-esac
##############################################
perl-5.32.0/Configure-4709-'') gccosandvers='' ;;
perl-5.32.0/Configure:4710:*) gccshortvers=`echo "$gccversion"|sed 's/ .*//'`
perl-5.32.0/Configure:4711: gccosandvers=`$cc -v 2>&1|grep '/specs$'|sed "s!.*/[^-/]*-[^-/]*-\([^-/]*\)/$gccshortvers/specs!\1!"`
perl-5.32.0/Configure-4712- gccshortvers=''
##############################################
perl-5.32.0/Configure-4720- Your gcc has not been compiled for the exact release of
perl-5.32.0/Configure:4721: your operating system ($gccosandvers versus $osname$osvers).
perl-5.32.0/Configure-4722-
##############################################
perl-5.32.0/Configure-4751- if test "X$warn" != X; then
perl-5.32.0/Configure:4752: locincpth=`echo " $locincpth " | sed "s! $incdir ! !"`
perl-5.32.0/Configure-4753- fi
##############################################
perl-5.32.0/Configure-4982- $echo 'extern int foo;' > try.c
perl-5.32.0/Configure:4983: set X `$cppstdin -v try.c 2>&1 | $awk '/^#include </,/^End of search /'|$cppfilter $grep '/include'`
perl-5.32.0/Configure-4984- shift
##############################################
perl-5.32.0/Configure-4986- incpth="$incpth $*"
perl-5.32.0/Configure:4987: incpth="`$echo $incpth|$sed 's/^ //'`"
perl-5.32.0/Configure-4988- for i in $*; do
perl-5.32.0/Configure:4989: j="`$echo $i|$sed 's,/include$,/lib,'`"
perl-5.32.0/Configure-4990- if $test -d $j; then
##############################################
perl-5.32.0/Configure-4993- done
perl-5.32.0/Configure:4994: libpth="`$echo $libpth|$sed 's/^ //'`"
perl-5.32.0/Configure-4995- for xxx in $libpth $loclibpth $plibpth $glibpth; do
##############################################
perl-5.32.0/Configure-5103-'')
perl-5.32.0/Configure:5104: if xxx=`./loc libc.sl X $libpth`; $test -f "$xxx"; then
perl-5.32.0/Configure-5105- dflt='sl'
##############################################
perl-5.32.0/Configure-5302- if $test ! -f "$xxx" -a "X$ignore_versioned_solibs" = "X"; then
perl-5.32.0/Configure:5303: xxx=`ls $thisdir/lib$thislib.$so.[0-9] 2>/dev/null|sed -n '$p'`
perl-5.32.0/Configure-5304- $test -f "$xxx" && eval $libscheck
perl-5.32.0/Configure-5305- $test -f "$xxx" && libstyle=shared
perl-5.32.0/Configure:5306: xxx=`ls $thisdir/lib$thislib.[0-9].$so 2>/dev/null|sed -n '$p'`
perl-5.32.0/Configure-5307- $test -f "$xxx" && eval $libscheck
##############################################
perl-5.32.0/Configure-5345- libsfound="$libsfound $xxx"
perl-5.32.0/Configure:5346: yyy=`basename $xxx`
perl-5.32.0/Configure-5347- libsfiles="$libsfiles $yyy"
perl-5.32.0/Configure:5348: yyy=`echo $xxx|$sed -e "s%/$yyy\\$%%"`
perl-5.32.0/Configure-5349- case " $libsdirs " in
##############################################
perl-5.32.0/Configure-5427- case "$optimize" in
perl-5.32.0/Configure:5428: *-g*) set `echo "X $optimize " | sed 's/ -g / /'`
perl-5.32.0/Configure-5429- shift
##############################################
perl-5.32.0/Configure-5748- if $sh -c "$run ./try " >>try.msg 2>&1; then
perl-5.32.0/Configure:5749: xxx=`$run ./try`
perl-5.32.0/Configure-5750- case "$xxx" in
##############################################
perl-5.32.0/Configure-5825- if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/Configure:5826: eval `$run ./try`
perl-5.32.0/Configure-5827- echo "Your integers are $intsize bytes long."
##############################################
perl-5.32.0/Configure-5885- if eval $compile_ok; then
perl-5.32.0/Configure:5886: longlongsize=`$run ./try`
perl-5.32.0/Configure-5887- echo "Your long longs are $longlongsize bytes long."
##############################################
perl-5.32.0/Configure-5923- while $test \$# -gt 0; do
perl-5.32.0/Configure:5924: if $test $testaccess \`echo \$1 | $tr -d '"'\`; then
perl-5.32.0/Configure-5925- echo "\$pos"
##############################################
perl-5.32.0/Configure-5928- shift
perl-5.32.0/Configure:5929: pos=\`expr \$pos + 1\`
perl-5.32.0/Configure-5930- done
##############################################
perl-5.32.0/Configure-5963-while read cline; do
perl-5.32.0/Configure:5964: name=\`echo \$cline | $awk "\$awkprg" | $tr -d '"'\`
perl-5.32.0/Configure-5965- case "\$name" in
##############################################
perl-5.32.0/Configure-5992-while $test "$cont"; do
perl-5.32.0/Configure:5993: xxx=`./findhdr $1`
perl-5.32.0/Configure-5994- var=$2; eval "was=\$$2";
##############################################
perl-5.32.0/Configure-6296- if eval $compile_ok; then
perl-5.32.0/Configure:6297: libcquad=`$run ./try`
perl-5.32.0/Configure-6298- echo "Your C library's 64-bit functions are $libcquad."
##############################################
perl-5.32.0/Configure-6391- val="$define"
perl-5.32.0/Configure:6392: gnulibc_version=`$cat glibc.ver`
perl-5.32.0/Configure-6393- echo "You are using the GNU C Library version $gnulibc_version"
##############################################
perl-5.32.0/Configure-6424- case "$dflt" in
perl-5.32.0/Configure:6425: '') dflt=`$egrep 'inlibc|csym' $rsrc/Configure | wc -l 2>/dev/null`
perl-5.32.0/Configure-6426- if $test $dflt -gt 20; then
##############################################
perl-5.32.0/Configure-6501- case "$libs" in
perl-5.32.0/Configure:6502: *-lc_s*) libc=`./loc libc_s$_a $libc $libpth`
perl-5.32.0/Configure-6503- esac
##############################################
perl-5.32.0/Configure-6513- -l*)
perl-5.32.0/Configure:6514: thislib=`echo $thislib | $sed -e 's/^-l//'`
perl-5.32.0/Configure:6515: if try=`./loc lib$thislib.$so.'*' X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6516- :
perl-5.32.0/Configure:6517: elif try=`./loc lib$thislib.$so X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6518- :
perl-5.32.0/Configure:6519: elif try=`./loc lib$thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6520- :
perl-5.32.0/Configure:6521: elif try=`./loc $thislib$_a X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6522- :
perl-5.32.0/Configure:6523: elif try=`./loc lib$thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6524- :
perl-5.32.0/Configure:6525: elif try=`./loc $thislib X $libpth`; $test -f "$try"; then
perl-5.32.0/Configure-6526- :
perl-5.32.0/Configure:6527: elif try=`./loc Slib$thislib$_a X $xlibpth`; $test -f "$try"; then
perl-5.32.0/Configure-6528- :
##############################################
perl-5.32.0/Configure-6583-else
perl-5.32.0/Configure:6584: if tans=`./loc libc$_a blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/Configure-6585- :
perl-5.32.0/Configure:6586: elif tans=`./loc libc blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/Configure:6587: libnames="$libnames "`./loc clib blurfl/dyick $libpth`
perl-5.32.0/Configure:6588: elif tans=`./loc clib blurfl/dyick $libpth`; $test -r "$tans"; then
perl-5.32.0/Configure-6589- :
perl-5.32.0/Configure:6590: elif tans=`./loc Slibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/Configure-6591- :
perl-5.32.0/Configure:6592: elif tans=`./loc Mlibc$_a blurfl/dyick $xlibpth`; $test -r "$tans"; then
perl-5.32.0/Configure-6593- :
perl-5.32.0/Configure-6594- else
perl-5.32.0/Configure:6595: tans=`./loc Llibc$_a blurfl/dyick $xlibpth`
perl-5.32.0/Configure-6596- fi
##############################################
perl-5.32.0/Configure-6896- if eval $compile_ok; then
perl-5.32.0/Configure:6897: doublesize=`$run ./try`
perl-5.32.0/Configure-6898- echo "Your double is $doublesize bytes long."
##############################################
perl-5.32.0/Configure-6944- if eval $compile; then
perl-5.32.0/Configure:6945: longdblsize=`$run ./try`
perl-5.32.0/Configure-6946- echo "Your long doubles are $longdblsize bytes long."
##############################################
perl-5.32.0/Configure-7069-if eval $compile; then
perl-5.32.0/Configure:7070: longdblkind=`$run ./try`
perl-5.32.0/Configure-7071-else
##############################################
perl-5.32.0/Configure-7113-echo " "
perl-5.32.0/Configure:7114:if xxx=`./loc arch blurfl $pth`; $test -f "$xxx"; then
perl-5.32.0/Configure-7115- tarch=`arch`"-$osname"
perl-5.32.0/Configure:7116:elif xxx=`./loc uname blurfl $pth`; $test -f "$xxx" ; then
perl-5.32.0/Configure-7117- if uname -m > tmparch 2>&1 ; then
##############################################
perl-5.32.0/Configure-7135-'') ;;
perl-5.32.0/Configure:7136:*) archname=`echo $targetarch|sed 's,^[^-]*-,,'` ;;
perl-5.32.0/Configure-7137-esac
##############################################
perl-5.32.0/Configure-7275- /*-$oldprefix/*|\~*-$oldprefix/*)
perl-5.32.0/Configure:7276: eval "$1=\`echo \$$2 | sed \"s,^$oldprefix,$prefix,\"\`";;
perl-5.32.0/Configure-7277- *) eval "$1=\"\$$2\"";;
##############################################
perl-5.32.0/Configure-7372-"$prefix") ;;
perl-5.32.0/Configure:7373:*) eval "$1=\`echo \$$1 | sed \"s,^$prefixexp,$prefix,\"\`";;
perl-5.32.0/Configure-7374-esac'
##############################################
perl-5.32.0/Configure-7381-: privlib may have an optional trailing /share.
perl-5.32.0/Configure:7382:tdflt=`echo $privlib | $sed 's,/share$,,'`
perl-5.32.0/Configure-7383-tdflt=$tdflt/$archname
##############################################
perl-5.32.0/Configure-7537-case "$perl5" in
perl-5.32.0/Configure:7538:'') for tdir in `echo "$binexp$path_sep$PATH" | $sed "s/$path_sep/ /g"`; do
perl-5.32.0/Configure-7539- : Check if this perl is recent and can load a simple module
##############################################
perl-5.32.0/Configure-7597-: XXX No longer works with Prefixit stuff.
perl-5.32.0/Configure:7598:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/Configure-7599-case "$sitelib" in
##############################################
perl-5.32.0/Configure-7620-. ./setprefixvar
perl-5.32.0/Configure:7621:sitelib_stem=`echo "$sitelibexp" | sed "s,/$version$,,"`
perl-5.32.0/Configure-7622-
##############################################
perl-5.32.0/Configure-7680-'') if test -x "$perl5$exe_ext"; then
perl-5.32.0/Configure:7681: dflt=`$perl5 getverlist`
perl-5.32.0/Configure-7682- else
##############################################
perl-5.32.0/Configure-7775- if eval $compile_ok; then
perl-5.32.0/Configure:7776: ptrsize=`$run ./try`
perl-5.32.0/Configure-7777- echo "Your pointers are $ptrsize bytes long."
##############################################
perl-5.32.0/Configure-7860- echo "Removing unneeded -lmalloc from library list" >&4
perl-5.32.0/Configure:7861: set `echo X $libs | $sed -e 's/-lmalloc / /' -e 's/-lmalloc$//'`
perl-5.32.0/Configure-7862- shift
##############################################
perl-5.32.0/Configure-7922-case "$sitearch" in
perl-5.32.0/Configure:7923:'') dflt=`echo $sitelib | $sed 's,/share$,,'`
perl-5.32.0/Configure-7924- dflt="$dflt/$archname"
##############################################
perl-5.32.0/Configure-8015- '')
perl-5.32.0/Configure:8016: prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/Configure-8017- case "$installstyle" in
##############################################
perl-5.32.0/Configure-8031-esac
perl-5.32.0/Configure:8032:vendorlib_stem=`echo "$vendorlibexp" | sed "s,/$version$,,"`
perl-5.32.0/Configure-8033-prefixvar=vendorlib
##############################################
perl-5.32.0/Configure-8047- case "$vendorarch" in
perl-5.32.0/Configure:8048: '') dflt=`echo $vendorlib | $sed 's,/share$,,'`
perl-5.32.0/Configure-8049- dflt="$dflt/$archname"
##############################################
perl-5.32.0/Configure-8276-case "$html3dir" in
perl-5.32.0/Configure:8277:'') html3dir=`echo "$html1dir" | $sed 's/1$/3$/'` ;;
perl-5.32.0/Configure-8278-*) dflt=$html3dir ;;
##############################################
perl-5.32.0/Configure-8402- : emulate basename
perl-5.32.0/Configure:8403: dlsrc=`echo $ans | $sed -e 's%.*/\([^/]*\)$%\1%'`
perl-5.32.0/Configure-8404-
##############################################
perl-5.32.0/Configure-8884- syspath="$syspath /usr/man/man.L /local/man/man1 /usr/local/man/man1"
perl-5.32.0/Configure:8885: sysman=`./loc . /usr/man/man1 $syspath`
perl-5.32.0/Configure-8886- ;;
##############################################
perl-5.32.0/Configure-8918- case "$sysman" in
perl-5.32.0/Configure:8919: */?_man*) dflt=`./loc . $prefixexp/l_man/man1 $lookpath` ;;
perl-5.32.0/Configure:8920: *) dflt=`./loc . $prefixexp/man/man1 $lookpath` ;;
perl-5.32.0/Configure-8921- esac
##############################################
perl-5.32.0/Configure-9024-echo "If you don't want the manual sources installed, answer 'none'."
perl-5.32.0/Configure:9025:prog=`echo $package | $sed 's/-*[0-9.]*$//'`
perl-5.32.0/Configure-9026-case "$man3dir" in
perl-5.32.0/Configure:9027:'') dflt=`echo "$man1dir" | $sed -e 's/man1/man3/g' -e 's/man\.1/man\.3/g'`
perl-5.32.0/Configure-9028- if $test -d "$privlib/man/man3"; then
##############################################
perl-5.32.0/Configure-9163- echo 'Oh well, maybe I can mine it out of whoami.h...'
perl-5.32.0/Configure:9164: if tans=`sh -c $contains' sysname $usrinc/whoami.h' 2>&1` ; then
perl-5.32.0/Configure:9165: myhostname=`echo "$tans" | $sed 's/^.*"\(.*\)"/\1/'`
perl-5.32.0/Configure-9166- phostname="sed -n -e '"'/sysname/s/^.*\"\\(.*\\)\"/\1/{'"' -e p -e q -e '}' <$usrinc/whoami.h"
##############################################
perl-5.32.0/Configure-9208- echo "(Normalizing case in your host name)"
perl-5.32.0/Configure:9209: myhostname=`echo $myhostname | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/Configure-9210- ;;
##############################################
perl-5.32.0/Configure-9214-*.*)
perl-5.32.0/Configure:9215: dflt=`expr "X$myhostname" : "X[^.]*\(\..*\)"`
perl-5.32.0/Configure:9216: myhostname=`expr "X$myhostname" : "X\([^.]*\)\."`
perl-5.32.0/Configure-9217- echo "(Trimming domain name from host name--host name is now $myhostname)"
##############################################
perl-5.32.0/Configure-9237- $sed -n -e "s/$myhostname\.\([-a-zA-Z0-9_.]\)/\1/p"`
perl-5.32.0/Configure:9238: case `$echo X$dflt` in
perl-5.32.0/Configure-9239- X*\ *) echo "(Several hosts in the database matched hostname)"
##############################################
perl-5.32.0/Configure-9270- '') dflt='.';;
perl-5.32.0/Configure:9271: .nis.*|.yp.*|.main.*) dflt=`echo $dflt | $sed -e 's/^\.[^.]*//'`;;
perl-5.32.0/Configure-9272- esac
##############################################
perl-5.32.0/Configure-9276- .os390) echo "(Attempting domain name extraction from //'SYS1.TCPPARMS(TCPDATA)')"
perl-5.32.0/Configure:9277: dflt=.`awk '/^DOMAINORIGIN/ {print $2}' "//'SYS1.TCPPARMS(TCPDATA)'" 2>/dev/null`
perl-5.32.0/Configure-9278- ;;
##############################################
perl-5.32.0/Configure-9304- echo "(Normalizing case in your domain name)"
perl-5.32.0/Configure:9305: mydomain=`echo $mydomain | ./tr '[A-Z]' '[a-z]'`
perl-5.32.0/Configure-9306- ;;
##############################################
perl-5.32.0/Configure-9312-*)
perl-5.32.0/Configure:9313: case `$phostname | ./tr '[A-Z]' '[a-z]'` in
perl-5.32.0/Configure-9314- $myhostname$mydomain|$myhostname) ;;
##############################################
perl-5.32.0/Configure-9343- if $test -s /etc/mailname; then
perl-5.32.0/Configure:9344: maildomain=`$cat /etc/mailname`
perl-5.32.0/Configure-9345- else
##############################################
perl-5.32.0/Configure-9446- *) startperl="#!$ans"
perl-5.32.0/Configure:9447: if $test 30 -lt `echo "$ans" | wc -c`; then
perl-5.32.0/Configure-9448- $cat >&4 <<EOM
##############################################
perl-5.32.0/Configure-9548-case "$sitehtml1dir" in
perl-5.32.0/Configure:9549:'') dflt=`echo "$html1dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/Configure-9550-*) dflt=$sitehtml1dir ;;
##############################################
perl-5.32.0/Configure-9564-case "$sitehtml3dir" in
perl-5.32.0/Configure:9565:'') dflt=`echo "$html3dir" | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/Configure-9566-*) dflt=$sitehtml3dir ;;
##############################################
perl-5.32.0/Configure-9578-case "$siteman1dir" in
perl-5.32.0/Configure:9579:'') dflt=`echo $man1dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/Configure-9580-*) dflt=$siteman1dir ;;
##############################################
perl-5.32.0/Configure-9592-case "$siteman3dir" in
perl-5.32.0/Configure:9593:'') dflt=`echo $man3dir | $sed "s#^$prefix#$siteprefix#"` ;;
perl-5.32.0/Configure-9594-*) dflt=$siteman3dir ;;
##############################################
perl-5.32.0/Configure-9638-$define|true|[yY]*|'')
perl-5.32.0/Configure:9639: xversion=`awk '/define[ ]+PERL_VERSION/ {print $3}' $rsrc/patchlevel.h`
perl-5.32.0/Configure-9640- case "$xversion" in
##############################################
perl-5.32.0/Configure-9739-if eval $compile_ok; then
perl-5.32.0/Configure:9740: lseeksize=`$run ./try`
perl-5.32.0/Configure-9741- echo "Your file offsets are $lseeksize bytes long."
##############################################
perl-5.32.0/Configure-9777-if eval $compile_ok; then
perl-5.32.0/Configure:9778: yyy=`$run ./try`
perl-5.32.0/Configure-9779- case "$yyy" in
##############################################
perl-5.32.0/Configure-9857- if eval $compile_ok; then
perl-5.32.0/Configure:9858: lseeksize=`$run ./try`
perl-5.32.0/Configure-9859- $echo "Your file offsets are now $lseeksize bytes long."
##############################################
perl-5.32.0/Configure-9886- if eval $compile_ok; then
perl-5.32.0/Configure:9887: yyy=`$run ./try`
perl-5.32.0/Configure-9888- dflt="$lseeksize"
##############################################
perl-5.32.0/Configure-9944- case "$vendorhtml1dir" in
perl-5.32.0/Configure:9945: '') dflt=`echo "$html1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/Configure-9946- *) dflt=$vendorhtml1dir ;;
##############################################
perl-5.32.0/Configure-9972- case "$vendorhtml3dir" in
perl-5.32.0/Configure:9973: '') dflt=`echo "$html3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/Configure-9974- *) dflt=$vendorhtml3dir ;;
##############################################
perl-5.32.0/Configure-9997- case "$vendorman1dir" in
perl-5.32.0/Configure:9998: '') dflt=`echo "$man1dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/Configure-9999- *) dflt=$vendorman1dir ;;
##############################################
perl-5.32.0/Configure-10022- case "$vendorman3dir" in
perl-5.32.0/Configure:10023: '') dflt=`echo "$man3dir" | $sed "s#^$prefix#$vendorprefix#"` ;;
perl-5.32.0/Configure-10024- *) dflt=$vendorman3dir ;;
##############################################
perl-5.32.0/Configure-10173-if eval $compile; then
perl-5.32.0/Configure:10174: doublekind=`$run ./try`
perl-5.32.0/Configure-10175-else
##############################################
perl-5.32.0/Configure-10238- if eval $compile; then
perl-5.32.0/Configure:10239: yyy=`$run ./try`
perl-5.32.0/Configure-10240- case "$yyy" in
##############################################
perl-5.32.0/Configure-10260- if eval $compile; then
perl-5.32.0/Configure:10261: yyy=`$run ./try`
perl-5.32.0/Configure-10262- case "$yyy" in
##############################################
perl-5.32.0/Configure-10282- if eval $compile; then
perl-5.32.0/Configure:10283: yyy=`$run ./try`
perl-5.32.0/Configure-10284- case "$yyy" in
##############################################
perl-5.32.0/Configure-10304- if eval $compile; then
perl-5.32.0/Configure:10305: yyy=`$run ./try`
perl-5.32.0/Configure-10306- case "$yyy" in
##############################################
perl-5.32.0/Configure-10354- if eval $compile_ok; then
perl-5.32.0/Configure:10355: yyy=`$run ./try`
perl-5.32.0/Configure-10356- fi
##############################################
perl-5.32.0/Configure-10550- if test "$d_PRIgldbl" != "$define"; then
perl-5.32.0/Configure:10551: xxx_ld_list="`echo $xxx_ld_list|sed s/sprintf//` sprintf"
perl-5.32.0/Configure-10552- fi
##############################################
perl-5.32.0/Configure-10554- if test "$d_qgcvt" != "$define"; then
perl-5.32.0/Configure:10555: xxx_ld_list="`echo $xxx_ld_list|sed s/qgcvt//`"
perl-5.32.0/Configure-10556- fi
##############################################
perl-5.32.0/Configure-11611-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/Configure:11612: case "`$run ./try`" in
perl-5.32.0/Configure-11613- "123 456 789")
##############################################
perl-5.32.0/Configure-12078-for ENUM in MSG_CTRUNC MSG_DONTROUTE MSG_OOB MSG_PEEK MSG_PROXY SCM_RIGHTS; do
perl-5.32.0/Configure:12079: enum=`$echo $ENUM|./tr '[A-Z]' '[a-z]'`
perl-5.32.0/Configure-12080- $cat >try.c <<EOF
##############################################
perl-5.32.0/Configure-12127- else
perl-5.32.0/Configure:12128: cryptlib=`./loc Slibcrypt$_a "" $xlibpth`
perl-5.32.0/Configure-12129- if $test -z "$cryptlib"; then
perl-5.32.0/Configure:12130: cryptlib=`./loc Mlibcrypt$_a "" $xlibpth`
perl-5.32.0/Configure-12131- else
##############################################
perl-5.32.0/Configure-12134- if $test -z "$cryptlib"; then
perl-5.32.0/Configure:12135: cryptlib=`./loc Llibcrypt$_a "" $xlibpth`
perl-5.32.0/Configure-12136- else
##############################################
perl-5.32.0/Configure-12139- if $test -z "$cryptlib"; then
perl-5.32.0/Configure:12140: cryptlib=`./loc libcrypt$_a "" $libpth`
perl-5.32.0/Configure-12141- else
##############################################
perl-5.32.0/Configure-12619- $cc -o fred $ccflags $ldflags $cccdlflags $ccdlflags fred.c $libs > /dev/null 2>&1 && $to dyna.$dlext; then
perl-5.32.0/Configure:12620: xxx=`$run ./fred`
perl-5.32.0/Configure-12621- case $xxx in
##############################################
perl-5.32.0/Configure-13292- if eval $compile_ok; then
perl-5.32.0/Configure:13293: o_nonblock=`$run ./try`
perl-5.32.0/Configure-13294- case "$o_nonblock" in
##############################################
perl-5.32.0/Configure-13410- case $? in
perl-5.32.0/Configure:13411: 0) eagain=`$cat try.out`;;
perl-5.32.0/Configure-13412- 1) echo "Could not perform non-blocking setting!";;
##############################################
perl-5.32.0/Configure-13417- esac
perl-5.32.0/Configure:13418: rd_nodata=`$cat try.ret`
perl-5.32.0/Configure-13419- echo "A read() system call with no data present returns $rd_nodata."
##############################################
perl-5.32.0/Configure-13435- esac
perl-5.32.0/Configure:13436: status=`$cat try.err`
perl-5.32.0/Configure-13437- case "$status" in
##############################################
perl-5.32.0/Configure-13699- if eval $compile && $to try.c; then
perl-5.32.0/Configure:13700: case `$run ./try` in
perl-5.32.0/Configure-13701- Pass_changed)
##############################################
perl-5.32.0/Configure-14145-if eval $compile; then
perl-5.32.0/Configure:14146: `$run ./try`
perl-5.32.0/Configure-14147- rc=$?
##############################################
perl-5.32.0/Configure-14173-if eval $compile; then
perl-5.32.0/Configure:14174: `$run ./try`
perl-5.32.0/Configure-14175- case "$?" in
##############################################
perl-5.32.0/Configure-14508- shift
perl-5.32.0/Configure:14509: file=`./loc $file $file $pth`
perl-5.32.0/Configure:14510: aphostname=`echo $file $*`
perl-5.32.0/Configure-14511- ;;
##############################################
perl-5.32.0/Configure-14521- *)
perl-5.32.0/Configure:14522: echo "I'll use 'popen("'"'$aphostname'", "r")'"' to get your hostname." >&4
perl-5.32.0/Configure-14523- ;;
##############################################
perl-5.32.0/Configure-15990-if eval $compile; then
perl-5.32.0/Configure:15991: foo=`$run ./try`
perl-5.32.0/Configure-15992- echo "Yes, it does ($foo)" >&4
##############################################
perl-5.32.0/Configure-16598- if eval $compile; then
perl-5.32.0/Configure:16599: case "`$run ./try`" in
perl-5.32.0/Configure-16600- int16_t)
##############################################
perl-5.32.0/Configure-16640- if eval $compile; then
perl-5.32.0/Configure:16641: case "`$run ./try`" in
perl-5.32.0/Configure-16642- int32_t)
##############################################
perl-5.32.0/Configure-16719-if eval $compile; then
perl-5.32.0/Configure:16720: nv_preserves_uv_bits="`$run ./try`"
perl-5.32.0/Configure-16721-fi
##############################################
perl-5.32.0/Configure-16723-\-[1-9]*)
perl-5.32.0/Configure:16724: nv_preserves_uv_bits=`expr 0 - $nv_preserves_uv_bits`
perl-5.32.0/Configure-16725- $echo "Your NVs can preserve all $nv_preserves_uv_bits bits of your UVs." 2>&1
##############################################
perl-5.32.0/Configure-16790-if eval $compile; then
perl-5.32.0/Configure:16791: xxx="`$run ./try`"
perl-5.32.0/Configure-16792- case "$?" in
##############################################
perl-5.32.0/Configure-16903-if eval $compile; then
perl-5.32.0/Configure:16904: xxx="`$run ./try`"
perl-5.32.0/Configure-16905- case "$?" in
##############################################
perl-5.32.0/Configure-17072- $ls -l $try > reflect
perl-5.32.0/Configure:17073: if $contains /`basename $ls` reflect >/dev/null 2>&1; then
perl-5.32.0/Configure-17074- echo "You have $type-like $try."
##############################################
perl-5.32.0/Configure-17620- if eval $compile; then
perl-5.32.0/Configure:17621: xxx=`$run ./try`
perl-5.32.0/Configure-17622- case "$xxx" in
##############################################
perl-5.32.0/Configure-17692- if eval $compile; then
perl-5.32.0/Configure:17693: xxx=`$run ./try`
perl-5.32.0/Configure-17694- case "$xxx" in
##############################################
perl-5.32.0/Configure-18434- xxx=`./findhdr sys/user.h`
perl-5.32.0/Configure:18435: set `grep '_ruid;' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/Configure-18436- case $1 in
##############################################
perl-5.32.0/Configure-18658- if eval $compile; then
perl-5.32.0/Configure:18659: `$run ./try`
perl-5.32.0/Configure-18660- case "$?" in
##############################################
perl-5.32.0/Configure-18954- if eval $compile; then
perl-5.32.0/Configure:18955: case "`$run ./try`" in
perl-5.32.0/Configure-18956- yes) stdio_stream_array=$s; break ;;
##############################################
perl-5.32.0/Configure-19144- if eval $compile; then
perl-5.32.0/Configure:19145: yyy=`$run ./try`
perl-5.32.0/Configure-19146- case "$yyy" in
##############################################
perl-5.32.0/Configure-19229- if eval $compile; then
perl-5.32.0/Configure:19230: case "`$run ./try`" in
perl-5.32.0/Configure-19231- ok) echo "Your strtoul() seems to be working okay." ;;
##############################################
perl-5.32.0/Configure-19286- if eval $compile; then
perl-5.32.0/Configure:19287: case "`$run ./try`" in
perl-5.32.0/Configure-19288- ok) echo "Your strtoull() seems to be working okay." ;;
##############################################
perl-5.32.0/Configure-19341- if eval $compile; then
perl-5.32.0/Configure:19342: case "`$run ./try`" in
perl-5.32.0/Configure-19343- ok) echo "Your strtouq() seems to be working okay." ;;
##############################################
perl-5.32.0/Configure-19712- if eval $compile && $run ./try > /dev/null; then
perl-5.32.0/Configure:19713: dflt=`$run ./try`
perl-5.32.0/Configure-19714- case "$dflt" in
##############################################
perl-5.32.0/Configure-19954-if eval $compile; then
perl-5.32.0/Configure:19955: `$run ./try`
perl-5.32.0/Configure-19956- case "$?" in
##############################################
perl-5.32.0/Configure-19987-if eval $compile; then
perl-5.32.0/Configure:19988: `$run ./try`
perl-5.32.0/Configure-19989- case "$?" in
##############################################
perl-5.32.0/Configure-20027- if eval $compile_ok; then
perl-5.32.0/Configure:20028: dflt=`$run ./try`
perl-5.32.0/Configure-20029- else
##############################################
perl-5.32.0/Configure-20075- if eval $compile_ok; then
perl-5.32.0/Configure:20076: dflt=`$run ./try`
perl-5.32.0/Configure-20077- else
##############################################
perl-5.32.0/Configure-20205- echo 'Looks OK.' >&4
perl-5.32.0/Configure:20206: set `$run ./try 1`
perl-5.32.0/Configure-20207- db_version_major=$1
##############################################
perl-5.32.0/Configure-20216- echo "Removing unusable -ldb from library list" >&4
perl-5.32.0/Configure:20217: set `echo X $libs | $sed -e 's/-ldb / /' -e 's/-ldb$//'`
perl-5.32.0/Configure-20218- shift
##############################################
perl-5.32.0/Configure-20399-if eval $compile; then
perl-5.32.0/Configure:20400: doubleinfbytes=`$run ./try 1`
perl-5.32.0/Configure:20401: doublenanbytes=`$run ./try 2`
perl-5.32.0/Configure-20402- case "$d_longdbl" in
perl-5.32.0/Configure-20403- $define)
perl-5.32.0/Configure:20404: longdblinfbytes=`$run ./try 3`
perl-5.32.0/Configure:20405: longdblnanbytes=`$run ./try 4`
perl-5.32.0/Configure-20406- ;;
##############################################
perl-5.32.0/Configure-20554-if eval $compile; then
perl-5.32.0/Configure:20555: doublemantbits=`$run ./try`
perl-5.32.0/Configure-20556-else
##############################################
perl-5.32.0/Configure-20596-if eval $compile; then
perl-5.32.0/Configure:20597: longdblmantbits=`$run ./try`
perl-5.32.0/Configure-20598-else
##############################################
perl-5.32.0/Configure-20625- echo "Removing obsolete -Dmy_rand, -Dmy_srand, and -Drandbits from ccflags." >&4
perl-5.32.0/Configure:20626: ccflags="`echo $ccflags | sed -e 's/-Dmy_rand=random/ /'`"
perl-5.32.0/Configure:20627: ccflags="`echo $ccflags | sed -e 's/-Dmy_srand=srandom/ /'`"
perl-5.32.0/Configure:20628: ccflags="`echo $ccflags | sed -e 's/-Drandbits=[0-9][0-9]*/ /'`"
perl-5.32.0/Configure-20629- ;;
##############################################
perl-5.32.0/Configure-20831- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/Configure:20832: fflushNULL="`$cat try.out`"
perl-5.32.0/Configure-20833- else
##############################################
perl-5.32.0/Configure-20968- if $test -s try.out -a "X$code" = X42; then
perl-5.32.0/Configure:20969: fflushall="`$cat try.out`"
perl-5.32.0/Configure-20970- fi
##############################################
perl-5.32.0/Configure-21040- xxx=`./findhdr sys/user.h`
perl-5.32.0/Configure:21041: set `grep 'groups\[NGROUPS\];' "$xxx" 2>/dev/null` unsigned short
perl-5.32.0/Configure-21042- case $1 in
##############################################
perl-5.32.0/Configure-21077-if eval $compile_ok; then
perl-5.32.0/Configure:21078: yyy=`$run ./try`
perl-5.32.0/Configure-21079- case "$yyy" in
##############################################
perl-5.32.0/Configure-21111-if eval $compile; then
perl-5.32.0/Configure:21112: yyy=`$run ./try`
perl-5.32.0/Configure-21113- case "$yyy" in
##############################################
perl-5.32.0/Configure-21146- if eval $compile; then
perl-5.32.0/Configure:21147: yyy=`$run ./try`
perl-5.32.0/Configure-21148- case "$yyy" in
##############################################
perl-5.32.0/Configure-21168- if eval $compile; then
perl-5.32.0/Configure:21169: yyy=`$run ./try`
perl-5.32.0/Configure-21170- case "$yyy" in
##############################################
perl-5.32.0/Configure-21191- if eval $compile; then
perl-5.32.0/Configure:21192: yyy=`$run ./try`
perl-5.32.0/Configure-21193- case "$yyy" in
##############################################
perl-5.32.0/Configure-21213- if eval $compile; then
perl-5.32.0/Configure:21214: yyy=`$run ./try`
perl-5.32.0/Configure-21215- case "$yyy" in
##############################################
perl-5.32.0/Configure-21235- if eval $compile; then
perl-5.32.0/Configure:21236: yyy=`$run ./try`
perl-5.32.0/Configure-21237- case "$yyy" in
##############################################
perl-5.32.0/Configure-21257- if eval $compile; then
perl-5.32.0/Configure:21258: yyy=`$run ./try`
perl-5.32.0/Configure-21259- case "$yyy" in
##############################################
perl-5.32.0/Configure-21429-EOF
perl-5.32.0/Configure:21430: case "`$make -f testmake.mak 2>/dev/null`" in
perl-5.32.0/Configure-21431- *maketemp=*) make_set_make='#' ;;
##############################################
perl-5.32.0/Configure-21485-if eval $compile && $run ./try 2>&1 >/dev/null; then
perl-5.32.0/Configure:21486: case "`$run ./try`" in
perl-5.32.0/Configure-21487- "that's all right, then")
##############################################
perl-5.32.0/Configure-21512-
perl-5.32.0/Configure:21513:Checking to see what type of arguments are accepted by gethostbyaddr().
perl-5.32.0/Configure-21514-EOM
##############################################
perl-5.32.0/Configure-21524- case "$netdb_host_type" in
perl-5.32.0/Configure:21525: '') try="$extern_C struct hostent *gethostbyaddr($xxx, $yyy, int);"
perl-5.32.0/Configure-21526- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/Configure-21555- # prototype clash!
perl-5.32.0/Configure:21556: # netdb_host_type=`echo "$netdb_host_type" | sed 's/^const //'`
perl-5.32.0/Configure-21557-fi
##############################################
perl-5.32.0/Configure-21602-
perl-5.32.0/Configure:21603:Checking to see what type of 1st argument is accepted by getnetbyaddr().
perl-5.32.0/Configure-21604-EOM
##############################################
perl-5.32.0/Configure-21611- case "$netdb_net_type" in
perl-5.32.0/Configure:21612: '') try="$extern_C struct netent *getnetbyaddr($xxx, int);"
perl-5.32.0/Configure-21613- if ./protochk "$try" $hdrs; then
##############################################
perl-5.32.0/Configure-21789- if eval $compile; then
perl-5.32.0/Configure:21790: eval `$run ./try 2>/dev/null`
perl-5.32.0/Configure-21791- else
##############################################
perl-5.32.0/Configure-21869- if eval $compile; then
perl-5.32.0/Configure:21870: eval `$run ./try 2>/dev/null`
perl-5.32.0/Configure-21871- else
##############################################
perl-5.32.0/Configure-21929-case "$selectminbits" in
perl-5.32.0/Configure:21930:'') safebits=`expr $ptrsize \* 8`
perl-5.32.0/Configure-21931- case "$d_select" in
##############################################
perl-5.32.0/Configure-22001- if eval $compile_ok; then
perl-5.32.0/Configure:22002: selectminbits=`$run ./try 2>/dev/null`
perl-5.32.0/Configure-22003- case "$selectminbits" in
##############################################
perl-5.32.0/Configure-22213- : Now look at all the signal names, one at a time.
perl-5.32.0/Configure:22214: for xx in `echo $xxx | $tr ' ' $trnl | $sort | $uniq`; do
perl-5.32.0/Configure-22215- $cat > signal.c <<EOCP
##############################################
perl-5.32.0/Configure-22273- . ./signal_cmd
perl-5.32.0/Configure:22274: sig_count=`$awk '/^NSIG/ { printf "%d", $2 }' signal.lst`
perl-5.32.0/Configure-22275- sig_name=`$awk 'BEGIN { printf "ZERO " }
##############################################
perl-5.32.0/Configure-22302-}'
perl-5.32.0/Configure:22303:sig_size=`echo $sig_name | awk '{print NF}'`
perl-5.32.0/Configure-22304-$rm -f signal signal.c signal.awk signal.lst signal_cmd
##############################################
perl-5.32.0/Configure-22328-if eval $compile_ok; then
perl-5.32.0/Configure:22329: yyy=`$run ./try`
perl-5.32.0/Configure-22330- case "$yyy" in
##############################################
perl-5.32.0/Configure-22444-if eval $compile_ok && $run ./try > /dev/null; then
perl-5.32.0/Configure:22445: ssizetype=`$run ./try`
perl-5.32.0/Configure-22446- echo "I'll be using $ssizetype for functions returning a byte count." >&4
##############################################
perl-5.32.0/Configure-22480-if eval $compile_ok; then
perl-5.32.0/Configure:22481: val=`$run ./try`
perl-5.32.0/Configure-22482- case "$val" in
##############################################
perl-5.32.0/Configure-22512-if eval $compile; then
perl-5.32.0/Configure:22513: val=`$run ./try`
perl-5.32.0/Configure-22514- case "$val" in
##############################################
perl-5.32.0/Configure-22563-if eval $compile_ok; then
perl-5.32.0/Configure:22564: yyy=`$run ./try`
perl-5.32.0/Configure-22565- case "$yyy" in
##############################################
perl-5.32.0/Configure-22597-if eval $compile; then
perl-5.32.0/Configure:22598: yyy=`$run ./try`
perl-5.32.0/Configure-22599- case "$yyy" in
##############################################
perl-5.32.0/Configure-23171-EOF
perl-5.32.0/Configure:23172:for i in \`$cc -v -c tmp.c 2>&1 $postprocess_cc_v\`
perl-5.32.0/Configure-23173-do
##############################################
perl-5.32.0/Configure-23202- ccsymbols=''
perl-5.32.0/Configure:23203: cppsymbols=`$cat Cppsym.true`
perl-5.32.0/Configure:23204: cppsymbols=`echo $cppsymbols`
perl-5.32.0/Configure-23205- cppccsymbols="$cppsymbols"
##############################################
perl-5.32.0/Configure-23211- symbols='ones'
perl-5.32.0/Configure:23212: cppccsymbols=`$cat ccsym.com`
perl-5.32.0/Configure:23213: cppccsymbols=`echo $cppccsymbols`
perl-5.32.0/Configure-23214- $test "$silent" || sleep 1
##############################################
perl-5.32.0/Configure-23220- also='further '
perl-5.32.0/Configure:23221: cppsymbols=`$cat ccsym.cpp`
perl-5.32.0/Configure:23222: cppsymbols=`echo $cppsymbols`
perl-5.32.0/Configure-23223- $test "$silent" || sleep 1
##############################################
perl-5.32.0/Configure-23229- $sed -e 's/\(..*\)=.*/\1/' ccsym.own | $uniq >>Cppsym.true
perl-5.32.0/Configure:23230: ccsymbols=`$cat ccsym.own`
perl-5.32.0/Configure:23231: ccsymbols=`echo $ccsymbols`
perl-5.32.0/Configure-23232- $test "$silent" || sleep 1
##############################################
perl-5.32.0/Configure-23286- *) if ./Cppsym pyr; then
perl-5.32.0/Configure:23287: case "`$run /bin/universe`" in
perl-5.32.0/Configure-23288- ucb) if $test `./findhdr sgtty.h`; then
##############################################
perl-5.32.0/Configure-23486- *)
perl-5.32.0/Configure:23487: this_ext=`echo "$xxx" | $sed -e s/-/\\\//g`;
perl-5.32.0/Configure-23488- case "$this_ext" in
##############################################
perl-5.32.0/Configure-23537-shift
perl-5.32.0/Configure:23538:xs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/Configure-23539-set X $nonxs_extensions
perl-5.32.0/Configure-23540-shift
perl-5.32.0/Configure:23541:nonxs_extensions=`echo "$*" | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/Configure-23542-cd "$tdir"
perl-5.32.0/Configure:23543:known_extensions=`echo $nonxs_extensions $xs_extensions | tr ' ' $trnl | $sort | tr $trnl ' '`
perl-5.32.0/Configure-23544-
##############################################
perl-5.32.0/Configure-23859- cd "$rsrc/cpan"
perl-5.32.0/Configure:23860: for xxx in `ls Encode/*/Makefile.PL|awk -F/ '{print $2}'`; do
perl-5.32.0/Configure-23861- static_ext="$static_ext Encode/$xxx"
##############################################
perl-5.32.0/Configure-23897- $define|true|[yY]*)
perl-5.32.0/Configure:23898: set X `echo " $libs " | sed -e 's@ -lgdbm @ @' -e 's@ -lgdbm_compat @ @' -e 's@ -ldb @ @'`
perl-5.32.0/Configure-23899- shift
##############################################
perl-5.32.0/Configure-23957- eval temp=\$$file
perl-5.32.0/Configure:23958: eval $file=`basename $temp`
perl-5.32.0/Configure-23959- done
##############################################
perl-5.32.0/Configure-25194- $sort | $uniq -u >UU/oldsyms
perl-5.32.0/Configure:25195: set X `$cat UU/oldsyms`
perl-5.32.0/Configure-25196- shift
##############################################
perl-5.32.0/Configure-25203- echo ": Variables propagated from previous config.sh file." >>config.sh
perl-5.32.0/Configure:25204: for sym in `$cat UU/oldsyms`; do
perl-5.32.0/Configure-25205- echo " Propagating $hint variable "'$'"$sym..."
##############################################
perl-5.32.0/dump.c-2573- PERL_DTRACE_PROBE_OP(PL_op);
perl-5.32.0/dump.c:2574: } while ((PL_op = PL_op->op_ppaddr(aTHX)));
perl-5.32.0/dump.c-2575- DEBUG_l(Perl_deb(aTHX_ "leaving RUNOPS level\n"));