NAME
Switch::Perlish::Smatch::Comparators - overall document for comparator behaviour
COMPARATORS
Below is a complete listing of the default comparators that come with Switch::Perlish.
In each comparator description $t refers to the topic and $m refers to the match, or the first and second arguments, respectively.
Array
- ARRAY
-
smatch for an element of @$m in @$t
- CODE
-
call &$m with @$t
- HASH
-
check if an element of @$t exists as a key in %$m
- OBJECT
-
check if an element of @$t exists as a method of $m
- Regexp
-
match $m against the elements of @$t
- SCALAR
-
check if $m points to an element of @$t
- UNDEF
-
return false as $t is already defined
- VALUE
-
smatch for $m in @$t
Code
- ARRAY
-
check if $m refers to $t
- CODE
-
pass %$m to $t
- HASH
-
pass @$m to $t
- OBJECT
-
pass $m to $t
- Regexp
-
pass $m to $t
- SCALAR
-
call $t with $m
- VALUE
-
call $t with $m
Hash
- ARRAY
-
check if an element of @$m exists as a key of %$t
- CODE
-
check if the return from &$m is a hash key of %$t
- HASH
-
check if a key => value pair exists in both %$t and %$m
- OBJECT
-
check if a key of %$t exists as a method of $m
- Regexp
-
check if any keys from %$t match $m
- SCALAR
-
check if $m points to value in %$t
- UNDEF
-
check for an undefined value in %$t (better suggestions welcome)
- VALUE
-
check if $m exists as a key in %$t
Object
- ARRAY
-
if the $t is a blessed ARRAY, delegate to the
ARRAY<=>ARRAYcomparator - CODE
-
call the $t on &$m i.e
$t->$m - HASH
-
if the $t is a blessed HASH, delegate to the
HASH<=>HASHcomparator - OBJECT
-
check if the $t->isa($m) or the same class (better suggestions welcome)
- Regexp
-
match the class of $t against the $m
- SCALAR
-
check if the $m points to the $t
- UNDEF
-
croak("Can't compare OBJECT with an undef") # suggestions welcome
- VALUE
-
check if $t has $m as a method
Regexp
- ARRAY
-
match $t for every element in @$m
- CODE
-
pass $t to $m
- HASH
-
check if any of keys of %$m match the $t
- OBJECT
-
match $t against $m's class
- Regexp
-
match $m to $t
- SCALAR
-
check if $m refers to $t
- UNDEF
-
croak("Can't compare Regexp with an undef") # suggestions welcome
- VALUE
-
match $t against $m
Scalar
- ARRAY
-
check if $t points to an element of @$m
- CODE
-
check if $t points to $m
- HASH
-
check if $t points to value in %$m
- OBJECT
-
check if the sref refers to the object
- Regexp
-
check if the sref refers to the Regexp object
- SCALAR
-
numerically compare the scalar refs
- UNDEF
-
check if $$t is undef
- VALUE
-
call
Switch::Perlish::Smatch::value_cmp()with $$t and $m
Undef
- ARRAY
-
check for an undef in @$m
- CODE
-
pass undef to &$m (to be consistent with other CODE comparators)
- HASH
-
check for an undefined value in %$m (better suggestions welcome)
- OBJECT
-
croak("Can't compare undef with OBJECT") # suggestions welcome
- Regexp
-
croak("Can't compare undef with Regexp") # suggestions welcome
- SCALAR
-
check if $$m is undef
- UNDEF
-
return true as $m is also undefined
- VALUE
-
return false as $m is already defined
Value
- ARRAY
-
check if the $t is in $m
- CODE
-
pass $t to &$m
- HASH
-
check if the $t exists as a key in $m
- OBJECT
-
check if the method $t exists in $m
- Regexp
-
regexp match $t against $m
- SCALAR
-
check if what $m points to is the same as $t
- UNDEF
-
return false, a VALUE is always defined
- VALUE
-
call
Switch::Perlish::Smatch::value_cmp()with $t and $m
SEE. ALSO
AUTHOR
Dan Brook <cpan@broquaint.com>
COPYRIGHT
Copyright (c) 2005, Dan Brook. All Rights Reserved. This module is free software. It may be used, redistributed and/or modified under the same terms as Perl itself.