Help for this page
sub ident { my $value = ( values %{ $_[0] } )[0]; ... } return 1; }
return 0 unless ( defined $value xor defined $_ ) and ( $value eq $_ ) +;
www.com | www.net | www.org
No recent polls found