DicomAnonymizer - A module to anonymize Dicom files
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"});
This module anonymize (or change) the values of specified Dicom fields.
new
Returns a new DicomAnonymizer object.
anonymize
Anonymize the specified dicom fields with new values.
A path to a to-be-anonymized dicom file
A path to the output anonymized dicom file
A hash reference (format: DicomFieldName=>"NewValue", DicomFieldName is the Dicom tag path pointing to the dicom field whose value will be set to NewValue).
Baoshe Zhang, Medical School, Virginia Commonwealth University.
2 POD Errors
The following errors were encountered while parsing the POD:
'=item' outside of any '=over'
You forgot a '=back' before '=head1'
To install DicomPack::IO::CommonUtil, copy and paste the appropriate command in to your terminal.
cpanm
cpanm DicomPack::IO::CommonUtil
CPAN shell
perl -MCPAN -e shell install DicomPack::IO::CommonUtil
For more information on module installation, please visit the detailed CPAN module installation guide.