git.maemo.org Git - pkg-perl/blob - deb-src/libperl-critic-perl/libperl-critic-perl-1.088/t/Modules/RequireFilenameMatchesPackage.run

   1 #------------------------------------------------------------------------------
   2 ## name Basic passes.
   3 ## filename OK.pm
   4 ## failures 0
   5 ## cut
   6
   7 package Filename::OK;
   8 1;
   9
  10 #------------------------------------------------------------------------------
  11 ## name Basic passes.
  12 ## filename Filename/OK.pm
  13 ## failures 0
  14 ## cut
  15
  16 package Filename::OK;
  17 1;
  18
  19 #------------------------------------------------------------------------------
  20 ## name Basic passes.
  21 ## filename lib/Filename/OK.pm
  22 ## failures 0
  23 ## cut
  24
  25 package Filename::OK;
  26 1;
  27
  28 #------------------------------------------------------------------------------
  29 ## name Basic passes.
  30 ## filename blib/lib/Filename/OK.pm
  31 ## failures 0
  32 ## cut
  33
  34 package Filename::OK;
  35 1;
  36
  37 #------------------------------------------------------------------------------
  38 ## name Basic passes.
  39 ## filename OK.pl
  40 ## failures 0
  41 ## cut
  42
  43 package Filename::OK;
  44 1;
  45
  46 #------------------------------------------------------------------------------
  47 ## name Basic passes.
  48 ## filename Filename-OK-1.00/OK.pm
  49 ## failures 0
  50 ## cut
  51
  52 package Filename::OK;
  53 1;
  54
  55 #------------------------------------------------------------------------------
  56 ## name Basic passes.
  57 ## filename Filename-OK/OK.pm
  58 ## failures 0
  59 ## cut
  60
  61 package Filename::OK;
  62 1;
  63
  64 #------------------------------------------------------------------------------
  65 ## name Basic passes.
  66 ## filename Foobar-1.00/OK.pm
  67 ## failures 0
  68 ## cut
  69
  70 package Filename::OK;
  71 1;
  72
  73 #------------------------------------------------------------------------------
  74 ## name Basic Failure.
  75 ## filename Bad.pm
  76 ## failures 1
  77 ## cut
  78
  79 package Filename::OK;
  80 1;
  81
  82 #------------------------------------------------------------------------------
  83 ## name Basic Failure.
  84 ## filename Filename/Bad.pm
  85 ## failures 1
  86 ## cut
  87
  88 package Filename::OK;
  89 1;
  90
  91 #------------------------------------------------------------------------------
  92 ## name Basic Failure.
  93 ## filename lib/Filename/BadOK.pm
  94 ## failures 1
  95 ## cut
  96
  97 package Filename::OK;
  98 1;
  99
 100 #------------------------------------------------------------------------------
 101 ## name Basic Failure.
 102 ## filename ok.pm
 103 ## failures 1
 104 ## cut
 105
 106 package Filename::OK;
 107 1;
 108
 109 #------------------------------------------------------------------------------
 110 ## name Basic Failure.
 111 ## filename filename/OK.pm
 112 ## failures 1
 113 ## cut
 114
 115 package Filename::OK;
 116 1;
 117
 118 #------------------------------------------------------------------------------
 119 ## name Basic Failure.
 120 ## filename Foobar/OK.pm
 121 ## failures 1
 122 ## cut
 123
 124 package Filename::OK;
 125 1;
 126
 127 #------------------------------------------------------------------------------
 128 ## name first package is main, with inner package
 129 ## filename some_script
 130 ## failures 0
 131 ## cut
 132
 133 package main;
 134
 135 Inner::frobulate( @ARGV );
 136
 137 package Inner;
 138
 139 sub frobulate{};
 140
 141 1;
 142
 143 #------------------------------------------------------------------------------
 144 ## name second package is main, with inner package
 145 ## filename some_script
 146 ## failures 1
 147 ## cut
 148
 149 package Inner;
 150
 151 sub frobulate{};
 152
 153 package main;
 154
 155 Inner::frobulate( @ARGV );
 156
 157 1;
 158
 159 #------------------------------------------------------------------------------
 160 ## name Pass with apostrophe.
 161 ## filename Oh.pm
 162 ## failures 0
 163 ## cut
 164
 165 package D'Oh;
 166 1;
 167
 168 #------------------------------------------------------------------------------
 169 ## name Pass with apostrophe.
 170 ## filename D/Oh.pm
 171 ## failures 0
 172 ## cut
 173
 174 package D'Oh;
 175 1;
 176
 177 #------------------------------------------------------------------------------
 178 ## name Failure with apostrophe.
 179 ## filename oh.pm
 180 ## failures 1
 181 ## cut
 182
 183 package D'Oh;
 184 1;
 185
 186 #------------------------------------------------------------------------------
 187 ## name Failure with apostrophe.
 188 ## filename d/Oh.pm
 189 ## failures 1
 190 ## cut
 191
 192 package D'Oh;
 193 1;
 194
 195 ##############################################################################
 196 # Local Variables:
 197 #   mode: cperl
 198 #   cperl-indent-level: 4
 199 #   fill-column: 78
 200 #   indent-tabs-mode: nil
 201 #   c-indentation-style: bsd
 202 # End:
 203 # ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :