ある歴史(BASE_COMMIT)以降に新規追加されたファイルが150行を超えたときにcommitをしないための、決意のpre-commit hookを書きました。pre-commit �� ��U �����U #!/usr/bin/env perl use strict; use warnings; use Perl::Metrics::Simple; use constant { EXIT_STATUS_SUCCESS => 0, PERL_MODULE_FILENAME_PATTERN => qr/\.(pm|pl)$/, LIMIT_LINES_OF_CODE => 150, BASE_COMMIT => '9e732c2', }; sub is_empty_git_history { system "git rev-parse --verify HEAD >/dev/null 2>&1"; return $? != EXIT_STATUS_SUCCESS; } sub get_modified_files { my $output = `
テスト講義 - test-class.md
