Index: trunk/install/perl/getxml2db.pl
===================================================================
--- trunk/install/perl/getxml2db.pl (リビジョン 18)
+++ trunk/install/perl/getxml2db.pl (リビジョン 21)
@@ -40,7 +40,9 @@
 if ($ARGV[0]  eq "long"){
 	$uri="http://cal.syoboi.jp/cal_chk.php";
+	#$uri="http://syobocal.orz.hm/cal_chk.php";
 	&writelog("getxml2db  use long mode.");
 }else{
 	$uri="http://cal.syoboi.jp/cal_chk.xml";
+	#$uri="http://syobocal.orz.hm/cal_chk.xml";
 }
 
Index: trunk/install/php/foltialib.php
===================================================================
--- trunk/install/php/foltialib.php (リビジョン 1)
+++ trunk/install/php/foltialib.php (リビジョン 21)
@@ -414,6 +414,6 @@
 	$freearea = preg_split ("/[\s,]+/", $hdfreearea[0]);
 
-	exec ( "ps ax | grep ffmpeg", $encoding);
-	exec ( "ps ax | grep faac", $processlock);
+//	exec ( "ps ax | grep ffmpeg", $encoding);
+//	exec ( "ps ax | grep faac", $processlock);
 
 print "
@@ -423,12 +423,13 @@
 ";
 
-//	print "$freearea[1]<br>$freearea[2]<br>$freearea[3]<br>$freearea[4]<br>$hdfreearea[0]<br>$encoding[0]<br>$processlock[0]</p>\n";
-	print "$encoding[0]<br>$processlock[0]</p>\n";
-
-/*
-<div style="width:100%;border:1px solid black;text-align:left;"><span style="float:right;">170GB</span>
-<div style="width:86%;border:1px solid black;background:white;">1.1TB/1.3TB(87%)</div>
-</div>
-*/
+//exec('ps ax | grep ffmpeg |grep MP4 ' ,$ffmpegprocesses);
+$ffmpegprocesses = `ps ax | grep ffmpeg | grep -v grep |  wc -l `;
+
+$uptime = exec('uptime');
+
+print "<div style=\"text-align:left;\">";
+print "$uptime<br>\n";
+print "トラコン稼働数:$ffmpegprocesses<br>\n";
+print "</div>";
 
 }//end sub