https://jakerpomperada.com/assignment-operators-in-perl/