#ex_09-2 #Learning Perl Appendix A, Exercise 9.2 { print "Enter a number (999 to quit): "; chomp($n = ); last if $n == 999; $sum += $n; redo; } print "the sum is $sum\n";