… | |
… | |
125 | $ber->[BER_CLASS] = ASN_PRIVATE; # ERROR, CLASS/TAG/CONSTRUCTED are READ ONLY(!) |
125 | $ber->[BER_CLASS] = ASN_PRIVATE; # ERROR, CLASS/TAG/CONSTRUCTED are READ ONLY(!) |
126 | |
126 | |
127 | # but all of the following are fine: |
127 | # but all of the following are fine: |
128 | $ber->[BER_DATA] = "string"; |
128 | $ber->[BER_DATA] = "string"; |
129 | $ber->[BER_DATA] = [ASN_UNIVERSAL, ASN_INTEGER32, 0, 123]; |
129 | $ber->[BER_DATA] = [ASN_UNIVERSAL, ASN_INTEGER32, 0, 123]; |
130 | @$ber = (ASN_APPLICATION, SNMP_TIMETICKS, 1000); |
130 | @$ber = (ASN_APPLICATION, SNMP_TIMETICKS, 0, 1000); |
131 | |
131 | |
132 | I<CLASS> is something like a namespace for I<TAG>s - there is the |
132 | I<CLASS> is something like a namespace for I<TAG>s - there is the |
133 | C<ASN_UNIVERSAL> namespace which defines tags common to all ASN.1 |
133 | C<ASN_UNIVERSAL> namespace which defines tags common to all ASN.1 |
134 | implementations, the C<ASN_APPLICATION> namespace which defines tags for |
134 | implementations, the C<ASN_APPLICATION> namespace which defines tags for |
135 | specific applications (for example, the SNMP C<Unsigned32> type is in this |
135 | specific applications (for example, the SNMP C<Unsigned32> type is in this |