Perlito5 - TODO update (use vars/use constant)