- fixed push to array to work also with older perl versions