In some cases you want to skip a whole test file.
use Test::More;
if( $^O eq 'MSWin32' ) {
plan tests => 42;
}
else {
plan skip_all => 'Win32 specific test';
}
Test::More will exit at the skip_all.
On non-Win32, the output will be:
1..0 # skip Win32 specific test
which Test::Harness interprets as a skipped test