#!/usr/bin/perl
#

$filter = "";
$filter_lc = lc($filter);
$filter_uc = uc($filter);

@files = glob("sdss-*.pht");

$cmd  = "/home/richmond/tass/ensemble/multipht ";
$cmd .= " x=1 y=2 mag=7 err=8 jd=12 ";
#$cmd .= " template=rxj-121V.pht ";
#$cmd .= " outfile=multi3_" . $filter_lc . ".out ";
$cmd .= " outfile=multi_movie.out ";
$cmd .= " matchrad=3 ";
foreach $file (@files) {
  $cmd .= " $file ";
}

printf "cmd is ..$cmd.. \n";

exec($cmd);
#printf "ret is ..$ret.. \n";


exit 0;