diff options
| -rw-r--r-- | perl_checker.src/global_checks.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker.src/global_checks.ml b/perl_checker.src/global_checks.ml index f325d32..5875dce 100644 --- a/perl_checker.src/global_checks.ml +++ b/perl_checker.src/global_checks.ml @@ -164,7 +164,7 @@ let is_global_var context ident = | _ -> false) | I_star -> (match ident with - | "STDIN" | "STDOUT" | "STDERR" + | "STDIN" | "STDOUT" | "STDERR" | "DATA" | "__FILE__" | "__LINE__" | "undef" -> true | _ -> false) | I_func -> |