my %logo = (
    DNI => 'logo1',
    JRN => 'logo2',
    SNI => 'logo3',
    DNI_JRN => 'logo4',
    DNI_SNI => 'logo5',
    JRN_SNI => 'logo6',
    DNI_JRN_SNI => 'logo7',
);

# ...

print my $logo = $logo{ join '_', sort $name =~ /(DNI|JRN|SNI)/g };