Select Code to Download

my %Log_names = (
               "BM_therm_boiler_00_state"  => { 'events_log' => 1 },
...
               "BM_swi_"  => { 'device_log' => 1 },
              );

if exists $Log_names{"BM_light_test_00_"}{"device_log"}

$VAR1 = {
          'BM_light_test_00_' => {},
...
                                         'events_log' => 1
                                       }
        };