0

Add perlcritic stuff :)

This commit is contained in:
eleksir
2021-05-30 14:30:00 +03:00
parent 0c147086c0
commit e655c11e0b
13 changed files with 127 additions and 20 deletions

View File

@@ -39,8 +39,7 @@ my $access_token = $cache->get ('access_token');
if (defined $refresh_token && defined $access_token) {
printf "access_token:\n%s\n\nrefresh_token:\n%s\n", $access_token, $refresh_token;
} else {
say "Что-то пошло не так, токены не нашлись, попробуйте их пере-получить через скрипт yad_get_token.pl";
exit 1;
die "Что-то пошло не так, токены не нашлись, попробуйте их пере-получить через скрипт yad_get_token.pl\n";
}
exit 0;