while(<DATA>) {
    chomp;
    s/<([0-9A-F]+)>/hex($1)/eg;
    print "$_\n";
}