$Leaves = 60; $Leaves-- until $Leaves eq '0';