Ask a New Question
Search
Questions and answers by
suria
Answers (1)
my @max = (10,50,100,99999); my @sc = (15,10,5,0); do { print "enter amount ordered: "; my $amt = ; last if $amt