Select Code to Download

foreach my $z ( %abc) {
    push @ab, "-$z";    
}

foreach my $z (keys %abc) {
    push @ab, "-$z";    
}