Damn keys

print"$_ is married to $a{$_}$*"for sort keys%{*a=*couples}
[download]

is the same whereas

print"$_ is married to $a{$_}$*"for sort keys*a=*couples
[download]

is no go and

print"$_ is married to $a{$_}$*"for sort keys%a=%couples
[download]

is just not right...

--
perl -pew "s/\b;([mnst])/'$1/g"