Select Code to Download

my ($first, $second, $third) = split ' ', $line;

my ($first, undef, $third) = split ' ', $line;

my ($first, $third) = (split ' ', $line)[0, 2];