perl -nle "print qq{$1 => $2} while /(\S+)=(\S+)/g" data.txt