1Test::Smoke::Policy(3)User Contributed Perl DocumentationTest::Smoke::Policy(3)
2
3
4

NAME

6       Test::Smoke::Policy - OO interface to handle the Policy.sh stuff.
7

SYNOPSIS

9           use Test::Smoke::Policy;
10
11           my $srcpath = File::Spec->updir;
12           my $policy = Test::Smoke::Policy->new( $srcpath );
13
14           $policy->substitute( [] );
15           $policy->write;
16

DESCRIPTION

18       I wish I understood what Merijn is doeing in the original code.
19

METHODS

21   Test::Smoke::Policy->new( $srcpath )
22       Create a new instance of the Policy object.  Read the file or take data
23       from the DATA section.
24
25   $policy->verbose
26       Get verbosity.
27
28   $policy->set_rules( $rules )
29       Set the rules for substitutions.
30
31   $policy->reset_rules( )
32       Reset the "_rules" property.
33
34   $policy->_do_subst( )
35       "_do_subst()" does the substitutions and stores the substituted version
36       as the _new_policy attribute.
37
38   $policy->write( )
39   $policy->_read_Policy( $srcpath[, $verbose[, @ccflags]] )
40       "_read_Policy()" checks the $srcpath for these conditions:
41
42       Reference to a SCALAR Policy is in $$srcpath
43       Reference to an ARRAY Policy is in @$srcpath
44       Reference to a GLOB Policy is read from the filehandle
45       Other values are taken as the base path for Policy.sh
46
47       The @ccflags are passed to "$self->default_Policy()"
48
49   $policy->default_Policy( [@ccflags] )
50       Generate the default Policy.sh from a set of ccflags, but be backward
51       compatible.
52
54       (c) 2001-2015, All rights reserved.
55
56         * H.Merijn Brand <hmbrand@hccnet.nl>
57         * Nicholas Clark <nick@unfortu.net>
58         * Abe Timmerman <abeltje@cpan.org>
59
60       This library is free software; you can redistribute it and/or modify it
61       under the same terms as Perl itself.
62
63       See:
64
65         * <http://www.perl.com/perl/misc/Artistic.html>,
66         * <http://www.gnu.org/copyleft/gpl.html>
67
68       This program is distributed in the hope that it will be useful, but
69       WITHOUT ANY WARRANTY; without even the implied warranty of
70       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
71
72
73
74perl v5.34.1                      2022-03-31            Test::Smoke::Policy(3)
Impressum