# of the release process (namely, Porting\corelist.pl and generating the commit
# statistics for the perlXYZdelta.pod file respectively). Finally, ensure that
# the 'awk' and 'shasum' commands are copies of gawk.exe and sha1sum.exe
-# respectively, rather the links to them that only work in a Cygwin bash shell
-# which they are by default.
+# respectively, rather than the links to them that only work in a Cygwin bash
+# shell which they are by default.
#
# No matter how automated this gets, you'll always need to read
# and re-read pumpkin.pod and release_managers_guide.pod to
-r rootdir directory under which to create the build dir and tarball
defaults to '..'
-s suffix suffix to append to to the perl-x.y.z dir and tarball name
- defaults to the concatenaion of the local_patches entry
+ defaults to the concatenation of the local_patches entry
in patchlevel.h (or blank, if none)
-b make a .bz2 file in addtion to a .gz file
-n do not make any tarballs, just the directory
chdir "$relroot/$reldir" or die $!;
-my $SEARCH_ROOTS = 't ext lib dist cpan';
-
print "Setting file permissions...\n";
system("find . -type f -print | xargs chmod 0444");
system("find . -type d -print | xargs chmod 0755");
-system("find $SEARCH_ROOTS -name '*.t' -print | xargs chmod +x");
-system("find $SEARCH_ROOTS -name 'test.pl' -print | xargs chmod +x");
-my @exe = map { my ($f) = split; glob($f) }
+my @exe = map { my ($f) = split; glob($f) }
grep { $_ !~ /\A#/ && $_ !~ /\A\s*\z/ }
map { split "\n" }
do { local (@ARGV, $/) = 'Porting/exec-bit.txt'; <> };
NetWare/config_H.wc
NetWare/Makefile
keywords.h
+ keywords.c
opcode.h
opnames.h
pp_proto.h
- pp.sym
proto.h
embed.h
embedvar.h
utils/Makefile
uconfig.h
);
-system("chmod +w @writables") == 0
+system("chmod u+w @writables") == 0
or die "system: $!";
chdir ".." or die $!;