Help for this page
Select Code to Download
Select
or
download this
foreach my $val (@port_list) { $val=~s/\s+$//; ... . . .