perl/perl-Convert-ASN1
SHA256
8
0
Fork 0
forked from pool/perl-Convert-ASN1
Code Pull Requests Activity

OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-Convert-ASN1?expand=0&rev=1

Browse Source
This commit is contained in:
OBS User unknown
2007-01-15 23:30:07 +00:00
committed by Git OBS Bridge
commit 7ee24d0d0f
8 changed files with 365 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Convert-ASN1-0.20-test.diff Normal file
View File

@@ -0,0 +1,12 @@
--- t/00prim.t
+++ t/00prim.t
@@ -177,7 +177,8 @@
[pack("B*",'011011111101110111'), 7, pack("B*", '01101110')]
);
-while(($result,$val) = each %BSTR) {
+foreach $result (sort(keys %BSTR)) {
+ $val = $BSTR{$result};
print "# BIT STRING ", unpack("B*", ref($val) ? $val->[0] : $val),
" ",(ref($val) ? $val->[1] : $val),"\n";