--- Convert-BER-XS/XS.pm 2019/04/19 20:42:31 1.8 +++ Convert-BER-XS/XS.pm 2019/04/19 20:43:12 1.9 @@ -122,7 +122,7 @@ $ber = ber_decode $binbuf; # the following is NOT legal: - $ber->[BER_CLASS] = ASN_PRIVATE; # ERROR, readonly(!) + $ber->[BER_CLASS] = ASN_PRIVATE; # ERROR, class/tag/constructed are readonly(!) # but all of the following are fine: $ber->[BER_DATA] = "string";