Select Code to Download

my @raw_data = `ip link`;
my @NIC = grep { /^\d+:\ /; } @raw_data;
...
    s/^[0-9]+:\ ([a-z]+[0-9]*):\ .*$/$1/;
}
Data::Dump::dd(@NIC);