ucfirst() new signature diagnostic messages

e.g.

    a slurpy parameter may not have a default value
=>
    A slurpy parameter may not have a default value

Also, split the "Too %s arguments for subroutine" diagnostic into
separate "too few" and "too many" entries in perldiag.

Based on suggestions by Father Chrysostomos.

1 files changed, 2 insertions, 2 deletions

diff --git a/toke.c b/toke.c
index 74313dc459..663e591549 100644
--- a/toke.c
+++ b/toke.c
@@ -4827,7 +4827,7 @@ Perl_yylex(pTHX)
         case '%':
             /* spot stuff that looks like an prototype */
             if (strchr("$:@%&*;\\[]", *s)) {
-                yyerror("illegal character following sigil in a subroutine signature");
+                yyerror("Illegal character following sigil in a subroutine signature");
                 break;
             }
             /* '$#' is banned, while '$ # comment' isn't */
@@ -4857,7 +4857,7 @@ Perl_yylex(pTHX)
             break;
 
         default:
-            yyerror("a signature parameter must start with '$', '@' or '%'");
+            yyerror("A signature parameter must start with '$', '@' or '%'");
             /* very crude error recovery: skip to likely next signature
              * element */
             while (*s && *s != '$' && *s != '@' && *s != '%' && *s != ')')