Select Code to Download

my @points = map { s/\s+//; $_ } split(/\t/, $_);

my @points = map { local $_ = $_; s/\s+//; $_ } split(/\t/, $_);

use List::MoreUtils qw( apply );
my @points = apply { s/\s+// } split(/\t/, $_);