if ($x = $y) {
   print "$y = $x\n";
} else {
   #waste of space
}