Help for this page

Select Code to Download


  1. or download this
            if($a0 eq "0" && $a1 eq "0" && $d0 eq "1") {return 1;}
        if($a0 eq "1" && $a1 eq "0" && $d1 eq "1") {return 1;}
        if($a0 eq "0" && $a1 eq "1" && $d2 eq "1") {return 1;}
        if($a0 eq "1" && $a1 eq "1" && $d3 eq "1") {return 1;}
return 0;
  2. or download this
    #!/usr/bin/perl

use strict;
...
        }
    }
}