Of course thats not bad, and if your really going for the non-cluttered, more style code

if ($x = $y) {
   print "$y = $x\n";
}
[download]

might look better as

print "$y = $x\n" if ($x = $y);
[download]

which is basically the same thing, but easyier to type and read.

but I always look at if/ifels/else statements as a good chance to put in some nifty debugging options, IE

if ($y eq $x) {
 print "$y = $x\n";
} 
elsif ($debug eq 1) {
 print "$y != $x\n";
}
[download]

but thats just my two cents.