50. foreach $key (keys %hash) {
51.    my $tmp = $_;    
52.    my $cmd = "$program $key $matrix ";
53.    $cmd .= "$config_path/CISCO_$tmp.clean " for @{$hash{$key}};
54.    system($cmd) == 0 || die "$cmd failed:$!\n";
55.  }