From 55d789d44f313bde0188ffee932ed7b560769f37 Mon Sep 17 00:00:00 2001 From: Colin Watson Date: Mon, 26 Aug 2002 14:18:39 +0000 Subject: [PATCH] Not needed with the new XSL setup. --- check-characters.pl | 16 ---------------- 1 file changed, 16 deletions(-) delete mode 100755 check-characters.pl diff --git a/check-characters.pl b/check-characters.pl deleted file mode 100755 index eed4859..0000000 --- a/check-characters.pl +++ /dev/null @@ -1,16 +0,0 @@ -#! /usr/bin/perl -w -use diagnostics; -use strict; - -local $/ = undef; -my $file = <>; -while ($file =~ /(.*?)<\/A>/gs) -{ - if ($1 ne $2 || "$2$3" ne lc $4) - { - my $name = $4; - $name =~ y/\n/ /; - print "$name\n"; - } -} - -- 2.30.2