From 26f55801b38140644601cc08c5842d13d35db407 Mon Sep 17 00:00:00 2001 From: Leon Timmermans Date: Sun, 17 Jul 2016 16:54:19 +0200 Subject: [PATCH] Revert "Respect hashbangs containing perl6" This reverts commit d9fc04eebe29b8cf5f6f6bf31373b202eafa44d6. As discussed in http://www.nntp.perl.org/group/perl.perl5.porters/2016/05/msg236423.html, the current perl6-shebang code has rather sharp edge-cases. Hence a revert until we come up with a better solution seems wise. (cherry picked from commit f691e4455dd520eff11e7f070a9b034b0fa5ca1c) --- toke.c | 2 -- 1 file changed, 2 deletions(-) diff --git a/toke.c b/toke.c index cf3163e..ee18153 100644 --- a/toke.c +++ b/toke.c @@ -5396,8 +5396,6 @@ Perl_yylex(pTHX) d = instr(s,"perl -"); if (!d) { d = instr(s,"perl"); - if (d && d[4] == '6') - d = NULL; #if defined(DOSISH) /* avoid getting into infinite loops when shebang * line contains "Perl" rather than "perl" */ -- 1.8.3.1