Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...

my @answers = map { $data[$_] == $target ? @data[$_ + 1 .. $_ + 3] : (
+) } 0 .. $#data;
print "@answers\n";

Select or download this
```
6 7 8 4 3 2
```