From f7ecdb870f6e1ffd9c0840262ac0ff9d6d25d7a6 Mon Sep 17 00:00:00 2001
From: eleksir <eleksir@exs-elm.ru>
Date: Sun, 6 Sep 2020 15:03:49 +0300
Subject: [PATCH] =?UTF-8?q?Add=20pong=20and=20=D0=BF=D0=BE=D0=BD=D0=B3=20r?=
 =?UTF-8?q?eplies.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/telegrambot.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lib/telegrambot.pm b/lib/telegrambot.pm
index d6f6d20..26ee442 100644
--- a/lib/telegrambot.pm
+++ b/lib/telegrambot.pm
@@ -87,6 +87,10 @@ sub __on_msg {
 				$reply = "Pong.";
 			} elsif (substr($text, 1) eq "пинг") {
 				$reply = "Понг.";
+			} elsif (substr($text, 1) eq "pong") {
+				$reply = "Wat?";
+			} elsif (substr($text, 1) eq "понг") {
+				$reply = "Шта?";
 			} elsif (substr($text, 1, 2) eq 'w ' || substr($text, 1, 2) eq 'п ') {
 				my $city = substr($text, 3);
 				$reply = weather($city);