Build all packages removed dependencies of libtest-exception-perl libtest-warn-perl...

[dh-make-perl] / dev / i386 / libperl-critic-perl / libperl-critic-perl-1.088 / t / Miscellanea / ProhibitFormats.run

diff --git a/dev/i386/libperl-critic-perl/libperl-critic-perl-1.088/t/Miscellanea/ProhibitFormats.run b/dev/i386/libperl-critic-perl/libperl-critic-perl-1.088/t/Miscellanea/ProhibitFormats.run
new file mode 100644 (file)
index 0000000..052e8d2
--- /dev/null
+++ b/dev/i386/libperl-critic-perl/libperl-critic-perl-1.088/t/Miscellanea/ProhibitFormats.run
@@ -0,0 +1,31 @@
+## name standard failures
+## failures 4
+## cut
+format STDOUT =
+@<<<<<<   @||||||   @>>>>>>
+"left",   "middle", "right"
+.
+
+format =
+@<<<<<<   @||||||   @>>>>>>
+"foo",   "bar",     "baz"
+.
+
+format REPORT_TOP =
+                                Passwd File
+Name                Login    Office   Uid   Gid Home
+------------------------------------------------------------------
+.
+format REPORT =
+@<<<<<<<<<<<<<<<<<< @||||||| @<<<<<<@>>>> @>>>> @<<<<<<<<<<<<<<<<<
+$name,              $login,  $office,$uid,$gid, $home
+.
+
+#-----------------------------------------------------------------------------
+
+## name basic passes
+## failures 0
+## cut
+$hash{format} = 'foo';
+%hash = ( format => 'baz' );
+$object->format();