# Not supported sub CLEAR{ carp q(Clear is not supported, use delete $hash{$key} for specified $key) }