Help for this page
my @sockets; foreach my $i (0..9) { ... } # Use the sockets here as $sockets[1], $sockets[2], etc.