#!/usr/bin/perl -lp
s{=(..)}{pack("H*",$1)}egs;
