Select Code to Download

use strict;
use warnings;
...
my $k = (split /\s+/,$eth0)[1];
$k =~ s/eth0://g;
print "$k\n";

190722498