-

telegram.pl

@@ -89,7 +89,7 @@ post "/:token" => sub
   my $m = $body->{message};
   
   my $chatid = $m->{chat}->{id};
-  my $from = $m->{from}->{first_name} . " " . $m->{from}->{last_name} . " (" . $m->{from}->{username} . ")";
+  my $from = ($m->{from}->{first_name}||"") . " " . ($m->{from}->{last_name}||"") . " (" . ($m->{from}->{username}||"") . ")";
   my $cmd = $m->{text};
   my $msgid = $m->{message_id};
   
@@ -162,7 +162,7 @@ sub command::my_id
   my $chatid = shift;
   my $rest = shift;
   
-  notify($chatid,"Ваш идентификатор в Телеграме: *$chatid*\nУстановите его в личном кабинете", $rest);
+  notify($chatid,"Ваш идентификатор в Телеграме: *$chatid*", $rest);
 }
 
 sub command::start