Index: app/src/compiledic/compiledic
===================================================================
--- app/src/compiledic/compiledic	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/compiledic/compiledic	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,3 +1,20 @@
 #! /usr/bin/env perl
+
+#package:	UAM Text Tools
+#component:	compiledic
+#version:	1.0
+#author:	Tomasz Obrebski
+
+use strict;
+use locale;
+use File::HomeDir;
+use File::Basename;
+use File::Temp;
+use Getopt::Long;
+
+my $systemconfigfile='';
+my $userconfigfile=home()."/.utt/compiledic.conf";
+
+Getopt::Long::Configure('no_ignore_case_always');
 
 $symfile='~/.utt/pl/pl_PL.iso-8859-2.sym';
@@ -7,12 +24,9 @@
 $sclfile = $symfilenoext . '.scl';
 
-use locale;
-#use strict;
-
 ##################################################
 $linesPerFile = 20000;
 
 if (@ARGV < 1) {
-    print "usage: prep_user_dict.pl dictionary_file\n";
+    print "usage: ", basename($0), " dictionary_file\n";
     exit;
 }
Index: app/src/gph/gph
===================================================================
--- app/src/gph/gph	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/gph/gph	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,4 +1,10 @@
 #!/usr/bin/perl
 
+#package:	UAM Text Tools
+#component:	gph
+#version:	1.0
+#author:	Tomasz Obrebski
+
+use strict;
 use Getopt::Long;
 
Index: app/src/grp/grp
===================================================================
--- app/src/grp/grp	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/grp/grp	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -2,14 +2,18 @@
 
 #package:        UAM Text Tools
-#component name: gre
-#author:         Tomasz Obrêbski
+#component name: grp
+#version:	 1.0
+#author:         Tomasz Obrebski
 
 use strict;
 use Getopt::Long;
+use File::HomeDir;
 
-my $LIB_DIR="/usr/local/lib/utt";  # katalog zawierajacy terms.m4
+# katalog zawierajacy terms.m4
+my $LIB_DIR="/usr/local/lib/utt";
 
 my $systemconfigfile="/usr/local/etc/utt/grp.conf";
-my $userconfigfile="$ENV{'HOME'}/.utt/grp.conf";
+#my $userconfigfile="$ENV{'HOME'}/.utt/grp.conf";
+my $userconfigfile=home()."/.utt/grp.conf";
 
 Getopt::Long::Configure('no_ignore_case_always');
Index: app/src/kon/kon
===================================================================
--- app/src/kon/kon	(revision 246900abc92b7d822ca17bd69aeb06d2b30db588)
+++ app/src/kon/kon	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,6 +1,13 @@
 #!/usr/bin/perl -w
+
+#package:	UAM Text Tools
+#component:	kon (search context)
+#version:	1.0
+#author:	Tomasz Obrebski
+
 use strict;
 use Getopt::Long;
 use locale;
+use File::HomeDir;
 
 Getopt::Long::Configure('no_ignore_case_always');
@@ -19,5 +26,6 @@
 
 my $systemconfigfile='/usr/local/etc/utt/kon.conf';
-my $userconfigfile="$ENV{'HOME'}/.utt/kon.conf";
+#my $userconfigfile="$ENV{'HOME'}/.utt/kon.conf";
+my $userconfigfile=home()."/.utt/kon.conf";
 
 #read configuration files###########################
Index: app/src/kot/kot
===================================================================
--- app/src/kot/kot	(revision 246900abc92b7d822ca17bd69aeb06d2b30db588)
+++ app/src/kot/kot	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,6 +1,12 @@
 #!/usr/bin/perl
+
+#package:	UAM Text Tools
+#component:	kot
+#version:	1.0
+#author:	Tomasz Obrebski
 
 use strict;
 use Getopt::Long;
+use File::HomeDir;
 
 my $help=0;
@@ -9,5 +15,6 @@
 
 my $systemconfigfile='/usr/local/etc/utt/kot.conf';
-my $userconfigfile="$ENV{'HOME'}/.utt/kot.conf";
+#my $userconfigfile="$ENV{'HOME'}/.utt/kot.conf";
+my $userconfigfile=home()."/.utt/kot.conf";
 
 #read configuration files###########################
Index: app/src/mar/mar
===================================================================
--- app/src/mar/mar	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/mar/mar	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,7 +1,8 @@
 #!/usr/bin/perl
 
-#package: UAM Text Tools
-#component name: mrk
-#author: Marcin Walas
+#package:	UAM Text Tools
+#component:	mar
+#version:	1.0
+#author:	Marcin Walas
 
 #this program tags the tokenized file with given tags 
Index: app/src/rm12/rm12
===================================================================
--- app/src/rm12/rm12	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/rm12/rm12	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,3 +1,9 @@
 #!/bin/bash
 
+#package:	UAM Text Tools
+#component:	rm12
+#version:	1.0
+#author:	Tomasz Obrebski
+
+
 sed -r '/[0-9]+[ \t]+[0-9]+[ \t]+BOS/! s/[0-9]+[ \t]+[0-9]+[ \t]//'
Index: app/src/ser/ser
===================================================================
--- app/src/ser/ser	(revision 754d2a3af45fbb9ef2f650ef3c85a6cce1d960f9)
+++ app/src/ser/ser	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -3,17 +3,16 @@
 #package:        UAM Text Tools
 #component:      ser (pattern search tool)
-#author:         Tomasz Obrêbski
+#version:	 1.0
+#author:         Tomasz Obrebski
 
 use strict;
 use Getopt::Long;
 use File::Temp;
+use File::HomeDir;
 
 my $LIB_DIR="/usr/local/lib/utt";
-
 my $systemconfigfile='/usr/local/etc/utt/ser.conf';
-my $userconfigfile="$ENV{'HOME'}/.utt/ser.conf";
-
-#use lib "$ENV{HOME}/.utt/lib/perl";
-#use attr;
+#my $userconfigfile="$ENV{'HOME'}/.utt/ser.conf";
+my $userconfigfile=home()."/.utt/ser.conf";
 
 Getopt::Long::Configure('no_ignore_case_always');
@@ -161,6 +160,15 @@
 if($flex)
 {
-    system "cat $tmpfile_l";
-    exit 0;
+	#system "cat $tmpfile_l";
+	if(open(FLEX, $tmpfile_l)) {
+		while(<FLEX>) {
+			print @_;
+		}
+		close FLEX;
+	}
+	else {
+		print "Unable to open file $tmpfile_l\n";
+	}
+    	exit 0;
 }
 
@@ -169,4 +177,7 @@
 system "$tmpfile_x";
 
-system "rm -f $tmpfile_l $tmpfile_c $tmpfile_x";
+#system "rm -f $tmpfile_l $tmpfile_c $tmpfile_x";
+unlink $tmpfile_l;
+unlink $tmpfile_c;
+unlink $tmpfile_x;
 
Index: app/src/tags/uam.tag2re
===================================================================
--- app/src/tags/uam.tag2re	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/tags/uam.tag2re	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,4 +1,10 @@
 #!/usr/bin/perl
 
+#package:	UAM Text Tools
+#component:	tags for utt
+#version:	1.0
+#author:	Tomasz Obrebski
+
+use strict;
 use locale;
 
Index: app/src/tok/tok
===================================================================
--- app/src/tok/tok	(revision 246900abc92b7d822ca17bd69aeb06d2b30db588)
+++ app/src/tok/tok	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,6 +1,13 @@
 #!/usr/bin/perl
 
+#package:	UAM Text Tools
+#component:	tok (tokenizer)
+#version:	1.0
+#author:	Tomasz Obrebski
+
+use strict;
 use locale;
 use Getopt::Long;
+use File::HomeDir;
 
 my $interactive=0;
@@ -8,5 +15,6 @@
 
 my $systemconfigfile='/usr/local/etc/utt/tok.conf';
-my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf";
+#my $userconfigfile="$ENV{'HOME'}/.utt/tok.conf";
+my $userconfigfile=home()."/.utt/tok.conf";
 
 #read configuration files###########################
Index: app/src/unfla/unfla
===================================================================
--- app/src/unfla/unfla	(revision 25ae32e4c2354e0ed6756bbe1de83f39cd814652)
+++ app/src/unfla/unfla	(revision 20b4e44e7537762f6aceb72b039f6e8f8a50e201)
@@ -1,1 +1,8 @@
+#!/bin/bash
+
+#package:	UAM Text Tools
+#component:	unfla
+#version:	1.0
+#author:	Tomasz Obrebski
+
 tr '\014' '\012'