Help for this page

Select Code to Download


  1. or download this
    my %values = (
        0      => 0,
        zero   => '0',
...
         (($values{$_} or $values{$_} == 0)?1:0),
         (($values{$_} or $values{$_} eq 0)?1:0))
     foreach sort keys %values;
  2. or download this
         0 : 0 : 1 :: 1 :: 1
     1 : 1 : 0 :: 1 :: 1
 empty : 0 : 1 :: 1 :: 0
...
string : 1 : 1 :: 1 :: 1
 undef : 0 : 1 :: 1 :: 0
  zero : 0 : 1 :: 1 :: 1