if ( $dag_stat eq ".." && $dag_stataf eq "Z" ) { $melding = "vm werk en nm ziek "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "M" ) { $melding = "vm werk en nm missie "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "V" ) { $melding = "vm werk en nm verlof "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "A" ) { $melding = "vm werk en nm afwezig "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "R" ) { $melding = "vm werk en nm recuup "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "S" ) { $melding = "vm werk en nm speciaal verlof "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "P" ) { $melding = "vm werk en nm part time "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "C" ) { $melding = "vm werk en nm compensatie "; } 
if ( $dag_stat eq ".." && $dag_stataf eq "N" ) { $melding = "vm werk en nm ploegen "; } 
 
if ( $dag_stat eq "ZZ" && $dag_stataf eq "Z" ) { $melding = "heel de dag ziek "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "." ) { $melding = "vm ziek en nm werk "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "M" ) { $melding = "vm ziek en nm missie "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "V" ) { $melding = "vm ziek en nm verlof "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "A" ) { $melding = "vm ziek en nm afwezig ZC "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "R" ) { $melding = "vm ziek en nm recuup "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "S" ) { $melding = "vm ziek en nm speciaal verlof "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "P" ) { $melding = "vm ziek en nm part time "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "C" ) { $melding = "vm ziek en nm compensatie "; } 
if ( $dag_stat eq ".Z" && $dag_stataf eq "N" ) { $melding = "vm ziek en nm ploegen "; }

my %dag_stat = ( 
    ".." => { 
        "Z" => "vm werk en nm ziek ", 
        "M" => "vm werk en nm missie ", 
    }, 
    "ZZ" => { 
        "Z" => "heel de dag ziek ", 
    }, 
    ".Z" => { 
        "." => "vm ziek en nm werk ", 
        "M" => "vm ziek en nm missie ", 
        "V" => "vm ziek en nm verlof ", 
    }, 
); 
 
$melding = $dag_stat{$dat_stat}->{$dag_stataf};

my %dag_stat = ( 
    "default" => { 
        "Z" => "vm werk en nm ziek ", 
        "M" => "vm werk en nm missie ", 
    }, 
    ".." => { 
        "Z" => "vm werk en nm ziek (Z)", 
    }, 
); 
 
$melding = $dag_stat{$dat_stat}->{$dag_stataf}  
        || $dag_stat{'default'}->{$dag_stataf} 
        || "";