#!/usr/bin/perl
use utf8;
use strict;
use warnings;
my $process = qq(\x{2013}); $process =~ s/\\x\{[0-9]+\}//sg ;
IyEvdXNyL2Jpbi9wZXJsCnVzZSB1dGY4Owp1c2Ugc3RyaWN0Owp1c2Ugd2FybmluZ3M7CgpteSAkcHJvY2VzcyA9IHFxKFx4ezIwMTN9KTsKJHByb2Nlc3MgPX4gcy9cXHhce1swLTldK1x9Ly9zZyA7CnByaW50ICRwcm9jZXNzOw==