Case switching using Test::Proto