- Timestamp:
- 03/19/08 12:29:21 (17 years ago)
- Branches:
- master, help
- Children:
- 389de9a
- Parents:
- d593c5e
- git-author:
- pawelk <pawelk@…> (03/19/08 12:29:21)
- git-committer:
- pawelk <pawelk@…> (03/19/08 12:29:21)
- Location:
- app
- Files:
-
- 1 deleted
- 15 edited
Legend:
- Unmodified
- Added
- Removed
-
app/Makefile
rb2647de r20b4e44 55 55 .PHONY: components 56 56 components: 57 cd $(SRC_DIR)/lib && make; cd $(CUR_DIR) 58 57 59 @for cmp in $(COMPONENTS); do\ 58 60 cd $(SRC_DIR)/$$cmp && make && make copy; cd $(CUR_DIR); \ -
app/TODO
r25ae32e r20b4e44 1 * wyprowadzic grp-pre i grp-post z grp do aux? 2 * zamienic kota na lepszego (Kubis) 3 * 1 2 * gue SIE NIE KOMPILUJE !!! 3 4 * zamienic kota na lepszego (Kubis) [TO] 5 6 * uniezaleznic mar od attr.pm (ew. wcielic attr.pm) [TO] 7 8 * mar nie obsluguje plikow konfiguracyjnych [JW] 9 10 * compiledic - plik tymczasowe [PK] 11 12 * ser i grp - parametr tags (zeby bral wskazany program tag2re) [TO] 13 14 * lista zaleznosci dla komend system w perlu [PK] 15 16 * polaczyc sen'y [TO] 17 18 * poprawic utt_make_conf (wykrywanie slownikow) [PK] 19 20 * generowanie i sprawdzanie zaleznosci dla tarballa [PK] 21 22 * przygotowanie dystrybujcji slownikow [PK] 23 24 25 STARE 4 26 5 27 1. DONE. Makefile do gph (install). -
app/dist/tarball/INSTALL
r25ae32e r20b4e44 2 2 3 3 You should just unpack archive and then 4 execute create_utt_conf.pl and remove it. 4 execute 5 bin/utt_make_config.pl 6 -
app/dist/tarball/README
r25ae32e r20b4e44 4 4 make 5 5 6 Warning: you need define variable _UTT_DIST_DIR.6 Warning: you need define variable UTT_DIST_DIR. -
app/src/compiledic/compiledic
r25ae32e r20b4e44 1 1 #! /usr/bin/env perl 2 3 #package: UAM Text Tools 4 #component: compiledic 5 #version: 1.0 6 #author: Tomasz Obrebski 7 8 use strict; 9 use locale; 10 use File::HomeDir; 11 use File::Basename; 12 use File::Temp; 13 use Getopt::Long; 14 15 my $systemconfigfile=''; 16 my $userconfigfile=home()."/.utt/compiledic.conf"; 17 18 Getopt::Long::Configure('no_ignore_case_always'); 2 19 3 20 $symfile='~/.utt/pl/pl_PL.iso-8859-2.sym'; … … 7 24 $sclfile = $symfilenoext . '.scl'; 8 25 9 use locale;10 #use strict;11 12 26 ################################################## 13 27 $linesPerFile = 20000; 14 28 15 29 if (@ARGV < 1) { 16 print "usage: prep_user_dict.pldictionary_file\n";30 print "usage: ", basename($0), " dictionary_file\n"; 17 31 exit; 18 32 } -
app/src/gph/gph
r25ae32e r20b4e44 1 1 #!/usr/bin/perl 2 2 3 #package: UAM Text Tools 4 #component: gph 5 #version: 1.0 6 #author: Tomasz Obrebski 7 8 use strict; 3 9 use Getopt::Long; 4 10 -
app/src/grp/grp
r25ae32e r20b4e44 2 2 3 3 #package: UAM Text Tools 4 #component name: gre 5 #author: Tomasz Obrêbski 4 #component name: grp 5 #version: 1.0 6 #author: Tomasz Obrebski 6 7 7 8 use strict; 8 9 use Getopt::Long; 10 use File::HomeDir; 9 11 10 my $LIB_DIR="/usr/local/lib/utt"; # katalog zawierajacy terms.m4 12 # katalog zawierajacy terms.m4 13 my $LIB_DIR="/usr/local/lib/utt"; 11 14 12 15 my $systemconfigfile="/usr/local/etc/utt/grp.conf"; 13 my $userconfigfile="$ENV{'HOME'}/.utt/grp.conf"; 16 #my $userconfigfile="$ENV{'HOME'}/.utt/grp.conf"; 17 my $userconfigfile=home()."/.utt/grp.conf"; 14 18 15 19 Getopt::Long::Configure('no_ignore_case_always'); -
app/src/kon/kon
r246900a r20b4e44 1 1 #!/usr/bin/perl -w 2 3 #package: UAM Text Tools 4 #component: kon (search context) 5 #version: 1.0 6 #author: Tomasz Obrebski 7 2 8 use strict; 3 9 use Getopt::Long; 4 10 use locale; 11 use File::HomeDir; 5 12 6 13 Getopt::Long::Configure('no_ignore_case_always'); … … 19 26 20 27 my $systemconfigfile='/usr/local/etc/utt/kon.conf'; 21 my $userconfigfile="$ENV{'HOME'}/.utt/kon.conf"; 28 #my $userconfigfile="$ENV{'HOME'}/.utt/kon.conf"; 29 my $userconfigfile=home()."/.utt/kon.conf"; 22 30 23 31 #read configuration files########################### -
app/src/kot/kot
r246900a r20b4e44 1 1 #!/usr/bin/perl 2 3 #package: UAM Text Tools 4 #component: kot 5 #version: 1.0 6 #author: Tomasz Obrebski 2 7 3 8 use strict; 4 9 use Getopt::Long; 10 use File::HomeDir; 5 11 6 12 my $help=0; … … 9 15 10 16 my $systemconfigfile='/usr/local/etc/utt/kot.conf'; 11 my $userconfigfile="$ENV{'HOME'}/.utt/kot.conf"; 17 #my $userconfigfile="$ENV{'HOME'}/.utt/kot.conf"; 18 my $userconfigfile=home()."/.utt/kot.conf"; 12 19 13 20 #read configuration files########################### -
app/src/mar/mar
r25ae32e r20b4e44 1 1 #!/usr/bin/perl 2 2 3 #package: UAM Text Tools 4 #component name: mrk 5 #author: Marcin Walas 3 #package: UAM Text Tools 4 #component: mar 5 #version: 1.0 6 #author: Marcin Walas 6 7 7 8 #this program tags the tokenized file with given tags -
app/src/rm12/rm12
r25ae32e r20b4e44 1 1 #!/bin/bash 2 2 3 #package: UAM Text Tools 4 #component: rm12 5 #version: 1.0 6 #author: Tomasz Obrebski 7 8 3 9 sed -r '/[0-9]+[ \t]+[0-9]+[ \t]+BOS/! s/[0-9]+[ \t]+[0-9]+[ \t]//' -
app/src/ser/ser
r754d2a3 r20b4e44 3 3 #package: UAM Text Tools 4 4 #component: ser (pattern search tool) 5 #author: Tomasz Obrêbski 5 #version: 1.0 6 #author: Tomasz Obrebski 6 7 7 8 use strict; 8 9 use Getopt::Long; 9 10 use File::Temp; 11 use File::HomeDir; 10 12 11 13 my $LIB_DIR="/usr/local/lib/utt"; 12 13 14 my $systemconfigfile='/usr/local/etc/utt/ser.conf'; 14 my $userconfigfile="$ENV{'HOME'}/.utt/ser.conf"; 15 16 #use lib "$ENV{HOME}/.utt/lib/perl"; 17 #use attr; 15 #my $userconfigfile="$ENV{'HOME'}/.utt/ser.conf"; 16 my $userconfigfile=home()."/.utt/ser.conf"; 18 17 19 18 Getopt::Long::Configure('no_ignore_case_always'); … … 161 160 if($flex) 162 161 { 163 system "cat $tmpfile_l"; 164 exit 0; 162 #system "cat $tmpfile_l"; 163 if(open(FLEX, $tmpfile_l)) { 164 while(<FLEX>) { 165 print @_; 166 } 167 close FLEX; 168 } 169 else { 170 print "Unable to open file $tmpfile_l\n"; 171 } 172 exit 0; 165 173 } 166 174 … … 169 177 system "$tmpfile_x"; 170 178 171 system "rm -f $tmpfile_l $tmpfile_c $tmpfile_x"; 179 #system "rm -f $tmpfile_l $tmpfile_c $tmpfile_x"; 180 unlink $tmpfile_l; 181 unlink $tmpfile_c; 182 unlink $tmpfile_x; 172 183 -
app/src/tags/uam.tag2re
r25ae32e r20b4e44 1 1 #!/usr/bin/perl 2 2 3 #package: UAM Text Tools 4 #component: tags for utt 5 #version: 1.0 6 #author: Tomasz Obrebski 7 8 use strict; 3 9 use locale; 4 10 -
app/src/tok/tok
r246900a r20b4e44 1 1 #!/usr/bin/perl 2 2 3 #package: UAM Text Tools 4 #component: tok (tokenizer) 5 #version: 1.0 6 #author: Tomasz Obrebski 7 8 use strict; 3 9 use locale; 4 10 use Getopt::Long; 11 use File::HomeDir; 5 12 6 13 my $interactive=0; … … 8 15 9 16 my $systemconfigfile='/usr/local/etc/utt/tok.conf'; 10 my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf"; 17 #my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf"; 18 my $userconfigfile=home()."/.utt/tok.conf"; 11 19 12 20 #read configuration files########################### -
app/src/unfla/unfla
r25ae32e r20b4e44 1 #!/bin/bash 2 3 #package: UAM Text Tools 4 #component: unfla 5 #version: 1.0 6 #author: Tomasz Obrebski 7 1 8 tr '\014' '\012'
Note: See TracChangeset
for help on using the changeset viewer.