The program does not even seem to get into the first if statement... thanks, billsub check_dcr { my(@keys) = keys %temp_dcr; foreach $key (@keys) { if ("$temp_dcr{$key}{RightNavLaunchDate}" le $today) { if ("$temp_dcr{$key}{ShowPersonal}" eq "Personal") { $pers_dcr_files{$key} = $temp_dcr{$key}; } if ("$temp_dcr{$key}{ShowHome}" eq "Home") { $home_dcr_files{$key} = $temp_dcr{$key}; } if ("$temp_dcr{$key}{ShowBusiness}" eq "Business") { $bus_dcr_files{$key} = $temp_dcr{$key}; } } # End if statement to check for Launch Date } # End foreach loop to check all keys in the temporary hash } # End routine to check the temp hash and send out keys to specified +hashes
In reply to Hash Problems by wstarrs
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |