Select Code to Download

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

name => abc
dep => HR
...
dep => Sales
type => contract
age => 31