test

  1 #!/usr/bin/perl
  2 
  3 # $mkmf = "mkmfのファイルのパス";
  4 $mkmf = "../mkmf";
  5 # $tmpl = "tmplのファイルのパス";
  6 $tmpl = "../mkmf.tmpl";
  7 # $dir_obj = "objディレクトリのパス";
  8 $dir_obj = "obj";
  9 # $src_dirs = "ソースファイルのディレクトリのパス ";
 10 $src_dir[1] = "../header ";
 11 $src_dir[2] = "../common ";
 12 $src_dir[3] = "../c_grid ";
 13 $src_dir[4] = "../r_grid ";
 14 $src_dir[5] = "../c_ke ";
 15 $src_dir[6] = "../r_ke ";
 16 
 17 $src_dirs = "@src_dir";
 18 
 19 # Makefileの作成
 20 system("mkdir -p $dir_obj");
 21 chdir("$dir_obj");
 22 system("$mkmf -t $tmpl -a . $src_dirs");
 23 
 24 # ソースファイルの圧縮
 25 system("zip -qr SOURCE.zip $src_dirs");
 26 
 27 exit(0);