perl 1と2
lib問題解決した