Simple templating content handler
In your inline2test.tpl ---------------------- #!/usr/bin/perl -w use strict; use Test::More [% plan %]; $| = 1; [% tests %] 1;
It is relatively common to want to customise the contents of the generated test files to set up custom environment things on an all-scripts basis, rather than file by file (using =begin \s-1SETUP\s0 blocks).
\*(C`Test::Inline::Content::Simple\*(C' lets you use a very simple Template Toolkit style template to define this information.
It contains only two tags, \*(C`plan\*(C' and \*(C`tests\*(C'.
The \*(C`plan\*(C' tag will be inserted as either \*(C`tests =\*(C' 123> or 'no_plan'.
The \*(C`tests\*(C' tag will be replaced by the actual testing code.
Manually create a new \*(C`Test::Inline::Content::Simple\*(C' object. Takes as parameter a single filename which should contain the template code.
Returns a new \*(C`Test::Inline::Content::Simple\*(C' object, or \*(C`undef\*(C' on error.
The \*(C`template\*(C' accessor returns the template content for the object The \*(C`process\*(C' method is unchanged from \*(C`Test::Inline::Content\*(C'.
See the main \s-1SUPPORT\s0 section.
Adam Kennedy <[email protected]>, <http://ali.as/>
Copyright 2004 - 2013 Adam Kennedy.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the \s-1LICENSE\s0 file included with this module.