perl: humanreadable display of UTF-8 characters in terminal

uni2utf8.pl

#!/usr/bin/perl
# Convert \u1234 sequences (e.g. from Wikipedia) 
# to characters the terminal can display.
#
# example call:
# curl -sL -H "Accept: text/turtle" "http://dbpedia.org/resource/Pudding" | uni2utf8.pl 

use strict;
use warnings;

binmode(STDOUT, ':utf8');

while (<>) {
    s/\\u([0-9a-fA-F]{4})/chr(hex($1))/eg;
    print;
}