#!/usr/bin/perl

use strict;
use warnings;
use feature qw/say/;

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

__DATA__
JDW-HP 1MVWV93V7j2Hxsa0Ag6 24:00:00 SUBJECT_EXACT _Did you<A0>serve our<A0>country? -New VA Home.Loan Program_
JDW-HP 1MVWV98Ddd4fLsa0Ag6 24:00:00 SUBJECT_EXACT Did.you.serve_our country? New-VA Home<A0>Loan Program_