perlで将棋遊べるようなものを作ろうと思ってるんだけどめんどくせぇ
そもそも配列要素参照数に負の値が入るとどんな値が帰ってくるのよ