Delete from hash : delete « Hash « Perl






Delete from hash

    

#!C:/Perl/Bin

%animals = (H=> 'h', S=> 's', G=> 'g');

print "$animals{'S'} \n\n";

foreach $creature(keys %animals)
{
     print "$creature \n";
}

print "\n\ndeleting...\n\n";

delete($animals{Shark});

foreach $creature(keys %animals)
{
     print "$creature \n";
}

print "\n\n'emptying' the hash ...\n\n";

%animals=();
print "Displaying empty hash ...\n\n";

foreach $creature(keys %animals)
{
     print "$creature \n";
}

   
    
    
    
  








Related examples in the same category

1.Delete the element with key 'Joe' from %hash
2.Delete an entry in hash
3.The delete Function
4.The delete operator removes a key/value pair from an associative array.
5.Check key existance after using 'delete' operator