From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 22 Aug 2020 16:48:04 +0000 (+0100)
Subject: msgpack-dump
X-Git-Tag: otter-0.2.0~1114
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=dc81e4f569cc67e2c8ed0a350072ab8e57eb413a;p=otter.git

msgpack-dump
---

diff --git a/msgpack-dump b/msgpack-dump
new file mode 100755
index 00000000..e14cbd08
--- /dev/null
+++ b/msgpack-dump
@@ -0,0 +1,9 @@
+#!/usr/bin/perl -w
+use strict;
+use Data::MessagePack;
+use Data::Dumper;
+$/ = undef;
+$!=0; $_ = <> // die $!;
+my $mp = Data::MessagePack->new();
+my $val = $mp->unpack($_);
+print Dumper($val);