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);