Paul M Foster wrote:
>
> On Tue, Jul 10, 2001 at 10:29:31AM -0400, Derek Glidden wrote:
>
> <snip>
>
> > (I've actually had a few offers
> > to have some of my photos published based on people visiting my site,
> > primarily in educational material since one of my favorite subjects is
> > carnivorous plants, of which there are not a lot of good photos
> > available.)
>
> So, I take it there are no cats or small dogs in your house. At least,
> not any more, right? ;-}
>
> (Sorry, I couldn't resist!)
ERk! Awk! Ghhh... must ... resist ... serious urge ... to babble on ...
for fourteen pages ... about ... carnivorous plants ... must instead ...
think of ... smartaleck ... answer ... whhewwww .... urge receding ...
pressure dropping ...
--
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
#!/usr/bin/perl -w
$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;@t=map
{$_%16or$t^=$c^=($m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;
$t^=(72,@z=(64,72,$a^=12*($_%16-2?0:$m&17)),$b^=$_%64?12:0,@z)
[$_%8]}(16..271);if((@a=unx"C*",$_)[20]&48){$h=5;$_=unxb24,join
"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;$d=
unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];$d=$d>>8^($f=$t&($d
>>12^$d>>4^$d^$d/8))<<17,$e=$e>>8^($t&($g=($q=$e>>14&7^$e)^$q*
8^$q<<6))<<9,$_=$t[$_]^(($h>>=8)+=$f+(~$g&$t))for@a[128..$#a]}
print+x"C*",@a}';s/x/pack+/g;eval
usage: qrpff 153 2 8 105 225 < /mnt/dvd/VOB_FILENAME \
| extract_mpeg2 | mpeg2dec -
http://www.eff.org/ http://www.opendvd.org/
http://www.cs.cmu.edu/~dst/DeCSS/Gallery/
This archive was generated by hypermail 2.1.3 : Fri Aug 01 2014 - 15:52:31 EDT