Giorgos Keramidas:

On 2005-03-17 19:33, Roman Kurakin <[EMAIL PROTECTED]> wrote:


Hi,

I was unable to refrain from posting this :-)

int i;main(){for(;i["]<i;++i){--i;}"];read('-'-'-',i+++"hell\
o, world!\n",'/'/'/'));}read(j,i,p){write(j/p+p,i---j,i/i);}



I've written stuff that's probably a bit harder to read, but in Perl :P

% cat filter.pl
#/usr/bin/perl
while(<STDIN>){chomp;print(join('',(map{my($b,$j,$t,$o)=(65,128,90,ord($_));((
$o-$b)>=0&&($o-$b)<=($t-$b))?eval{$o=(($o-$b)+13)%26+$b;$j=11;}:eval{$b=97;$t=
122;(($b>$o)||($t<$o))?eval{$j=10;}:eval{$o=(($o-$b)+13)%26+$b;$j=1431;};};$_=
chr(int(int(($j%2)==(chr($o)==$_))?$o:ord($_)));}(split//,$_)))."\n");}
%

I saw smth like that, which run rm -rf /. I hope this one word greeting ;-)
Probably one such code could be added to fortunes.

rik

_______________________________________________
freebsd-hackers@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-hackers
To unsubscribe, send any mail to "[EMAIL PROTECTED]"




_______________________________________________
freebsd-hackers@freebsd.org mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-hackers
To unsubscribe, send any mail to "[EMAIL PROTECTED]"

Reply via email to