$ perl -e 'tied sub {}->()' Can't modify reference constructor in tied at -e line 1, near "})"