Unknown-Values
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
lib/Unknown/Values/Instance.pm view on Meta::CPAN
use overload @to_overload, '""' => 'to_string';
my $CORE_UNKNOWN = __PACKAGE__->new;
sub to_string {
confess("Attempt to coerce unknown value to a string");
}
sub new {
my $class = shift;
my $unknown = bless {} => $class;
return $unknown;
}
# this helps to prevent some infinite loops
sub bool {$CORE_UNKNOWN}
sub compare {
# this suppresses the "use of unitialized value in sort" warnings
wantarray ? () : 0;
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.607 second using v1.00-cache-2.02-grep-82fe00e-cpan-48ebf85a1963 )