[gtksourceview] perl: fix highlight for filetest (bug #594501)

[David Miguel Susano Pinto <davidpinto src gnome org>]

commit 67037f1198b9f23fa0f4c045a96464c633fcaf97
Author: Alex Mayer <magictrick4906 aim com>
Date:   Fri Mar 29 18:26:17 2013 +0000

    perl: fix highlight for filetest (bug #594501)

 data/language-specs/perl.lang |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)
---
diff --git a/data/language-specs/perl.lang b/data/language-specs/perl.lang
index f02f00b..3658ee9 100644
--- a/data/language-specs/perl.lang
+++ b/data/language-specs/perl.lang
@@ -93,6 +93,7 @@ FIXME: =pod should require an empty line before/after, as written in perlpod
     </context>
 
     <define-regex id="operator" extended="true">
+      \-[rwxoRWXOezsfdlpSbctugkTBMAC](?=\s) |
       \-&gt; |
       \+\+ | \-\- |
       \*\* |