#!perl -pl
1 while s/(\b\w+\b)(.*=.*)\W\1\b/$2/;$_=/\w/?"different":"same"