$life -= 1 while $programming_knowledge > $life;