diff --git a/mode/perl.py b/mode/perl.py
index 833f084..cc83d94 100644
--- a/mode/perl.py
+++ b/mode/perl.py
@@ -65,6 +65,7 @@ scalar_rules = [
     PatternRule('perl.scalar', r'\$\^(?:' + word1 + '|' + wchr1 + ')'),
     PatternRule('perl.scalar', r'\$\^O'),
     PatternRule('perl.scalar', r'\${\^' + word1 + '}'),
+    PatternRule('perl.hash', r'\$' + word2),
 ]
 
 def _make_string_rules(forbidden):