Select Code to Download

use strict;
use warnings;
...
print "Result list:  ";
print "@result\n\n";
undef @result;

Input list:  1 2
Result list:
...

Input list:  2 4
Result list:  1 3