Skip to content
Bitcoin network protocol in perl6
Branch: master
Clone or download
Fetching latest commit…
Cannot retrieve the latest commit at this time.
Type Name Latest commit message Commit time
Failed to load latest commit information.

the bitcoin protocol in perl6, because why not.

run from source

$ git clone
Cloning into 'blkmev'...
remote: Counting objects: 451, done.
remote: Compressing objects: 100% (268/268), done.
remote: Total 451 (delta 240), reused 363 (delta 152), pack-reused 0
Receiving objects: 100% (451/451), 88.04 KiB | 117.00 KiB/s, done.
Resolving deltas: 100% (240/240), done.
Checking connectivity... done.
$ cd blkmev
$ zef install .
===> Testing: BlkMev
===> Testing [OK] for BlkMev
===> Installing: BlkMev

1 bin/ script [blkmev] installed to:

blkmev <bitcoin|bitcoincash|litecoin|dogecoin> [seed peer]

$ ./bin/blkmev dogecoin
* pool new client dogecoin {:host("")}. pool size 1
* connecting dogecoin [dogecoin] -> VERSION 1100004 BlkMev:dogecoin block height 2150000 payload len 100 [dogecoin] command: VERSION (105 bytes) [dogecoin] /Shibetoshi:1.10.0/ version #70004 height #2220526 [dogecoin] -> VERACK [dogecoin] command: VERACK (0 bytes) [dogecoin] command: PING (8 bytes) [dogecoin] -> pong d012d0c672c01404 [dogecoin] command: GETHEADERS (1093 bytes) [dogecoin] command: INV (37 bytes) [dogecoin] TX 4b5f4c7b23d52ff2c7ca6a7aec7ee66923f3887d2a306b249921926ad00a3a9d mempool#1 [dogecoin] command: ADDR (30003 bytes) [dogecoin] peers: [20:01:00:00:9d:38:6a:bd:08:5f:17:ed:23:12:a0:19] 22556 ... 1000 peer addresses


  • build hashlock/timelock transactions and watch the mempool as the atomic swap process progresses.
You can’t perform that action at this time.