Fix three typos since last commit

lib/fisher.pm

@@ -99,12 +99,12 @@ sub fish {
 		'на крышу дома',
 	);
 
-	my @material = {
+	my @material = (
 		'бамбуковую',
 		'фиберглассовую',
 		'карбоновую',
 		'композитную',
-	}
+	);
 
 	my $find_probability = irand 100;
 	my $success_probability = irand 100;

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;