my $oldestfile;
    my $oldestage;
    foreach my $file (glob("$srcdir/*.xml")) {
        if( !defined($oldestfile) or -M $file > $oldestage ) {
            $oldestfile = $file;
            $oldestage = -M $file;
        }
    }