Re: Wiping Out Values

What you want is to start over at level X1. So, the following is one way to do it.

foreach (@achievement){
    @results = () if /level [BC]1/;
    push (@results,$_);
    print "Result = @results\n";
}
[download]

Comment on Re: Wiping Out Values Download Code

Replies are listed 'Best First'.
Re^2: Wiping Out Values by tadman (Prior) on May 26, 2001 at 12:52 UTC
Or, alternatively, you could merely reset when the number goes down instead of going up. As in: `my $l_level = 0; foreach (@achievement){ my ($level) = /(\d+)$/; @results = () if ($level < $l_level); push (@results,$_); print "Result = @results\n"; $l_level = $level; }` [download]	[reply] [d/l]