my %Log_names = (
"BM_therm_boiler_00_state" => { 'events_log' => 1 },
"BM_therm_house_00_state" => { 'events_log' => 1 },
"BM_therm_hpump_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_' => {},
'BM_swi_' => {
'device_log' => 1
},
'BM_therm_house_00_state' => {
'events_log' => 1
},
'BM_therm_boiler_00_state' => {
'events_log' => 1
},
'BM_therm_hpump_00_state' => {
'events_log' => 1
}
};