NAME

DicomAnonymizer - A module to anonymize Dicom files

SYNOPSIS

    use DicomPack::Util::DicomAnonymizer;

    # get a DicomAnonymizer object
    my $anonymizer  = DicomPack::Util::DicomAnonymizer->new();

    # input and output Dicom files
    my $inDicomFile = "your dicom file";
    my $outDicomFile = "anonymized dicom file";

    # anonymize PatientName and PatientID
    $anonymizer->anonymize($inDicomFile, $outDicomFile, 
			{PatientName=>"NewPatientName", PatientID=>"NewPatientID"});

DESCRIPTION

This module anonymize (or change) the values of specified Dicom fields.

Methods

new

Returns a new DicomAnonymizer object.

anonymize

Anonymize the specified dicom fields with new values.

Input parameter(s):

1. A path to a to-be-anonymized dicom file

2. A path to the output anonymized dicom file

3. A hash reference (format: DicomFieldName=>"NewValue", DicomFieldName is the Dicom tag path pointing to the dicom field whose value will be set to NewValue).

AUTHOR

Baoshe Zhang, Medical School, Virginia Commonwealth University.