#!/usr/bin/perl -p

s/([0-9a-f]{2})/chr(hex($1))/ge;
