now using Test::More subtest feature