Changing learning perl content.