From 1898fee71e16a96c7909af2453061eb8d25eadf0 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Wed, 4 Sep 2019 20:23:23 +0200
Subject: [PATCH] assume standard input/output is utf8

Fixes length calculation of unicode data.
---
 graph | 1 +
 1 file changed, 1 insertion(+)

diff --git a/graph b/graph
index 093ed65..ad1225b 100755
--- a/graph
+++ b/graph
@@ -2,6 +2,7 @@
 use 5.014;
 use warnings;
 use List::Util qw( max sum );
+use open qw( :std :utf8 );
 
 our $VERSION = '1.00';
 
-- 
2.30.0