議事進行の妨げのためにPerlで等価なアレを書いた！！！