my @arr = (0,1,2,3,4,5,6,8,10); # # # # Giving $VAR = [1,4,8];