foreach (@tcp_utilization_metrics) { print "$tcp_utilization_adapter_names{$_}\n"; }