From a4477e43c22864f6ef7e8244a5fcaa8cb4aa0f5f Mon Sep 17 00:00:00 2001
From: Omar Ashour <omar.ashour22@gmail.com>
Date: Wed, 10 Apr 2024 20:21:48 -0700
Subject: [PATCH] Fix comment regex

---
 texprlcount.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/texprlcount.pl b/texprlcount.pl
index 93b7d25..30b4f22 100755
--- a/texprlcount.pl
+++ b/texprlcount.pl
@@ -83,7 +83,7 @@ (&@)
 close $texfileh;
 
 # We strip comments from the tex file
-$texfile =~ s/[^\\]%[^\n]*//g;
+$texfile =~ s/(?<!\\)%.*//g;
 
 # We count the number of characters in the abstract
 my $abstract;