skip false positives - draft function

htrgouvea · Mar 29, 2024 · 22367a2 · 22367a2
1 parent 5dfc632
commit 22367a2
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/lib/Zarn/AST.pm b/lib/Zarn/AST.pm
@@ -5,7 +5,7 @@ package Zarn::AST {
     use PPI::Find;
     use PPI::Document;
 
-    our $VERSION = '0.0.2';
+    our $VERSION = '0.0.3';
 
     sub new {
         my ($self, $parameters) = @_;
@@ -41,6 +41,12 @@ package Zarn::AST {
                             );
 
                             if ($var_token && $var_token -> can("parent")) {
+                                my @childrens = $var_token -> parent -> children;
+
+                                if (grep {$_ -> isa("PPI::Token::Quote::Double")} @childrens) {
+                                    next;
+                                }
+
                                 if ((
                                     $var_token -> parent -> isa("PPI::Token::Operator") ||
                                     $var_token -> parent -> isa("PPI::Statement::Expression")