Select Code to Download

use strict;
use warnings;
use Test::Harness;

runtests(["podext.t"], ["excelpod.bat"], ["ExcelPOD.t"]);

use if (1 == scalar @ARGV && "-t" eq $ARGV[0]), "Test::More";

...
    no warnings;
    eval {"plan tests => 63;"};
    use warnings;