#!/usr/bin/perl

my $PDFopts = "-sPAPERSIZE=letter -dCompatibilityLevel=1.4 -dPDFSETTINGS=/prepress";

my $mpgdata;
foreach $tag (@ARGV) {
   $mpgdata = " $tag/editions/temp10/score/*.mpg";
   print "DATA = $mpgdata\n";
   `./mpg2ps $mpgdata | musefoot -f $tag/info/footer/work.fot > $tag.ps`;
   `ps2pdf $PDFopts $tag.ps`;
}