basic sketch of Test::Harness and Test::More