diff --git a/lib/fisher.pm b/lib/fisher.pm
index 5d16c94..940b1b9 100644
--- a/lib/fisher.pm
+++ b/lib/fisher.pm
@@ -99,12 +99,12 @@ sub fish {
 		'на крышу дома',
 	);
 
-	my @material = {
+	my @material = (
 		'бамбуковую',
 		'фиберглассовую',
 		'карбоновую',
 		'композитную',
-	}
+	);
 
 	my $find_probability = irand 100;
 	my $success_probability = irand 100;
diff --git a/lib/telegrambot.pm b/lib/telegrambot.pm
index 4a5ff89..3e6875a 100644
--- a/lib/telegrambot.pm
+++ b/lib/telegrambot.pm
@@ -114,7 +114,7 @@ sub __on_msg {
 		my @members = '';
 
 		foreach my $member (@{$msg->new_chat_members}) {
-			$member_str = '[';
+			my $member_str = '[';
 
 			if ($member->can ('first_name') && defined ($member->first_name)) {
 				$member_str .= $member->first_name;