In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/228c57794c695d2315262e4d5de68a312ebff220?hp=9afd62035da781127f09672a85cd363e6aecc44f>

- Log -----------------------------------------------------------------
commit 228c57794c695d2315262e4d5de68a312ebff220
Author: Shlomi Fish <[email protected]>
Date:   Tue Sep 18 19:55:36 2012 +0300

    Add missing articles.

M       pod/perldebug.pod

commit 8ed35a78b521ab48e2c7149869057e144891f1fd
Author: Ricardo Signes <[email protected]>
Date:   Mon Sep 17 11:55:03 2012 -0400

    make perlhist_calculate.pl emit ready-to-use text
    
    format the data for the line in a line (and right now that line matches
    up with the lines in the current table)
    
    format the table in a table so that you can block-select it and paste
    into the file
    
    the last two edits were done by hand, which was a drag

M       Porting/perlhist_calculate.pl

commit bd4ce90752c011156eedb0f4d266d86e09b633f3
Author: Ricardo Signes <[email protected]>
Date:   Mon Sep 17 11:17:14 2012 -0400

    add Porting/perlhist_calculate.pl to RMG

M       Porting/release_managers_guide.pod

commit df96c2dd43dd2c772034919ba71f08e4ffd878c5
Author: Ricardo Signes <[email protected]>
Date:   Mon Sep 17 11:08:07 2012 -0400

    add 5.16.0 sizes and filecounts to perlhist
    
    running and using the output of Porting/perlhist_calculate.pl
    has not been done regularly, presumably because I had no idea
    that it existed!

M       pod/perlhist.pod

commit ae583030d682deeec101d76dc7175c1eeca07b9e
Author: Ricardo Signes <[email protected]>
Date:   Mon Sep 17 11:08:07 2012 -0400

    add 5.14.0 sizes and filecounts to perlhist
    
    running and using the output of Porting/perlhist_calculate.pl
    has not been done regularly, presumably because I had no idea
    that it existed!

M       pod/perlhist.pod

commit 4bed48067e31ccf8af2001278b0632e092543484
Author: Ricardo Signes <[email protected]>
Date:   Mon Sep 17 11:07:15 2012 -0400

    update the release schedule
    
    October is now up in the air, probably rjbs.
    
    Dominic is working on 5.14.3

M       Porting/release_schedule.pod
-----------------------------------------------------------------------

Summary of changes:
 Porting/perlhist_calculate.pl      |   36 +++++++++++++++--------
 Porting/release_managers_guide.pod |    4 ++
 Porting/release_schedule.pod       |    4 +-
 pod/perldebug.pod                  |    2 +-
 pod/perlhist.pod                   |   54 ++++++++++++++++++-----------------
 5 files changed, 58 insertions(+), 42 deletions(-)

diff --git a/Porting/perlhist_calculate.pl b/Porting/perlhist_calculate.pl
index 55a4ce3..8cbc3d9 100755
--- a/Porting/perlhist_calculate.pl
+++ b/Porting/perlhist_calculate.pl
@@ -9,6 +9,12 @@ use File::Find;
 use warnings;
 use strict;
 
+sub emit {
+  my $H = '%-9s:';
+  my $D = '%6d';
+  printf "$H $D $D\n", @_;
+}
+
 sub calc_core {
 
        my @core;
@@ -24,7 +30,7 @@ sub calc_core {
        my $corenumber = scalar @core;
        $coresize = int $coresize;
 
-       say "core: $coresize $corenumber";
+  return $coresize, $corenumber;
 }
 
 sub calc_lib {
@@ -40,7 +46,7 @@ sub calc_lib {
        find(\&wanted_lib, 'lib');
        $libsize = int $libsize;
 
-       say "lib: $libsize $libnumber";
+  return $libsize, $libnumber;
 }
 
 sub calc_ext {
@@ -61,7 +67,7 @@ sub calc_ext {
 
        $extsize = int $extsize;
 
-       say "ext: $extsize $extnumber";
+  return $extsize, $extnumber;
 }
 
 sub calc_t {
@@ -78,7 +84,7 @@ sub calc_t {
 
        $tsize = int $tsize;
 
-       say "t: $tsize $tnumber";
+  return $tsize, $tnumber;
 }
 
 sub calc_doc {
@@ -105,7 +111,7 @@ sub calc_doc {
 
        $docsize = int $docsize;
 
-       say "doc: $docsize $docnumber";
+  return $docsize, $docnumber;
 }
 
 sub calc_dir {
@@ -125,13 +131,13 @@ sub calc_dir {
 
        $dirsize = int $dirsize;
 
-       say "$dir: $dirsize $dirnumber";
+  emit $dir => $dirsize, $dirnumber;
 }
 
 
 sub calc_longtable {
 
-       print "\n\nTable\n";
+       print "\n\nTable:\n";
 
        foreach my $dir (qw(beos)) {
                calc_dir($dir);
@@ -139,7 +145,7 @@ sub calc_longtable {
 
        my $configure_size = int ((-s 'Configure') / 1000);
 
-       say "Configure: $configure_size 1";
+       emit Configure => $configure_size, 1;
 
        foreach my $dir (qw(Cross djgpp emacs epoc h2pl hints mad mint mpeix 
NetWare os2 plan9 Porting qnx symbian utils vms vos win32 x2p)) {
                calc_dir($dir);
@@ -149,11 +155,15 @@ sub calc_longtable {
 say "Selected release sizes for perl tarball:";
 print "\n";
 
-calc_core();
-calc_lib();
-calc_ext();
-calc_t();
-calc_doc();
+ #5.16.0         5562 109   1077  80  20504 2702   8750 2375   4815 152
+
+sub calc_line {
+  printf " %-12s %6s %3s %6s %3s %6s %4s %6s %4s %6s %3s\n",
+    '5.xx.0', calc_core(), calc_lib(), calc_ext(), calc_t(), calc_doc();
+}
+
+calc_line();
+
 calc_longtable();
 
 exit;
diff --git a/Porting/release_managers_guide.pod 
b/Porting/release_managers_guide.pod
index 51adc3a..b3460c2 100644
--- a/Porting/release_managers_guide.pod
+++ b/Porting/release_managers_guide.pod
@@ -651,6 +651,10 @@ if this is the first release under the stewardship of a 
new pumpking, make
 sure that his or her name is listed in the section entitled
 C<THE KEEPERS OF THE PUMPKIN>.
 
+I<If you're making a BLEAD-POINT release>, also update the "SELECTED
+RELEASE SIZES" section with the output of
+F<Porting/perlhist_calculate.pl>.
+
 Be sure to commit your changes:
 
     $ git commit -m 'add new release to perlhist' pod/perlhist.pod
diff --git a/Porting/release_schedule.pod b/Porting/release_schedule.pod
index 3a87455..dab380d 100644
--- a/Porting/release_schedule.pod
+++ b/Porting/release_schedule.pod
@@ -41,7 +41,7 @@ Release schedule (with release managers):
   2011-05-14  5.14.0 (final)  Jesse Vincent
   2011-06-16  5.14.1 ✓        Jesse Vincent
   2011-09-14  5.14.2 ✓        Florian Ragwitz
-  2012-0?-??  5.14.3          Ricardo Signes
+  2012-0?-??  5.14.3          Dominic Hargreaves
   ????-??-??  5.14.4          ??
 
 =head1 DEVELOPMENT RELEASE SCHEDULE
@@ -65,7 +65,7 @@ you should reset the version numbers to the next blead series.
   2012-07-20  5.17.2          Tony Cook
   2012-08-20  5.17.3          Steve Hay
   2012-09-20  5.17.4          Florian Ragwitz
-  2012-10-20  5.17.5          Max Maischein
+  2012-10-20  5.17.5          ?
   2012-11-20  5.17.6          Abigail
   2012-12-18  5.17.7          Dave Rolsky
   2013-01-20  5.17.8
diff --git a/pod/perldebug.pod b/pod/perldebug.pod
index 4a2f07e..d177c11 100644
--- a/pod/perldebug.pod
+++ b/pod/perldebug.pod
@@ -683,7 +683,7 @@ either interactively or from the environment or an rc file.
 X<debugger option, recallCommand>
 X<debugger option, ShellBang>
 
-The characters used to recall command or spawn shell.  By
+The characters used to recall a command or spawn a shell.  By
 default, both are set to C<!>, which is unfortunate.
 
 =item C<pager>
diff --git a/pod/perlhist.pod b/pod/perlhist.pod
index fc74286..d83906c 100644
--- a/pod/perlhist.pod
+++ b/pod/perlhist.pod
@@ -564,6 +564,8 @@ explained below.
  5.12.1         5000 100   1146 121  15283 2178   6407 1846   5354 169
  5.12.2         5003 100   1146 121  15404 2178   6413 1846   5376 170
  5.12.3         5004 100   1146 121  15529 2180   6417 1848   5391 171
+ 5.14.0         5328 104   1100 114  17779 2479   7697 2130   5871 188
+ 5.16.0         5562 109   1077  80  20504 2702   8750 2375   4815 152
 
 The "core"..."doc" mean the following files from the Perl source code
 distribution.  The glob notation ** means recursively, (.) means
@@ -839,32 +841,32 @@ the Perl source distribution for somewhat more selected 
releases.
 
  ======================================================================
 
-                  5.12.2     5.12.3
-
- apollo          0    3     0    3
- beos            4    4     4    4
- Configure     536    1   536    1
- Cross         118   15   118   15
- djgpp          17    7    17    7
- emacs         402    4   402    4
- epoc           31    8    31    8
- h2pl           12   15    12   15
- hints         368   97   368   97
- mad           174    8   174    8
- mpeix          45    6    45    6
- NetWare       466   61   466   61
- os2           507   70   507   70
- plan9         316   17   316   17
- Porting       750   54   750   54
- qnx             1    4     1    4
- symbian       288   54   288   54
- utils         269   27   269   27
- uts             8    3     8    3
- vmesa          21    4    21    4
- vms           646   18   644   18
- vos            16    8    16    8
- win32        1841   73  1841   73
- x2p           345   19   345   19
+                  5.12.2     5.12.3     5.14.0     5.16.0
+
+ apollo          0    3     0    3      -    -     -    -
+ beos            4    4     4    4      5    4     5    4
+ Configure     536    1   536    1    539    1   547    1
+ Cross         118   15   118   15    118   15   118   15
+ djgpp          17    7    17    7     18    7    18    7
+ emacs         402    4   402    4      -    -     -    -
+ epoc           31    8    31    8     32    8    30    8
+ h2pl           12   15    12   15     15   15    15   15
+ hints         368   97   368   97    370   96   371   96
+ mad           174    8   174    8    176    8   176    8
+ mpeix          45    6    45    6     46    6    46    6
+ NetWare       466   61   466   61    473   61   472   61
+ os2           507   70   507   70    518   70   519   70
+ plan9         316   17   316   17    319   17   319   17
+ Porting       750   54   750   54    855   60  1093   69
+ qnx             1    4     1    4      2    4     2    4
+ symbian       288   54   288   54    292   54   292   54
+ utils         269   27   269   27    249   29   245   30
+ uts             8    3     8    3      9    3     9    3
+ vmesa          21    4    21    4     22    4    22    4
+ vms           646   18   644   18    639   17   571   15
+ vos            16    8    16    8     17    8     9    7
+ win32        1841   73  1841   73   1833   72  1655   67
+ x2p           345   19   345   19    346   19   345   19
 
 =head2 SELECTED PATCH SIZES
 

--
Perl5 Master Repository

Reply via email to