From 6bf10ae779afdb335730eafc4612d1ec0b71a4f0 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 29 Jan 2003 15:35:00 +0000 Subject: add "$." --- perl_checker.src/global_checks.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl_checker.src/global_checks.ml b/perl_checker.src/global_checks.ml index 9f47b6a..f94309a 100644 --- a/perl_checker.src/global_checks.ml +++ b/perl_checker.src/global_checks.ml @@ -114,7 +114,7 @@ let is_global_var context ident = match context with | I_scalar -> (match ident with - | "@" | "!" | ">" | "\\" | "$" | "^A" | "'" | "/" | "?" | "<" | "^W" | "|" | "^I" | "&" + | "@" | "!" | ">" | "\\" | "$" | "^A" | "'" | "/" | "?" | "<" | "^W" | "|" | "^I" | "&" | "." | "0" | "1" | "2" | "3" | "4" | "5" | "6" | "7" | "8" | "9" -> true | _ -> false) | I_array -> -- cgit v1.2.1