Index: app/src/ser/ser
===================================================================
--- app/src/ser/ser	(revision 389de9abcbd0bbec63c04912b2d253b58dc5145c)
+++ app/src/ser/ser	(revision e2bde98bb18e1063ddb00ab5c402f0cda43546d4)
@@ -97,4 +97,5 @@
 }
 
+
 die("$0: no pattern given.\n") unless $pattern;
 
@@ -155,24 +156,30 @@
 (undef, my $tmpfile_x) = File::Temp::tempfile();
 
+# w tych `` nie dziala
+#`m4 "--define=PATTERN=$flexpattern" "--define=DEFAULTACTION=$defaultaction" $flextemplate > $tmpfile_l`;
 
-`m4 "--define=PATTERN=$flexpattern" "--define=DEFAULTACTION=$defaultaction" $flextemplate > $tmpfile_l`;
+system "m4 \"--define=PATTERN=$flexpattern\" \"--define=DEFAULTACTION=$defaultaction\" $flextemplate > $tmpfile_l";
 
 if($flex)
 {
-	if(open(FLEX, $tmpfile_l)) {
-		while(<FLEX>) {
-			print @_;
-		}
-		close FLEX;
-	}
-	else {
-		print "Unable to open file $tmpfile_l\n";
-	}
-    	exit 0;
+    # w tych `` nie dziala
+    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);
 }
 
 `flex -o$tmpfile_c $tmpfile_l`;
 `cc -O3 -o $tmpfile_x $tmpfile_c -lfl`;
-`$tmpfile_x`;
+#`$tmpfile_x`;
+
+system "$tmpfile_x";
 
 unlink $tmpfile_l;