From c73cbe96990ae8c671041ca97d0785a46db76375 Mon Sep 17 00:00:00 2001
From: Guillermo Ramos
Date: Sun, 30 Jun 2019 13:48:51 +0200
Subject: Stricter token regex

---
 lib/TgLib.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/TgLib.pm b/lib/TgLib.pm
index 0fcae6c..7631604 100644
--- a/lib/TgLib.pm
+++ b/lib/TgLib.pm
@@ -13,7 +13,7 @@ sub fetch_token {
         chomp $token;
         close $cfg;
     }
-    $token =~ /^[0-9]+:[a-zA-Z0-9_-]+$/ or die "Invalid bot token ($token)";
+    $token =~ /^[0-9]{9}:[a-zA-Z0-9_-]{35}$/ or die "Invalid bot token ($token)";
     return $token;
 }
 
-- 
cgit v1.2.3