On Thu, Mar 08, 2001 at 04:58:11PM +, [EMAIL PROTECTED] wrote:
This includes the new way to get the source via the DNS, which still works, and
doesn't use zone transfers:
for DVDs in Linux screw the MPAA and ; do dig $DVDs.z.zoy.org ; done | \
perl -ne 's/\.//g; print
Wow! A perl post on london.pm...
I know most people here probably read Slashdot, but this was too sweet to
pass up.
#!/usr/bin/perl -w
# 526-byte qrpff, Keith Winstein and Marc Horowitz [EMAIL PROTECTED]
# MPEG 2 PS VOB file on stdin - descrambled output on stdout
# arguments: title key bytes
its at times like this, the fact we are archived suddenly seems
a good thing (TM)
* Simon Batistoni ([EMAIL PROTECTED]) wrote:
Wow! A perl post on london.pm...
I know most people here probably read Slashdot, but this was too sweet to
pass up.
#!/usr/bin/perl -w
# 526-byte qrpff, Keith
Simon Batistoni sent the following bits through the ether:
I know most people here probably read Slashdot, but this was too sweet to
pass up.
It's cute. Doing the 'x' - 'pack+' substition by hand and then
running through perltidy (http://perltidy.sourceforge.net/, does a
pretty good job)
Nice. I'm sure it can easily be shortened some more.
Without even understanding what it does, it seems pretty clear
that we can shave 2 bytes by changing:
$_='while(read+STDIN,$_,2048){
into
$_='$/=\2048;while(STDIN){
Any more obvious shavings?
.robin.
--
Satan, oscillate my
Robin Houston wrote:
Any more obvious shavings?
Try posting to Fun With Perl; they like playing golf there.
Cheers,
Philip
--
Philip Newton [EMAIL PROTECTED]
All opinions are my own, not my employer's.
If you're not part of the solution, you're part of the precipitate.
On Wed, Mar 07, 2001 at 04:44:54PM +0100, Philip Newton wrote:
Try posting to Fun With Perl; they like playing golf there.
What do you think I did, immediately after posting here? :-)
FWP is so bloody slow though, that it hasn't got there yet
AFAICT...
.robin.
--
God! a red nugget: a fat
its at times like this, the fact we are archived suddenly seems
a good thing (TM)
That occurred to me as I was posting it, although it could actually make it
a violation of the DMCA to read our archive anywhere inside the borders of
the US... :)
Anyway, the guy who originally posted the perl