Index: trunk/install/perl/updatem2pfiletable.pl
===================================================================
--- trunk/install/perl/updatem2pfiletable.pl (リビジョン 57)
+++ trunk/install/perl/updatem2pfiletable.pl (リビジョン 69)
@@ -43,4 +43,6 @@
 
 # foltia_mp4files
+@mp4filelist = `find ${recfolderpath}/ | grep MP4`;#by foltia dev ticket #5 http://www.dcc-jpl.com/foltia/ticket/5
+
 #　ひとまず消す
 $query =  "DELETE  FROM  foltia_mp4files  ";
@@ -48,5 +50,4 @@
 	$sth->execute();
 
-@mp4filelist = `find ${recfolderpath}/ | grep MP4`;#by foltia dev ticket #5 http://www.dcc-jpl.com/foltia/ticket/5
 
 foreach (@mp4filelist) {