<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">NAME
    Dicom::DCMTK::DCMQRSCP::Config - Perl class for reading/writing DCMTK
    dcmqrscp configuration file.

SYNOPSIS
     use Dicom::DCMTK::DCMQRSCP::Config;

     my $obj = Dicom::DCMTK::DCMQRSCP::Config-&gt;new(%parameters);
     $obj-&gt;parse($data);
     my $data = $obj-&gt;serialize;

METHODS
  "new"
     my $obj = Dicom::DCMTK::DCMQRSCP::Config-&gt;new(%parameters);

    Constructor.

    *       "ae_table"

            AE table.

            Default value is {}.

    *       "comment"

            Flag, that means comments in serialize() output.

            Default value is 1.

    *       "global"

            Global parameters.

            Default value is:

             {
                     'NetworkTCPPort' =&gt; undef,
                     'MaxPDUSize' =&gt; undef,
                     'MaxAssociations' =&gt; undef,
                     'UserName' =&gt; undef,
                     'GroupName' =&gt; undef,
             };

    *       "host_table"

            Host table.

            Default value is {}.

    *       "host_table_symb"

            Host table symbolic names.

            Default value is {}.

    *       "vendor_table"

            Vendor table.

            Default value is {}.

    Returns instance of object.

  "parse"
     $obj-&gt;parse($data);

    Parse $data, which contains dcmqrscp configuration data.

    Returns undef.

  "serialize"
     my $data = $obj-&gt;serialize;

    Serialize object to DCMTK dcmqrscp configuration data.

    Returns string with dcmqrscp configuration data.

ERRORS
     new():
             From Class::Utils::set_params():
                     Unknown parameter '%s'.

EXAMPLE
     use strict;
     use warnings;

     use Dicom::DCMTK::DCMQRSCP::Config;

     # Object.
     my $obj = Dicom::DCMTK::DCMQRSCP::Config-&gt;new(
             'ae_table' =&gt; {
                     'ACME_PUB' =&gt; {
                             'Access' =&gt; 'R',
                             'Peers' =&gt; 'ANY',
                             'Quota' =&gt; {
                                     'maxBytesPerStudy' =&gt; '24mb',
                                     'maxStudies' =&gt; '10',
                             },
                             'StorageArea' =&gt; '/dicom/ACME_PUB',
                     },
                     'ACME_PRV' =&gt; {
                             'Access' =&gt; 'RW',
                             'Peers' =&gt; 'Acme',
                             'Quota' =&gt; {
                                     'maxBytesPerStudy' =&gt; '24mb',
                                     'maxStudies' =&gt; '10',
                             },
                             'StorageArea' =&gt; '/dicom/ACME_PRV',
                     },
             },
             'comment' =&gt; 1,
             'global' =&gt; {
                     'GroupName' =&gt; 'dcmtk',
                     'MaxAssociations' =&gt; 20,
                     'MaxPDUSize' =&gt; 8192,
                     'NetworkTCPPort' =&gt; 104,
                     'UserName' =&gt; 'dcmtk',
             },
             'host_table' =&gt; {
                     'Acme_1' =&gt; [
                             'ACME_DN1',
                             'acme',
                             10001
                     ],
                     'Acme_2' =&gt; [
                             'ACME_DN2',
                             'acme',
                             10001
                     ],
                     'Acme_3' =&gt; [
                             'ACME_DN3',
                             'acme',
                             10001
                     ],
             },
             'host_table_symb' =&gt; {
                     'Acme' =&gt; [
                             'Acme_1',
                             'Acme_2',
                             'Acme_3',
                     ],
             },
             'vendor_table' =&gt; {
                     'Acme' =&gt; 'ACME CT Company',
             },
     );

     # Serialize and print
     print $obj-&gt;serialize."\n";

     # Output:
     # # Global Configuration Parameters.
     # GroupName = "dcmtk"
     # MaxAssociations = 20
     # MaxPDUSize = 8192
     # NetworkTCPPort = 104
     # UserName = "dcmtk"
     # 
     # # Host Table.
     # HostTable BEGIN
     # Acme_1 = (ACME_DN1, acme, 10001)
     # Acme_2 = (ACME_DN2, acme, 10001)
     # Acme_3 = (ACME_DN3, acme, 10001)
     # Acme = Acme_1, Acme_2, Acme_3
     # HostTable END
     # 
     # # Vendor Table.
     # VendorTable BEGIN
     # "ACME CT Company" = Acme
     # VendorTable END
     # 
     # # AE Table.
     # AETable BEGIN
     # ACME_PRV /dicom/ACME_PRV RW (10, 24mb) Acme
     # ACME_PUB /dicom/ACME_PUB R (10, 24mb) ANY
     # AETable END

DEPENDENCIES
    Class::Utils.

SEE ALSO
    Task::Dicom
        Install the Dicom modules.

REPOSITORY
    &lt;https://github.com/michal-josef-spacek/Dicom-DCMTK-DCMQRSCP-Config&gt;

AUTHOR
    Michal Josef Ĺ&nbsp;paÄŤek &lt;mailto:skim@cpan.org&gt;

    &lt;http://skim.cz&gt;

LICENSE AND COPYRIGHT
    Â© 2014-2023 Michal Josef Ĺ&nbsp;paÄŤek

    BSD 2-Clause License

VERSION
    0.04

</pre></body></html>