my %record = (
      Currency => 'USD',
      Asset => 'Equity',
      Country => 'USA'
  );

##</code><code>##

  my $desc = join '_', @record{qw(Current Asset Country)};