}
    $testdr = $testsac->addExtraFileToMediaResource($edit_media, $testuser, $testpw, $testobo, $testextrafile, $testextrafiletype, false);
    print "Received HTTP status code: " . $testdr->sac_status . " (" . $testdr->sac_statusmessage . ")\n";
    if ($testdr->sac_status >= 200 || $testdr->sac_status < 300) {
        $testdr->toString();
    }
    print "\n\n";
}
if (false) {
    print "About to add package (" . $testzipcontentfile . ") to " . $edit_iri . "\n";
    if (empty($testuser)) {
        print "As: anonymous\n";
    } else {
        print "As: " . $testuser . "\n";
    }
    $testdr = $testsac->addExtraPackage($edit_iri, $testuser, $testpw, $testobo, $testzipcontentfile, $testpackaging, $testcontenttype, false);
    print "Received HTTP status code: " . $testdr->sac_status . " (" . $testdr->sac_statusmessage . ")\n";
    if ($testdr->sac_status >= 200 || $testdr->sac_status < 300) {
        $testdr->toString();
    }
    print "\n\n";
}
if (false) {
    print "About to add atom entry (" . $testatomentry2 . ") to " . $edit_iri . "\n";
    if (empty($testuser)) {
        print "As: anonymous\n";
    } else {
        print "As: " . $testuser . "\n";
    }
    $testdr = $testsac->addExtraAtomEntry($edit_iri, $testuser, $testpw, $testobo, $testatomentry2, false);
    print "Received HTTP status code: " . $testdr->sac_status . " (" . $testdr->sac_statusmessage . ")\n";