my $netStats = `ip addr show`; my @interfaces = split /\n(?=\s*\d+:\s*)/,$netStats;