Cistka trackeru google

lib/PZ/Helpers/Core.pm

@@ -5,6 +5,16 @@ use base 'Mojolicious::Plugin';
 use YAML;
 use Mojo::URL;
 
+use constant TRACKERS => [qw(
+    fbclid
+    gclid
+    utm_medium
+    utm_source
+    utm_campaign
+    utm_content
+    utm_term
+)];
+
 sub register  {
     my ($class, $self ) = @_;
 
@@ -92,8 +102,10 @@ sub register  {
         my $c   = shift;
 
         my $url = Mojo::URL->new(shift);
-        $url->query({ fbclid => undef });
 
+        foreach my $tracker ( @{ TRACKERS() }) {
+            $url->query({ $tracker => undef });
+        }
         return $url->to_string;
     });