[svn-upgrade] new version scowl (7.1)

[deb_pkgs/scowl.git] / current / src / extract-possessive

diff --git a/current/src/extract-possessive b/current/src/extract-possessive
deleted file mode 100755 (executable)
index 2c72835..0000000
--- a/current/src/extract-possessive
+++ /dev/null
@@ -1,10 +0,0 @@
-#!/usr/bin/perl
-
-open F, "r/pos/part-of-speech.txt";
-
-while (<F>) 
-{
-    chop;
-    next if not /^([^\t]+)\tN.*$/;
-    print "$1\n";
-}