Allow -C on the #! line when it is identical to -C on the command line.

Change from dieing whenever -C is seen on the #! line, to dieing only when it
differs from that on the command line, or was not specified on the command line.

1 files changed, 9 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index 885027ee79..56e9620c69 100644
--- a/toke.c
+++ b/toke.c
@@ -3999,7 +3999,15 @@ Perl_yylex(pTHX)
 			const char *d1 = d;
 
 			do {
-			    if (*d1 == 'M' || *d1 == 'm' || *d1 == 'C') {
+			    bool baduni = FALSE;
+			    if (*d1 == 'C') {
+				const char *d2 = d1;
+				d2++;
+				parse_unicode_opts( (const char **)&d2 )
+				     == PL_unicode
+				    || (baduni = TRUE);
+			    }
+			    if (baduni || *d1 == 'M' || *d1 == 'm') {
 				const char * const m = d1;
 				while (*d1 && !isSPACE(*d1))
 				    d1++;