summaryrefslogtreecommitdiff
path: root/t/maint/php-tag.t
diff options
context:
space:
mode:
Diffstat (limited to 't/maint/php-tag.t')
-rw-r--r--t/maint/php-tag.t29
1 files changed, 0 insertions, 29 deletions
diff --git a/t/maint/php-tag.t b/t/maint/php-tag.t
deleted file mode 100644
index 5093ca7f..00000000
--- a/t/maint/php-tag.t
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-
-use Test::More;;
-
-use File::Find;
-use File::Slurp qw< slurp >;
-
-my $ext = qr/(?: php | inc )/x;
-
-my @files;
-find( sub { push @files, $File::Find::name if -f && /\. $ext $/x }, '.' );
-
-plan tests => scalar @files;
-
-for my $file (@files) {
- my $cont = slurp $file;
- if ( $cont =~ m<<\?php .* \?>>xs ) {
- pass "$file has <?php ?>";
- } elsif ( $cont =~ m<<\? .* \?>>xs ) {
- fail "$file does not use <? ?>";
- } else {
- pass "$file has neither <?php ?> nor <? ?>, check it";
- }
-}
-
-
-