Fixed chomp.
This commit is contained in:
1 parent
789d7fe5d0
commit
8e807bf6b4
1 file changed
+1
-1
@@ -18,7 +18,7 @@ eval 'exec perl -S $0 ${1+"$@"}' # -*- Mode: perl -*-
|
||||
|
||||
while ($line = <STDIN>)
|
||||
{
|
||||
chomp $line;
|
||||
chomp;
|
||||
next if ($line =~ /__?GLOBAL_.F.+/);
|
||||
next if ($line =~ /__?GLOBAL_.I._GLOBAL_.D.+/);
|
||||
if ($line =~ /__?GLOBAL_.D.+/) {
|
||||
|
||||
Reference in new issue
Block a user