#!perl use strict; use warnings; use lib 't/lib'; use Test::More tests => 2; use App::Prove; { local $ENV{HARNESS_TIMER} = 0; my $prv = App::Prove->new; ok !$prv->timer, 'timer set via HARNESS_TIMER'; } { local $ENV{HARNESS_TIMER} = 1; my $prv = App::Prove->new; ok $prv->timer, 'timer set via HARNESS_TIMER'; }