items <- toItemsfromJSON $ show isでむりやり外からのデータ(JSON)を[Item]にできたっぽい