Re: Perl create tcp connections

2006-12-12 Thread Lawrence Statton XE2/N1GAK
Take a step back -- what are you trying to accomplish? -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- Lawrence Statton - [EMAIL PROTECTED] s/aba/c/g Computer software consists of only two components: ones and zeros, in roughly equal proportions. All that is requ

RE: Perl create tcp connections

2006-12-12 Thread Ron McKeever
Thanks for the updates, I understand. Then perhaps someone can help me get this script to set the tcp to SYN_SENT on 100 ports: #!/usr/bin/perl use Socket; $count=3500; while ($count<3601) { $count++; $addr=sockaddr_in($count,inet_aton('localhost')); socket(S,PF_INET,SOCK_STREAM,getprotobynam

Re: Perl create tcp connections

2006-12-11 Thread Jeff Pang
> >I was looking to have many EST when doing netstat, but only see >tcp 0 1 192.168.0.20:46216 127.0.0.1:3501 SYN_SENT > > >Any help??? > Only when the other-end open those ports you're connecting to,you could have the chances to establish the connections. -- Books be

Re: Perl create tcp connections

2006-12-11 Thread Lawrence Statton XE2/N1GAK
> > Hello, > > Im wondering how I can create on my localhost 100 tcp EST connections? > Can I use perl sockets? > Are there a hundred servers listening on ports 3501 through 3600? You're not going to move to established in the state machine if there isn't someone listening. -- -- -- -- -- --

Perl create tcp connections

2006-12-11 Thread Ron McKeever
Hello, Im wondering how I can create on my localhost 100 tcp EST connections? Can I use perl sockets? #!/usr/bin/perl use Socket; $count=3500; while ($count<3601) { $count++; $addr=sockaddr_in($count,inet_aton('localhost')); socket(S,PF_INET,SOCK_STREAM,getprotobyname('tcp')); connect(S,$addr)