From fc0309f79bdf73f1d51a3d5d4e41c2bb6ee40118 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 10 May 2022 14:41:28 +0200
Subject: [PATCH 1/1] support 09 and +3859 numbers

---
 pg-listen-zc.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pg-listen-zc.pl b/pg-listen-zc.pl
index eddbaa0..7557cf0 100755
--- a/pg-listen-zc.pl
+++ b/pg-listen-zc.pl
@@ -78,7 +78,7 @@ while (1) {
 					while(<$cfg>) {
 						chomp;
 						my $email = $_;
-						my $number = $1 if $email =~ s{\s+0([0-9]+)$}{};
+						my $number = $1 if $email =~ s{\s+(?:\+385|0)([0-9]+)$}{};
 						$number = '+385' . $number;
 
 						print ts,"ALERT $email\n";
-- 
2.20.1