Adde binary packages
[pkg-perl] / deb-src / libperl-critic-perl / libperl-critic-perl-1.088 / t / RegularExpressions / RequireLineBoundaryMatching.run
diff --git a/deb-src/libperl-critic-perl/libperl-critic-perl-1.088/t/RegularExpressions/RequireLineBoundaryMatching.run b/deb-src/libperl-critic-perl/libperl-critic-perl-1.088/t/RegularExpressions/RequireLineBoundaryMatching.run
deleted file mode 100644 (file)
index 44ab1b9..0000000
+++ /dev/null
@@ -1,84 +0,0 @@
-##############################################################################
-#      $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/Perl-Critic/t/RegularExpressions/RequireLineBoundaryMatching.run $
-#     $Date: 2008-03-16 17:40:45 -0500 (Sun, 16 Mar 2008) $
-#   $Author: clonezone $
-# $Revision: 2187 $
-##############################################################################
-
-## name basic passes
-## failures 0
-## cut
-my $string =~ m{pattern}m;
-my $string =~ m{pattern}gimx;
-my $string =~ m{pattern}gmis;
-my $string =~ m{pattern}mgxs;
-
-my $string =~ m/pattern/m;
-my $string =~ m/pattern/gimx;
-my $string =~ m/pattern/gmis;
-my $string =~ m/pattern/mgxs;
-
-my $string =~ /pattern/m;
-my $string =~ /pattern/gimx;
-my $string =~ /pattern/gmis;
-my $string =~ /pattern/mgxs;
-
-my $string =~ s/pattern/foo/m;
-my $string =~ s/pattern/foo/gimx;
-my $string =~ s/pattern/foo/gmis;
-my $string =~ s/pattern/foo/mgxs;
-
-my $re = qr/pattern/m;
-
-#-----------------------------------------------------------------------------
-
-## name basic failures
-## failures 17
-## cut
-my $string =~ m{pattern};
-my $string =~ m{pattern}gix;
-my $string =~ m{pattern}gis;
-my $string =~ m{pattern}gxs;
-
-my $string =~ m/pattern/;
-my $string =~ m/pattern/gix;
-my $string =~ m/pattern/gis;
-my $string =~ m/pattern/gxs;
-
-my $string =~ /pattern/;
-my $string =~ /pattern/gix;
-my $string =~ /pattern/gis;
-my $string =~ /pattern/gxs;
-
-my $string =~ s/pattern/foo/;
-my $string =~ s/pattern/foo/gix;
-my $string =~ s/pattern/foo/gis;
-my $string =~ s/pattern/foo/gxs;
-
-my $re = qr/pattern/;
-
-#-----------------------------------------------------------------------------
-
-## name tr and y checking
-## failures 0
-## cut
-my $string =~ tr/[A-Z]/[a-z]/;
-my $string =~ tr|[A-Z]|[a-z]|;
-my $string =~ tr{[A-Z]}{[a-z]};
-
-my $string =~ y/[A-Z]/[a-z]/;
-my $string =~ y|[A-Z]|[a-z]|;
-my $string =~ y{[A-Z]}{[a-z]};
-
-my $string =~ tr/[A-Z]/[a-z]/cds;
-my $string =~ y/[A-Z]/[a-z]/cds;
-
-#-----------------------------------------------------------------------------
-# Local Variables:
-#   mode: cperl
-#   cperl-indent-level: 4
-#   fill-column: 78
-#   indent-tabs-mode: nil
-#   c-indentation-style: bsd
-# End:
-# ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :