Как я могу протестировать автономный сценарий Perl?

(Я не хочу разделять скрипт module на отдельный модуль и «исполняемый unit-testing файл», поскольку я планирую perl распространять скрипт как scripts единый файл.)

Большинство scripts людей сшивают файлы таким scripts образом во время сборки. App modules :: Ack на CPAN - это пример scripts того, что можно построить module подобным образом.

Если вы unit-test действительно хотите правильно perl5 протестировать свое приложение, вам perl5 необходимо поместить функциональность perl5 в модуль, а затем написать scripts тестовый сценарий на основе perl5 Test :: More, который выполняет scripting функции, предоставляемые perl5 модулем. Тогда фактический perl сценарий - это просто тонкая unit-test обертка вокруг модуля, обычно unit-test что-то вроде:

#!/usr/bin/env perl
use Your::Class;
Your::Class->new(args => \@ARGV)->run;

См. также: MooseX::Getopt.