$ perl run.t.raw
    # Subtest: Prod
    1..0 # SKIP Set PROD_TEST to run
ok 1 # skip Set PROD_TEST to run
    # Subtest: Dev
    1..0 # SKIP Set DEV_TEST to run
ok 2 # skip Set DEV_TEST to run
1..2
$ prove run.t.raw
run.t.raw .. ok   
All tests successful.
Files=1, Tests=2,  0 wallclock secs ( 0.03 usr  0.01 sys +  0.02 cusr  0.00 csys =  0.06 CPU)
Result: PASS
$ perl runner.t
    # Subtest: Prod
    ok 1 - OHAI, PROD!
    1..1
ok 1 - Prod
    # Subtest: Dev
    1..0 # SKIP Set DEV_TEST to run
ok 2 # skip Set DEV_TEST to run
    # Subtest: Prod
    1..0 # SKIP Set PROD_TEST to run
ok 3 # skip Set PROD_TEST to run
    # Subtest: Dev
    ok 1 - OHAI, DEV!
    1..1
ok 4 - Dev
1..4
$ prove runner.t
runner.t .. ok   
All tests successful.
Files=1, Tests=4,  0 wallclock secs ( 0.03 usr  0.00 sys +  0.02 cusr  0.00 csys =  0.05 CPU)
Result: PASS
$