Index: /trunk/doc/CHANGES.txt
===================================================================
--- /trunk/doc/CHANGES.txt (リビジョン 77)
+++ /trunk/doc/CHANGES.txt (リビジョン 79)
@@ -1,3 +1,9 @@
 foltia 更新履歴 http://www.dcc-jpl.com/soft/foltia/
+
+08.6.27
+tvrecording.pl:
+　foltia簡易BBSで指摘されたXML解析の正規表現修正。
+getxml2db.pl:
+　foltia簡易BBSで指摘されたログ出力項目の修正。
 
 08.3.17
Index: /trunk/install/perl/tvrecording.pl
===================================================================
--- /trunk/install/perl/tvrecording.pl (リビジョン 44)
+++ /trunk/install/perl/tvrecording.pl (リビジョン 79)
@@ -307,5 +307,5 @@
 #		$outputfile .= "$ARGV[3]";		
 #		$outputfile .= `date  +%Y%m%d-%H%M --date "1 min "`;
- &writelog("tvrecording:  DEBUG ARGV[2] ne null  \$outputfile $outputfile ");
+ &writelog("tvrecording:  DEBUG ARGV[3] ne null  \$outputfile $outputfile ");
 
 	}else{
@@ -313,5 +313,5 @@
 	chomp($outputfile);
 	$outputfile .= ".m2p";
-&writelog("tvrecording:  DEBUG ARGV[2] is null  \$outputfile $outputfile ");
+&writelog("tvrecording:  DEBUG ARGV[3] is null  \$outputfile $outputfile ");
 
 	}
Index: /trunk/install/perl/getxml2db.pl
===================================================================
--- /trunk/install/perl/getxml2db.pl (リビジョン 60)
+++ /trunk/install/perl/getxml2db.pl (リビジョン 79)
@@ -74,6 +74,7 @@
 s/\'/\\'/gio;
 s/\"/\'/gio;
-s/[\w]*=/\$item{$&}=/gio;
-s/\=}=/}=/gio;
+#s/[\w]*=/\$item{$&}=/gio;
+#s/\=}=/}=/gio;
+s/(\w+)=/\$item{$1}=/gio;#by foltiaBBS
 
 #$item{PID}='21543';