sample test script using Plack::Test