testing with Test::More framework