#!/usr/bin/perl use strict; use warnings; use Test::XT 'WriteXT'; my $test = Test::XT->new( test => 'all_pod_files_ok', release => 0, comment => 'Test that the syntax of the POD documentation is valid', modules => { 'Pod::Simple' => 0, 'Test::Pod' => 0, }, default => 't/pod.t', ); $test->module( 'Spreadsheet::WriteExcel' ); $test->test( 'all_pod_coverage_ok' ); print "Test script: "; print $test->write_string;