Does pclose() send an eof down the pipe or do I need to close it
explicitly.  The man page only stated that pclose wait4'd on the child
process.

Thanks
Kevin Sivits

    .......  [EMAIL PROTECTED]
     `:::'     Kevin Sivits  .......  ......
      :::  *                  `::.    ::'    one world
      ::: .::  .:.::.  .:: .::  `::. :'      one people 
      :::  ::   ::  ::  ::  ::    :::.      one goverment
      ::: .::. .::  ::.  `::::. .:'  ::.       one OS
    ..:::.....................::'   .::::.

#!/bin/perl -sp0777i<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<j]dsj
$/=unpack('H*',$_);$_=`echo 16dio\U$k"SK$/SM$n\EsN0p[lN*1
lK[d2%Sa2/d0$^Ixp"|dc`;s/\W//g;$_=pack('H*',/((..)*)$/)

from sys import*;from string import*;a=argv;[s,p,q]=filter(lambda x:x[:1]!=
'-',a);d='-d'in a;e,n=atol(p,16),atol(q,16);l=(len(q)+1)/2;o,inb=l-d,l-1+d
while s:s=stdin.read(inb);s and map(stdout.write,map(lambda i,b=pow(reduce(
lambda x,y:(x<<8L)+y,map(ord,s)),e,n):chr(b>>8*i&255),range(o-1,-1,-1))) 

Please visit http://online.offshore.com.ai/arms-trafficker/     

Reply via email to