Select Code to Download

  ((A & B)' | (A & C & (A & B & D)'));

#!/usr/bin/perl
use strict;
...

print "Calculated: ",$x,"\n";

Given: ((A & B)' | (A & C & (A & B & D)')) 
Calculated: (!(A & B) | !(A & C & (A & B & D)))