Result:
found more than 453 distributions - search limited to the first 2001 files matching your query
( run in 0.933 )
Bundle-OpenXPKI
view release on metacpan or search on metacpan
lib/Bundle/OpenXPKI.pm view on Meta::CPAN
Convert::ASN1 0.21
Convert::ASN1::parser undef
Crypt::CBC 2.29
Crypt::OpenSSL::AES 0.02
Cwd 3.12
Business-BankList-Indonesia
view release on metacpan or search on metacpan
lib/Business/BankList/Indonesia.pm view on Meta::CPAN
['39','PT. BANK GANESHA','ganesha','161'],
['40','PT. BANK HANA','hana',''],
['41','PT. BANK HARDA INTERNASIONAL','harda','567'],
['42','PT. BANK HARFA','harfa','517'],
['43','PT. BANK HS 1906','hs','212'],
['44','PT. BANK ICBC INDONESIA','icbc',''],
['45','PT. BANK INA PERDANA','','513'],
['46','PT. BANK INDEX SELINDO','','555'],
['47','PT. BANK INTERNASIONAL INDONESIA','bii','016'],
['48','PT. BANK JASA ARTA','jasaarta','422'],
['49','PT. BANK JASA JAKARTA','jasajakarta','427'],
lib/Business/BankList/Indonesia.pm view on Meta::CPAN
['65','PT. BANK MUTIARA TBK.','mutiara','095'],
['66','PT. BANK NATIONALNOBU','nobu',''],
['67','PT. BANK NEGARA INDONESIA 46 TBK.','bni','009'],
['68','PT. BANK NIAGA SYARIAH TBK.','niaga_syariah',''],
['69','PT. BANK NUSANTARA PARAHYANGAN','bnp','145'],
['70','PT. BANK OCBC NISP TBK','ocbcnisp','028'],
['71','PT. BANK PEMBANGUNAN DAERAH BALI','bali','129'],
['72','PT. BANK PEMBANGUNAN DAERAH DIY','diy','112'],
['73','PT. BANK PEMBANGUNAN DAERAH JAMBI','jambi','115'],
['74','PT. BANK PEMBANGUNAN DAERAH JATENG','jateng','113'],
['75','PT. BANK PEMBANGUNAN DAERAH JATIM','jatim','114'],
Business-CCCheck
view release on metacpan or search on metacpan
lib/Business/CCCheck/CardID.pm view on Meta::CPAN
'5234' => 'Lufthansa Miles & More MasterCard Credit Card',
'523748' => 'Commonwealth Bank of Australia Mastercard',
'523911' => 'Affinity Bank',
'523912' => 'Affinity Bank',
'523951' => 'ICICI Bank MasterCard Credit Card',
'524040' => 'OCBC Bank BEST-OCBC MasterCard',
'5243' => 'Hudsons Bay Company MasterCard',
'525241' => 'Saison Card International United Airlines Mileage Plus',
'525405' => 'VuB Banka (Banca Intesa group) MasterCard',
'5255' => 'Mastercard CartaSi (Italy)',
'5256' => 'Sparda-Bank MasterCard Charge Card (Germany)',
lib/Business/CCCheck/CardID.pm view on Meta::CPAN
'620021' => 'Bank of Communications China Prepaid Card (China)',
'621019' => 'Zheshang Bank Debit Card (CN)',
'621041' => 'Bank of China (Hong Kong) BOC Card - Debit (HK)',
'621060' => 'Woori Bank UnionPay Shanghai Tourism Card (CN)',
'622141' => 'Zhejiang Tailong Commercial Bank Debit Card (CN)',
'622200' => 'CN ICBC Peony Money Link Card',
'622201' => 'CN ICBC Peony Money Link Card',
'622202' => 'CN ICBC Peony Money Link Card E-Age',
'622203' => 'CN ICBC Peony Money Link Card E-Age',
'622208' => 'CN ICBC Elite Club Account Card',
'622210' => 'CN ICBC Peony Quasi-Credit Card',
'622212' => 'Chong Hing Bank China Unionpay Gift Card (HK)',
'622226' => 'Bank of Communications Pacific Card Debit Card',
'622252' => 'BestBuy UnionPay Credit Card by Bank of Communications/HSBC',
'622260' => 'Bank of Communications China CUP Special Edition Debit',
'622372' => 'The Bank of East Asia UnionPay Dual Currency Platinum',
Business-EDI
view release on metacpan or search on metacpan
lib/Business/EDI/CodeList/CryptographicModeOfOperationCoded.pm view on Meta::CPAN
# Repr: an..3
my %code_hash = (
'1' => [ 'ECB',
'DES modes of operation, Electronic Code Book; FIPS Pub 81 (1981); ANSI X3.106; IS 8372 (64 bits); ISO 10116 (n- bits).' ],
'2' => [ 'CBC',
'DES modes of operation, Cipher Block Chaining; FIPS Pub 81 (1981); ANSI X3.106; IS 8372 (64 bits); ISO 10116 (n- bits).' ],
'3' => [ 'CFB1',
'DES modes of operation, Cipher feedback; FIPS Pub 81 (1981); ANSI X3.106; IS 8372 (64 bits); ISO 10116 (n- bits).' ],
'4' => [ 'CFB8',
'DES modes of operation, Cipher feedback; FIPS Pub 81 (1981); ANSI X3.106; IS 8372 (64 bits); ISO 10116 (n- bits).' ],
lib/Business/EDI/CodeList/CryptographicModeOfOperationCoded.pm view on Meta::CPAN
'DES modes of operation; FIPS Pub 81 (1981); IS 8372 (64 bits); ISO 10116 (n-bits).' ],
'16' => [ 'DSMR',
'Digital Signature scheme giving Message Recovery. ISO 9796.' ],
'17' => [ 'CFB64',
'DES mode of operation, cipher feedback; ISO 10116 (n- bits).' ],
'23' => [ 'TCBC',
'TDEA mode of operation, Cipher Block Chaining, ANSI X9.52.' ],
'24' => [ 'TCBC-I',
'TDEA mode of operation, Cipher Block Chaining - Interleaved, ANSI X9.52.' ],
'25' => [ 'TCFB1',
'TDEA mode of operation, Cipher Feedback - 1 bit feedback, ANSI X9.52.' ],
'26' => [ 'TCFB8',
'TDEA mode of operation, Cipher Feedback - 8 bit feedback, ANSI X9.52.' ],
lib/Business/EDI/CodeList/CryptographicModeOfOperationCoded.pm view on Meta::CPAN
'TDEA mode of operation, Cipher Feedback Pipelined - 64 bit feedback, ANSI X9.52.' ],
'31' => [ 'TOFB',
'TDEA mode of operation, Output Feedback Mode, ANSI X9.52.' ],
'32' => [ 'TOFB-P',
'TDEA mode of operation, Output Feedback Mode Pipelined, ANSI X9.52.' ],
'33' => [ 'TCBCM',
'TDEA mode of operation, Cipher Block Chaining with output feedback Masking, ANSI X9.52.' ],
'34' => [ 'TCBCM-I',
'TDEA mode of operation, Cipher Block Chaining with output feedback Masking Interleaved, ANSI X9.52.' ],
'35' => [ 'TECB',
'TDEA mode of operation, Electronic Cookbook Mode, ANSI X9.52.' ],
'36' => [ 'CTS',
'RC5 mode of operation, Cipher Text Stealing, Published in RCF 2040.' ],
Business-IBAN-NL-BIC
view release on metacpan or search on metacpan
lib/Business/IBAN/NL/BIC.pm view on Meta::CPAN
LOYDNL2A LOYD LLOYDS TSB BANK
LPLNNL2F LPLN LEASEPLAN CORPORATION
MHCBNL2A MHCB MIZUHO CORPORATE BANK
NNBANL2G NNBA NATIONALE-NEDERLANDEN BANK
NWABNL2G NWAB NEDERLANDSE WATERSCHAPSBANK
PCBCNL2A PCBC CHINA CONSTRUCTION BANK, AMSTERDAM BRANCH
RABONL2U RABO RABOBANK
RBOSNL2A RBOS ROYAL BANK OF SCOTLAND
RBRBNL21 RBRB REGIOBANK
SNSBNL2A SNSB SNS BANK
SOGENL2A SOGE SOCIETE GENERALE
Business-OnlinePayment-StoredTransaction
view release on metacpan or search on metacpan
lib/Business/OnlinePayment/StoredTransaction.pm view on Meta::CPAN
use strict;
use warnings;
use Carp;
use Business::OnlinePayment;
use Crypt::OpenSSL::RSA;
use Crypt::CBC;
use Storable;
use MIME::Base64;
use Digest::MD5;
our @ISA = qw(Business::OnlinePayment);
lib/Business/OnlinePayment/StoredTransaction.pm view on Meta::CPAN
my $rsa_pub = Crypt::OpenSSL::RSA->new_public_key($public_key);
my $plaintext = Storable::nfreeze(\%content);
my $seckey = Digest::MD5::md5_hex(rand());
my $encseckey;
eval { $encseckey = $rsa_pub->encrypt($seckey) };
my $cipher = Crypt::CBC->new( {'key' => $seckey,
'cipher' => 'Blowfish',
});
my $ciphertext = $cipher->encrypt($plaintext);
$ciphertext = encode_base64($ciphertext);
$ciphertext =~ s/\s+//g;
lib/Business/OnlinePayment/StoredTransaction.pm view on Meta::CPAN
=head1 SEE ALSO
Business::OnlinePayment
Crypt::OpenSSL::RSA
Crypt::Blowfish
Crypt::CBC
Business::OnlinePayment::StoredTransaction::Unstore
=head1 AUTHOR
mock, E<lt>mock@obscurity.org<gt>
C600
view release on metacpan or search on metacpan
use strict;
use warnings;
use MIME::Base64;
use Encode qw/decode encode/;
use Crypt::Mode::ECB;
use Crypt::CBC;
use Crypt::Cipher::DES;
my $m = Crypt::Mode::ECB->new('DES',1);
#my $c= $m->encrypt('landisgyr', 'c600land');
#my $d = encode_base64($c);
#my $bb = decode_base64($d);
CECALA
view release on metacpan or search on metacpan
spaceinvaders/spaceInvaders.pl view on Meta::CPAN
IMDAgwYJHhSYMCFChgsLMnRosKHCghgzJhQwQABHAQc7euS4EMCAAQcDAgA7
begin splat.gif
R0lGODlhCgAKAPcAAAAAAOfvAP9CAP/GSv/nEP//////////////////////////////////////
N12N
/////////////////////////////////////////////////////ywAAAAACgAKAAAIQAABCAxA
AMCAAAEAJBRgEEBBhRAFDJA4oCBCAgIkMnzocKLGiA4lWkw4oOJEAAwhJiQ4wKHAhwcRCpzZcqbA
gAAAOw==
CGI-MxScreen
view release on metacpan or search on metacpan
MxScreen/Session/Medium/Browser.pm view on Meta::CPAN
my $md5 = CGI::param(MX_MD5);
DASSERT length $md5, "session MD5 checksum exists";
CGI::delete(MX_MD5);
require MIME::Base64;
require Crypt::CBC;
require Digest::MD5;
my $decoded = MIME::Base64::decode(CGI::param(MX_CONTEXT));
my $cipher = new Crypt::CBC($self->key, CRYPT_ALGO);
my $decrypted = $cipher->decrypt($decoded);
CGI::delete(MX_CONTEXT);
#
# Before attempting to de-serialize, check the MD5 certificate.
MxScreen/Session/Medium/Browser.pm view on Meta::CPAN
DREQUIRE defined $self->serializer, "already called set_serializer()";
my $frozen = $self->serializer->serialize($context);
require MIME::Base64;
require Crypt::CBC;
require Digest::MD5;
#
# Compute MD5 checksum and encrypt context.
#
MxScreen/Session/Medium/Browser.pm view on Meta::CPAN
# XXX With: my ($ls, $lc, $le) = (length $serialized, length $compressed,
# XXX length $encoded);
#
my $md5 = Digest::MD5::md5_base64($frozen);
my $cipher = new Crypt::CBC($self->key, CRYPT_ALGO);
my $crypted = $cipher->encrypt($frozen);
my $encoded = MIME::Base64::encode($crypted);
#
# Return the hidden parameters to generate in the HTML output.
MxScreen/Session/Medium/Browser.pm view on Meta::CPAN
This saves the session within the browser, and therefore does not require
any storage on the server side, compared to other session media.
The context is serialized within a hidden parameter, along with an MD5
checksum. The whole thing is encrypted with C<Crypt::CBC(Blowfish)> to
prevent accidental user peeking and/or tampering.
The creation routine takes the following mandatory argument:
=over 4
CGI-SecureState
view release on metacpan or search on metacpan
SecureState.pm view on Meta::CPAN
if ($length%=8) {
$length=8-$length;
$buffer.=chr(int(rand(256))) while ($length--);
}
#encrypt in reverse-CBC mode
$block=$cipher->encrypt(substr($buffer,-8,8));
substr($buffer,-8,8,$block);
$length=length($buffer) - 8;
while(($length-=8)>-8) {
CLI-Startup
view release on metacpan or search on metacpan
Debian_CPANTS.txt view on Meta::CPAN
"libcpan-mini-perl", "CPAN-Mini", "1.111003", "0", "0"
"libcpan-uploader-perl", "CPAN-Uploader", "0.103000", "0", "0"
"libcpandb-perl", "CPANDB", "0.14", "0", "0"
"libcps-perl", "CPS", "0.11", "0", "0"
"libcrypt-blowfish-perl", "Crypt-Blowfish", "2.12", "0", "1"
"libcrypt-cbc-perl", "Crypt-CBC", "2.30", "1", "0"
"libcrypt-des-perl", "Crypt-DES", "2.05", "0", "0"
"libcrypt-dh-gmp-perl", "Crypt-DH-GMP", "0.00009", "0", "1"
"libcrypt-generatepassword-perl", "Crypt-GeneratePassword", "0.03", "0", "0"
"libcrypt-mysql-perl", "Crypt-MySQL", "0.04", "0", "0"
"libcrypt-openssl-bignum-perl", "Crypt-OpenSSL-Bignum", "0.04", "1", "0"
CORBA-MICO
view release on metacpan or search on metacpan
") c #B6B6B4",
"! c #EAEEEC",
"~ c #E6E6E4",
"{ c #CDD1CF",
"] c #CCCCCA",
"^ c #C7CBC9",
"/ c #C7C7C9",
"( c #CBCFCD",
"_ c #CCD0CE",
": c #CCD1CF",
"< c #D2D2D4",
"[ c #CED2D0",
"} c #D2D6D4",
CORBA-ORBit
view release on metacpan or search on metacpan
") c #B6B6B4",
"! c #EAEEEC",
"~ c #E6E6E4",
"{ c #CDD1CF",
"] c #CCCCCA",
"^ c #C7CBC9",
"/ c #C7C7C9",
"( c #CBCFCD",
"_ c #CCD0CE",
": c #CCD1CF",
"< c #D2D2D4",
"[ c #CED2D0",
"} c #D2D6D4",
CP932-R2
view release on metacpan or search on metacpan
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $_ eq 'BCBCBC' },
# 191
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $_ eq 'BCBCBC' },
# 211
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
# 311
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/1/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/11/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/11/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cdsr; $r eq 'BCBCBC' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cdsr; $r eq 'BCBCBC' }},
sub {1},
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','cdr'); $r eq 'ABABAB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','11','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','11','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cdsr'); $r eq 'BCBCBC' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cdsr'); $r eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
# 341
CP932IBM-R2
view release on metacpan or search on metacpan
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $_ eq 'BCBCBC' },
# 191
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $_ eq 'BCBCBC' },
# 211
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
# 311
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/1/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/11/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/11/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cdsr; $r eq 'BCBCBC' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cdsr; $r eq 'BCBCBC' }},
sub {1},
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','cdr'); $r eq 'ABABAB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','11','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','11','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cdsr'); $r eq 'BCBCBC' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cdsr'); $r eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
# 341
CP932NEC-R2
view release on metacpan or search on metacpan
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $_ eq 'BCBCBC' },
# 191
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $_ eq 'BCBCBC' },
# 211
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
# 311
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/1/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/11/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/11/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cdsr; $r eq 'BCBCBC' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cdsr; $r eq 'BCBCBC' }},
sub {1},
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','cdr'); $r eq 'ABABAB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','11','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','11','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cdsr'); $r eq 'BCBCBC' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cdsr'); $r eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
# 341
CP932X-R2
view release on metacpan or search on metacpan
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $r == 6 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/B/12/cds; $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cds; $_ eq 'BCBCBC' },
# 191
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $r == 3 },
sub { $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cds; $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $r == 6 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','12','cds'); $_ eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cds'); $_ eq 'BCBCBC' },
# 211
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $r == 3 },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cds'); $_ eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
sub {1},
sub {1},
t/1003_mbtr.t view on Meta::CPAN
# 311
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/1/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/AB/11/csr; $r eq 'AB1AB1AB1' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/1/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/B/11/cdsr; $r eq 'BBB' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/11/cdsr; $r eq 'BCBCBC' }},
sub { ($] < 5.014) or eval q{ $_='ABCABCABC'; my $r= $_ =~ tr/BC/1/cdsr; $r eq 'BCBCBC' }},
sub {1},
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
t/1003_mbtr.t view on Meta::CPAN
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','cdr'); $r eq 'ABABAB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','1','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'AB','11','csr'); $r eq 'AB1AB1AB1' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','1','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'B','11','cdsr'); $r eq 'BBB' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','11','cdsr'); $r eq 'BCBCBC' },
sub { $_='ABCABCABC'; my $r=mbtr($_,'BC','1','cdsr'); $r eq 'BCBCBC' },
sub {1},
sub {1},
sub {1},
#-----------------------------------------------------------------------------
# 341
CPAN-MetaCurator
view release on metacpan or search on metacpan
data/tiddlers.json view on Meta::CPAN
"modified": "20250728223140626",
"created": "20240706052320581"
},
{
"created": "20240717002307158",
"text": "\"\"\"\no Author:\n- Ron Savage\n- Melbourne, Victoria, Australia\n- http://savage.net.au. Has links to various wikis\n- https://metacpan.org/author/RSAVAGE\n\no V 1.44:\n- 2026-04-06\n- Add CALDAV, ECDLP, iCalandar, IDN, LCCN, LCSAJ...
"title": "ChangeLog",
"modified": "20260406012402824"
},
{
"created": "20210729071550324",
data/tiddlers.json view on Meta::CPAN
"title": "cron",
"modified": "20251124012656738",
"created": "20220913061044632"
},
{
"text": "\"\"\"\no See also:\n- [[Acronyms]] - For UUID\n- IoLayers\n- [[UUID]]\n- KubernetesStuff\n- Mojolicious::Plugin::Credentials\n- RfcGuide\n- [[XML]] - For XML::Sig::OO\n- https://blogs.perl.org/users/leon_timmermans/2024/02/using-pep...
"title": "CryptoStuff",
"modified": "20260325231725306",
"created": "20191115192547844"
},
{
CPAN-SQLite
view release on metacpan or search on metacpan
t/lib/TestSQL.pm view on Meta::CPAN
},
'dist_vers' => '3.55',
'cpanid' => 'GAAS',
'dist_file' => 'HTML-Parser-3.55.tar.gz'
},
'Crypt-CBC' => {
'modules' => {
'Crypt::CBC' => 1
},
'dist_vers' => '2.22',
'cpanid' => 'LDS',
'dist_file' => 'Crypt-CBC-2.22.tar.gz'
},
'webchat' => {
'modules' => {
'WWW::Chat' => 1
},
t/lib/TestSQL.pm view on Meta::CPAN
},
'Convert::ASN1::parser' => {
'dist_name' => 'Convert-ASN1',
'mod_vers' => undef
},
'Crypt::CBC' => {
'dist_name' => 'Crypt-CBC',
'mod_vers' => '2.22'
},
'Net::FTP::E' => {
'dist_name' => 'libnet',
'mod_vers' => '0.01'
CPAN-Testers-Common-Article
view release on metacpan or search on metacpan
t/nntp/1805500.txt view on Meta::CPAN
tests=BAYES_00
X-Spam-Check-By: la.mx.develooper.com
Received: from toomai.ethgen.de (HELO toomai.ethgen.de) (85.10.201.50)
by la.mx.develooper.com (qpsmtpd/0.28) with ESMTP; Fri, 27 Jun 2008 03:00:40 -0700
Received: from static-195-068.catv.glattnet.ch ([80.242.195.68] helo=ikki.ket)
by toomai.ethgen.de with esmtpsa (TLS-1.0:RSA_AES_256_CBC_SHA1:32)
(Exim 4.63)
(envelope-from <klaus@ethgen.de>)
id 1KCAkr-0002vL-7O; Fri, 27 Jun 2008 12:00:33 +0200
Received: from klaus by ikki.ket with local (Exim 4.63)
(envelope-from <klaus@ikki.ethgen.de>)
CPAN-Testers-TailLog
view release on metacpan or search on metacpan
t/files/02-log.txt view on Meta::CPAN
[2016-08-21T01:54:46Z] [Andreas J. König (ANDK)] [pass] [KENTNL/Gentoo-VDB-0.001001.tar.gz] [x86_64-linux-thread-multi] [perl-v5.22.3 RC3] [3cf55028-6742-11e6-ba1f-33d558b9f28c] [2016-08-21T01:54:46Z]
[2016-08-21T01:54:45Z] [Andreas J. König (ANDK)] [pass] [KENTNL/Gentoo-VDB-0.001001.tar.gz] [x86_64-linux] [perl-v5.22.3 RC3] [3c061d5a-6742-11e6-9221-2fd558b9f28c] [2016-08-21T01:54:45Z]
[2016-08-21T01:54:28Z] [Andreas J. König (ANDK)] [pass] [KENTNL/Gentoo-VDB-0.001001.tar.gz] [x86_64-linux-ld] [perl-v5.24.1 RC3] [32182fd6-6742-11e6-bb90-7ed458b9f28c] [2016-08-21T01:54:28Z]
[2016-08-21T01:54:27Z] [Andreas J. König (ANDK)] [pass] [KENTNL/Gentoo-VDB-0.001001.tar.gz] [x86_64-linux] [perl-v5.24.1 RC3] [3130f076-6742-11e6-a525-74d458b9f28c] [2016-08-21T01:54:27Z]
[2016-08-21T01:54:24Z] [Chris Williams (BINGOS)] [pass] [JONASS/App-Licensecheck-v3.0.21.tar.gz] [i386-gnukfreebsd-thread-multi] [perl-v5.22.1] [2fae44ec-6742-11e6-ab41-c893a58a4b8c] [2016-08-21T01:54:24Z]
[2016-08-21T01:54:17Z] [David Solimano] [pass] [LDS/Crypt-CBC-2.33.tar.gz] [cygwin-thread-multi] [perl-v5.22.2] [116fba62-6c9c-1014-a553-6b7f728c1559] [2016-08-21T01:54:17Z]
[2016-08-21T01:54:12Z] [gregor herrmann] [unknown] [REEDFISH/Net-FullAuto-1.0000224.tar.gz] [MSWin32-x86-multi-thread-64int] [perl-v5.24.0] [6cf1b8d2-6c1a-1014-9350-680443570578] [2016-08-21T01:54:12Z]
[2016-08-21T01:54:12Z] [Chris Williams (BINGOS)] [pass] [ANTONC/Data-Type-Digger-0.06.tar.gz] [x86_64-gnukfreebsd] [perl-v5.18.1] [288c7a94-6742-11e6-ab41-c893a58a4b8c] [2016-08-21T01:54:12Z]
[2016-08-21T01:54:10Z] [Andreas J. König (ANDK)] [pass] [SANKO/Template-Liquid-1.0.7.tar.gz] [x86_64-linux-thread-multi-ld] [perl-v5.22.3 RC3] [272da330-6742-11e6-a155-dcd358b9f28c] [2016-08-21T01:54:10Z]
[2016-08-21T01:54:09Z] [Andreas J. König (ANDK)] [pass] [BINGOS/File-Fetch-0.52.tar.gz] [x86_64-linux-thread-multi-ld] [perl-v5.22.3 RC3] [26736be6-6742-11e6-a155-dcd358b9f28c] [2016-08-21T01:54:09Z]
[2016-08-21T01:54:06Z] [Chris Williams (BINGOS)] [pass] [ANTONC/Data-Type-Digger-0.05.tar.gz] [x86_64-gnukfreebsd] [perl-v5.18.1] [251b2a40-6742-11e6-ab41-c893a58a4b8c] [2016-08-21T01:54:06Z]
CPAN-Testers-WWW-Blog
view release on metacpan or search on metacpan
vhost/html/js/tiny_mce/themes/advanced/skins/o2k7/ui_black.css view on Meta::CPAN
/* Black */
.o2k7SkinBlack .mceToolbar .mceToolbarStart span, .o2k7SkinBlack .mceToolbar .mceToolbarEnd span, .o2k7SkinBlack .mceButton, .o2k7SkinBlack .mceSplitButton, .o2k7SkinBlack .mceSeparator, .o2k7SkinBlack .mceSplitButton a.mceOpen, .o2k7SkinBlack .mceLi...
.o2k7SkinBlack table, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack .mceMenuItemTitle span.mceText, .o2k7SkinBlack .mceStatusbar div, .o2k7SkinBlack .mceStatusbar span, .o2k7SkinBlack .mceStatusbar a {background:#535353; color:#FFF}
.o2k7SkinBlack table.mceListBoxEnabled .mceText, o2k7SkinBlack .mceListBox .mceText {background:#FFF; border:1px solid #CBCFD4; border-bottom-color:#989FA9; border-right:0}
.o2k7SkinBlack table.mceListBoxEnabled:hover .mceText, .o2k7SkinBlack .mceListBoxHover .mceText, .o2k7SkinBlack .mceListBoxSelected .mceText {background:#FFF; border:1px solid #FFBD69; border-right:0}
.o2k7SkinBlack .mceExternalToolbar, .o2k7SkinBlack .mceListBox .mceText, .o2k7SkinBlack div.mceMenu, .o2k7SkinBlack table.mceLayout, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack table.mceLayout tr.mceFirst td, .o2k7SkinBlack table.mceLayout, .o...
.o2k7SkinBlack table.mceSplitButtonEnabled:hover a.mceAction, .o2k7SkinBlack .mceSplitButtonHover a.mceAction, .o2k7SkinBlack .mceSplitButtonSelected {background-image:url(img/button_bg_black.png)}
.o2k7SkinBlack .mceMenu .mceMenuItemEnabled a:hover, .o2k7SkinBlack .mceMenu .mceMenuItemActive {background-color:#FFE7A1}
CPAN-Testers-WWW-Reports
view release on metacpan or search on metacpan
vhost/html/js/tiny_mce/themes/advanced/skins/o2k7/ui_black.css view on Meta::CPAN
/* Black */
.o2k7SkinBlack .mceToolbar .mceToolbarStart span, .o2k7SkinBlack .mceToolbar .mceToolbarEnd span, .o2k7SkinBlack .mceButton, .o2k7SkinBlack .mceSplitButton, .o2k7SkinBlack .mceSeparator, .o2k7SkinBlack .mceSplitButton a.mceOpen, .o2k7SkinBlack .mceLi...
.o2k7SkinBlack table, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack .mceMenuItemTitle span.mceText, .o2k7SkinBlack .mceStatusbar div, .o2k7SkinBlack .mceStatusbar span, .o2k7SkinBlack .mceStatusbar a {background:#535353; color:#FFF}
.o2k7SkinBlack table.mceListBoxEnabled .mceText, o2k7SkinBlack .mceListBox .mceText {background:#FFF; border:1px solid #CBCFD4; border-bottom-color:#989FA9; border-right:0}
.o2k7SkinBlack table.mceListBoxEnabled:hover .mceText, .o2k7SkinBlack .mceListBoxHover .mceText, .o2k7SkinBlack .mceListBoxSelected .mceText {background:#FFF; border:1px solid #FFBD69; border-right:0}
.o2k7SkinBlack .mceExternalToolbar, .o2k7SkinBlack .mceListBox .mceText, .o2k7SkinBlack div.mceMenu, .o2k7SkinBlack table.mceLayout, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack table.mceLayout tr.mceFirst td, .o2k7SkinBlack table.mceLayout, .o...
.o2k7SkinBlack table.mceSplitButtonEnabled:hover a.mceAction, .o2k7SkinBlack .mceSplitButtonHover a.mceAction, .o2k7SkinBlack .mceSplitButtonSelected {background-image:url(img/button_bg_black.png)}
.o2k7SkinBlack .mceMenu .mceMenuItemEnabled a:hover, .o2k7SkinBlack .mceMenu .mceMenuItemActive {background-color:#FFE7A1}
CPAN-Testers-WWW-Statistics
view release on metacpan or search on metacpan
t/data/cpanstats-test.json view on Meta::CPAN
{"test":{"count":{"entries":100,"reports":100,"posters":"182","distros":0},"pass":{"MacPPC":{"5.4.0":{"all":{"Net-Whois":1,"URI":1,"Storable":1,"Mac-Conversions":1,"Digest-MD5":1}}},"PA-RISC1.1":{"5.5.3":{"all":{"DBD-Oracle":1,"Curses":1}},"5.4.4":{"...
CPAN-Testers-WWW-Wiki
view release on metacpan or search on metacpan
vhost/html/js/tiny_mce/themes/advanced/skins/o2k7/ui_black.css view on Meta::CPAN
/* Black */
.o2k7SkinBlack .mceToolbar .mceToolbarStart span, .o2k7SkinBlack .mceToolbar .mceToolbarEnd span, .o2k7SkinBlack .mceButton, .o2k7SkinBlack .mceSplitButton, .o2k7SkinBlack .mceSeparator, .o2k7SkinBlack .mceSplitButton a.mceOpen, .o2k7SkinBlack .mceLi...
.o2k7SkinBlack table, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack .mceMenuItemTitle span.mceText, .o2k7SkinBlack .mceStatusbar div, .o2k7SkinBlack .mceStatusbar span, .o2k7SkinBlack .mceStatusbar a {background:#535353; color:#FFF}
.o2k7SkinBlack table.mceListBoxEnabled .mceText, o2k7SkinBlack .mceListBox .mceText {background:#FFF; border:1px solid #CBCFD4; border-bottom-color:#989FA9; border-right:0}
.o2k7SkinBlack table.mceListBoxEnabled:hover .mceText, .o2k7SkinBlack .mceListBoxHover .mceText, .o2k7SkinBlack .mceListBoxSelected .mceText {background:#FFF; border:1px solid #FFBD69; border-right:0}
.o2k7SkinBlack .mceExternalToolbar, .o2k7SkinBlack .mceListBox .mceText, .o2k7SkinBlack div.mceMenu, .o2k7SkinBlack table.mceLayout, .o2k7SkinBlack .mceMenuItemTitle a, .o2k7SkinBlack table.mceLayout tr.mceFirst td, .o2k7SkinBlack table.mceLayout, .o...
.o2k7SkinBlack table.mceSplitButtonEnabled:hover a.mceAction, .o2k7SkinBlack .mceSplitButtonHover a.mceAction, .o2k7SkinBlack .mceSplitButtonSelected {background-image:url(img/button_bg_black.png)}
.o2k7SkinBlack .mceMenu .mceMenuItemEnabled a:hover, .o2k7SkinBlack .mceMenu .mceMenuItemActive {background-color:#FFE7A1}
CPAN
view release on metacpan or search on metacpan
distroprefs/KVAIL.Tk-Stderr.yml
distroprefs/KWILLIAMS.AI-Categorizer.yml
distroprefs/KWILLIAMS.Crypt-SKey.yml
distroprefs/KWILLIAMS.Module-Build.yml
distroprefs/LAMPRECHT.Tk-GraphItems.yml
distroprefs/LDS.Crypt-CBC.yml
distroprefs/LDS.GBrowse.yml
distroprefs/LEAKIN.File-Rsync.yml
distroprefs/LETO.Math-GSL.yml
distroprefs/LICHTKIND.Kephra.yml
distroprefs/LOCAL.trailing_dot_distros.yml
CPANPLUS-Dist-Debora
view release on metacpan or search on metacpan
lib/CPANPLUS/Dist/Debora/Package.pm view on Meta::CPAN
'Apache-Htpasswd' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Cache-Cache' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Canary-Stability' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'CGI-FormBuilder' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'CGI-FormBuilder-Source-Perl' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Crypt-CBC' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Encode-Detect' => 'MPL-1.1',
'Guard' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Iterator' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Iterator-Util' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
'Lingua-EN-Words2Nums' => 'Artistic-1.0-Perl OR GPL-1.0-or-later',
CPANPLUS-Dist-Gentoo
view release on metacpan or search on metacpan
lib/CPANPLUS/Dist/Gentoo/Maps.pm view on Meta::CPAN
Class-Loader class-loader
Class-ReturnValue class-returnvalue
Config-General config-general
Convert-ASCII-Armour convert-ascii-armour
Convert-PEM convert-pem
Crypt-CBC crypt-cbc
Crypt-DES_EDE3 crypt-des-ede3
Crypt-DH crypt-dh
Crypt-DSA crypt-dsa
Crypt-IDEA crypt-idea
Crypt-Primes crypt-primes
CPANSA-DB
view release on metacpan or search on metacpan
lib/CPAN/Audit/DB.pm view on Meta::CPAN
use warnings;
our $VERSION = '20260419.002';
sub db {
{"dists" => {"ActivePerl" => {"advisories" => [{"affected_versions" => ["==5.16.1.1601"],"cves" => ["CVE-2012-5377"],"description" => "Untrusted search path vulnerability in the installation functionality in ActivePerl 5.16.1.1601, when installed in...
}
__PACKAGE__;
CPU-Z80-Assembler
view release on metacpan or search on metacpan
t/data/test_z80.asm view on Meta::CPAN
push af ; 0CB7 F5
PUSH AF ; 0CB8 F5
push bc ; 0CB9 C5
push de ; 0CBA D5
push hl ; 0CBB E5
push ix ; 0CBC DD E5
push iy ; 0CBE FD E5
res 0,(hl) ; 0CC0 CB 86
RES 0,(HL) ; 0CC2 CB 86
res 0,(ix) ; 0CC4 DD CB 00 86
res 0,(ix),a ; 0CC8 DD CB 00 87
( run in 0.933 second using v1.01-cache-2.11-cpan-39bf76dae61 )