view bin/ordu @ 8750:8934300cd6d1

<b_jonas> `` perl -i -pe \'s/("\\x241)/-- $1/\' bin/random-card
author HackBot
date Tue, 05 Jul 2016 13:39:32 +0000
parents 7f957c1f4661
children
line wrap: on
line source

#!/bin/sh
print_args_or_input "$@" | perl -C7 -pe 'chomp; $_ = join(" ", map { sprintf "U+%x", ord } split //, $_);'