Help for this page
$employee->salary($employee->salary()*1.1);
$employee->salary() *= 1.1;
#! perl -slw use strict; ... __END__ 3 4.5