my $last = -50; # set to -50 so that the first coordinate will be incl +uded as long as it is 1 or more map {say if $_ > $last + 50; $last = $_} @n;
my $last = -50; for (@n) { if ($_ > $last + 50) { say $_; } $last = $_; }
In reply to Re^5: Compare elements of a line in a file
by frozenwithjoy
in thread Compare elements of a line in a file
by oxydeepu
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |