rewrite t/create.t to use Test::More