#!perl -p
s;.*${\hex}|\w*$;0x$&