London.pm List Weekly Summary 2001-03-05
This is the seventh of hopefully many weekly summaries of the London Perl Mongers mailing list. Many thanks to Simon Wistow for doing the summary last week! For the somewhat quiet week starting 2001-03-05: Don't forget the London.pm website for meetings etc. There is an unofficial London.pm heretic meeting tonight in the cozy bar with the open fire in the Anchor, Bankside, from 6.30ish: http://london.pm.org/ Marcel Grunauer, DJ Adams, Piers Harding and I went to the German Perl Workshop in Bonn, which was excellent. DJ took some piccies. I won a prize: http://www.pipetree.com/~dj/perlworkshop2001/ http://www.perl-workshop.de/2001/ http://use.perl.org/articles/01/03/06/0258251.shtml Hamlet D'Arcy is organising a trip to Bletchley Park, possibly on Sunday March 18th, to see things like the 'bombe' rebuild project, a history of computing exhibit, and hopefully lots of crypto stuff. Should be fun! http://www.bletchleypark.org.uk/ http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02603.html Mark Fowler asked about programs to produce graphical documentation, and got sucked into GraphViz stuff, although dia was also mentioned. Marcel produced GraphViz::DBI. Everyone enjoyed the pretty pictures: http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02608.html http://www.gnome.org/gnome-office/dia.shtml http://search.cpan.org/search?dist=GraphViz-DBI http://www.codewerk.f2s.com/images/mydb.gif Jonathan Peterson asked about the thesis generator that Damian Conway mentioned in his talk. Robin Houston and I pointed out links to the original Sokal hoax, the Dada Engine, and the postmodernism generator: http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02620.html http://www.physics.nyu.edu/faculty/sokal/ http://dev.null.org/dadaengine/ http://www.csse.monash.edu.au:80/publications/1996/tr-cs96-264.ps.gz http://www.elsewhere.org/cgi-bin/postmodern/ I passed on the announcement of HAL2001, a hacking and security conference in The Netherlands this summer, and realised that this makes three consecutive weeks with conferences this summer that I want to go to: O'Reilly's Open Source Convention, yapc::Europe, and HAL2001. Eeek: http://www.hal2001.org/ Dave Hodgkinson asked about scraping newsfeeds. Everybody pointed him at RSS: http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02658.html http://purl.org/rss/1.0/ http://www.xmltree.com/ Simon Wistow is organising a Kevin Smith Film Fest on Saturday, where he'll try to fit in Clerks, Mallrats, Chasing Amy, Dogma and the Clerks animated series. Some people unlurked. Some people discussed which films they liked: http://www.twoshortplanks.com/simon/filmfest/ http://us.imdb.com/Name?Smith,+Kevin http://www.viewaskew.com/ And finally, Simon Batistoni posted a small Perl script (shock, horror) that descrambled CSS (the DVD protection wotsit). It's cute Perl, but he tried to optimise it, whereas I tried to make it clearer (with perltidy). It's currently being made smaller on the fun-with-perl list: http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02644.html http://www.mail-archive.com/london-pm%40lists.dircon.co.uk/msg02647.html http://perltidy.sourceforge.net/ http://www.technofile.org/depts/mlists/fwp.html Leon -- Leon Brocard.http://www.astray.com/ yapc::Europehttp://yapc.org/Europe/ ... I've got a mind like a.. a.. what's that thing called?
Am I going nutts ? - read before answering!
Hi folks, got an odd one for you:
Why is Dprof saying my LTest::BEGIN and mail::BEGIN
are running twice ?
%Time ExclSec CumulS #Calls sec/call Csec/c Name
33.4 0.010 0.010 2 0.0050 0.0050 main::BEGIN<- ?
0.00 0.000 -0.000 1 0. - strict::import
0.00 0.000 -0.000 1 0. - strict::bits
0.00 0.000 -0.000 2 0. - LTest::BEGIN <- ?
0.00 0.000 -0.000 1 0. - Test2::BEGIN
I've actually got this problem but magnified in a larger
project which I'm trying to find a memory leak in.. I don't now
if this is related (BEGIN being run 4 to 17 times! in different
packages).
Is this my code, my not understanding Dprof or something else ?
perl -v
This is perl, v5.6.0 built for i386-linux
test.pl
---
#!/usr/bin/perl
use strict;
use LTest;
package LTest;
BEGIN {
use Test2;
warn "Test is beginning\n";
}
print "Here\n";
1;
package Test2;
BEGIN {
warn "Test2 is beginning\n";
}
1;
Oh, running this code gives:
>./test.pl
Test2 is beginning
Test is beginning
Here
Making is even wierder! As 'Test is..' only
prints once.
Any help is much appreciated.
Cheers
Leo
Re: Am I going nutts ? - read before answering!
I think the answer is that both the modules where the BEGINS are called
twice have "use" in them. "use" means "BEGIN {require Module}", so BEGIN is
being called once when the module is entered, and once when it is used.
Rob
At 02:39 PM 3/8/01 +, Leo wrote:
>Hi folks, got an odd one for you:
>
>Why is Dprof saying my LTest::BEGIN and mail::BEGIN
>are running twice ?
>
>%Time ExclSec CumulS #Calls sec/call Csec/c Name
> 33.4 0.010 0.010 2 0.0050 0.0050 main::BEGIN<- ?
> 0.00 0.000 -0.000 1 0. - strict::import
> 0.00 0.000 -0.000 1 0. - strict::bits
> 0.00 0.000 -0.000 2 0. - LTest::BEGIN <- ?
> 0.00 0.000 -0.000 1 0. - Test2::BEGIN
>
>I've actually got this problem but magnified in a larger
>project which I'm trying to find a memory leak in.. I don't now
>if this is related (BEGIN being run 4 to 17 times! in different
>packages).
>
>Is this my code, my not understanding Dprof or something else ?
>
>perl -v
>This is perl, v5.6.0 built for i386-linux
>
>test.pl
>---
>#!/usr/bin/perl
>use strict;
>use LTest;
>
>package LTest;
>
>BEGIN {
> use Test2;
>warn "Test is beginning\n";
>}
>
>print "Here\n";
>
>1;
>
>package Test2;
>
>BEGIN {
>warn "Test2 is beginning\n";
>}
>
>1;
>
>
>Oh, running this code gives:
>
>>./test.pl
>Test2 is beginning
>Test is beginning
>Here
>
>Making is even wierder! As 'Test is..' only
>prints once.
>
>Any help is much appreciated.
>
>Cheers
>
>Leo
>
>
--
Robert Price - Technical Manager - EMAP Digital Travel | Tel: 0207 3092711
Priory Court, 30-32 Farringdon Lane, London, EC1R 3AW | Fax: 0207 3092718
Re: Am I going nutts ? - read before answering!
On Thu, Mar 08, 2001 at 02:59:27PM +, Robert Price wrote:
> I think the answer is that both the modules where the BEGINS are called
> twice have "use" in them. "use" means "BEGIN {require Module}", so BEGIN is
> being called once when the module is entered, and once when it is used.
>
> Rob
>
- SNIP -
Fraid not.. tried moving the use out of the BEGIN before and it
made no difference:
package LTest;
use Test2;
BEGIN {
warn "Test is beginning\n";
}
print "Here\n";
1;
Thanks
Leo
Scraping news feeds?
> "DH" == Dave Hodgkinson <[EMAIL PROTECTED]> writes: DH> What's the best way to scrape a variety of news headlines from DH> various sites? Sort of a moreover for the intranet... Find their AvantGo equivalents, and scrape those instead. - Adam
Re: Kevin Smith (and intro)
On Tue, 6 Mar 2001, Lucy McWilliam wrote: > > On Tue, 6 Mar 2001, Jon Eyre wrote: > > > Anyone else drink too much and wake up on a train in the middle of > > Hampshire thursday night? Or was it just me..? > > No, that was just you. > > > 'lo, BTW. I'm Lucy and I'm not in Nodnol, but Cambridge doesn't have a > .pm (yet!). I use Perl to do vague genome mapping, computer biology, > PhD type things. > > Hello, You must have snuck in whilst I wasnt paying attention :) /J\ -- Jonathan Stowe | http://www.gellyfish.com | I'm with Grep on this one http://www.tackleway.co.uk |
Re: Am I going nutts ? - read before answering!
At 02:52 PM 3/8/01 +, you wrote:
>On Thu, Mar 08, 2001 at 02:59:27PM +, Robert Price wrote:
>> I think the answer is that both the modules where the BEGINS are called
>> twice have "use" in them. "use" means "BEGIN {require Module}", so BEGIN is
>> being called once when the module is entered, and once when it is used.
>>
>> Rob
>>
>- SNIP -
>
>Fraid not.. tried moving the use out of the BEGIN before and it
>made no difference:
>
>package LTest;
>
>use Test2;
>
>BEGIN {
>warn "Test is beginning\n";
>}
[snip]
But you are still calling "use", and as I said earlier, that means there
are still 2 BEGIN blocks, so both are being called. Test2 only has the one
BEGIN call because it doesn't try to use.
For example, your code is roughly the same as...
package LTest;
BEGIN {require Test2};
BEGIN {
warn "Test is beginning\n";
}
So you can see there are two BEGIN blocks that are being called.
Or am I talking out of my arse? :-)
Rob
--
Robert Price - Technical Manager - EMAP Digital Travel | Tel: 0207 3092711
Priory Court, 30-32 Farringdon Lane, London, EC1R 3AW | Fax: 0207 3092718
Re: Am I going nutts ? - read before answering!
Oh, actually do you mean it is the same at:
pageage LTest;
BEGIN {require Test2}
BEGIN { warn "." }
print "Here\n"
1;
Ok, that kind'a make sence..
Cheers
Leo <- who is slowly getting there.
On Thu, Mar 08, 2001 at 02:52:48PM +, Leo Lapworth wrote:
> On Thu, Mar 08, 2001 at 02:59:27PM +, Robert Price wrote:
> > I think the answer is that both the modules where the BEGINS are called
> > twice have "use" in them. "use" means "BEGIN {require Module}", so BEGIN is
> > being called once when the module is entered, and once when it is used.
> >
> > Rob
> >
> - SNIP -
>
> Fraid not.. tried moving the use out of the BEGIN before and it
> made no difference:
>
> package LTest;
>
> use Test2;
>
> BEGIN {
> warn "Test is beginning\n";
> }
>
> print "Here\n";
>
> 1;
>
>
> Thanks
>
> Leo
>
Re: Am I going nutts ? - read before answering!
Leo Lapworth wrote:
> BEGIN {
You forgot here: warn "In A.D. 2101\n";
> warn "Test is beginning\n";
> }
>
> print "Here\n";
And this should be 'print "What happen?\n";'.
Cheers,
Phi "SCNR" lip
--
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.
Re: Am I going nutts ? - read before answering!
At 03:03 PM 3/8/01 +, you wrote:
>Oh, actually do you mean it is the same at:
>
>pageage LTest;
>
>BEGIN {require Test2}
>BEGIN { warn "." }
>
>print "Here\n"
>
>1;
[snip]
Yup, that's right. So to get it to only have the one call, change your
"use" to a require and put it in the BEGIN block.
Rob
--
Robert Price - Technical Manager - EMAP Digital Travel | Tel: 0207 3092711
Priory Court, 30-32 Farringdon Lane, London, EC1R 3AW | Fax: 0207 3092718
Re: heretics meeting
anyone fancy going early to this - i'm pretty exhausted with work and wouldn't mind getting an early pint in * Greg McCarroll ([EMAIL PROTECTED]) wrote: > > Just a reminder, that the heretics meeting will be held in > the cozy bar with the open fire in the Anchor, Bankside. > > I'll be there from about 6.30ish onwards i'd guess, i predict > a fairly quiet evening of relaxation. Also people can laugh > as a hobble around with my ``broken'' toe. > > > > -- > Greg McCarroll http://www.mccarroll.uklinux.net -- Greg McCarroll http://www.mccarroll.uklinux.net
Re: Am I going nutts ? - read before answering!
> Yup, that's right. So to get it to only have the one call, change your
> "use" to a require and put it in the BEGIN block.
use fred;
Will also call fred->import(), so you might want to emulate that too.
> --
> Robert Price - Technical Manager - EMAP Digital Travel | Tel: 0207 3092711
> Priory Court, 30-32 Farringdon Lane, London, EC1R 3AW | Fax: 0207 3092718
>
Shouldn't these numbers be formatted 020 7XXX
Later.
Mark.
--
print "\n",map{my$a="\n"if(length$_>6);' 'x(36-length($_)/2)."$_\n$a"} (
Name => 'Mark Fowler',Title => 'Technology Developer' ,
Firm => 'Profero Ltd',Web => 'http://www.profero.com/' ,
Email => '[EMAIL PROTECTED]', Phone => '+44 (0) 20 7700 9960' )
Re: Am I going nutts ? - read before answering!
[snipped my numbers formated as 0207 XX] >Shouldn't these numbers be formatted 020 7XXX Sh, it's designed to try to fool the sales bunnies. Rob
Re: heretics meeting
On Thu, Mar 08, 2001 at 04:15:20PM +, Greg McCarroll wrote: > anyone fancy going early to this - i'm pretty exhausted with > work and wouldn't mind getting an early pint in I'll probably leave work in an hour or so. -- David Cantrell | [EMAIL PROTECTED] | http://www.cantrell.org.uk/david/ Breeding memes since 1973 ** I read encrypted mail first, so encrypt if your message is important ** PGP signature
Re: Kevin Smith (and intro)
On Thu, 8 Mar 2001, Jonathan Stowe wrote: > >On Tue, 6 Mar 2001, Lucy McWilliam wrote: > You must have snuck in whilst I wasnt paying attention :) Yes, I'm only small... L. "I may be small but I'm very influential."
Re: heretics meeting
too answer a couple of private emails in one go if you have problems finding the anchor call me on my mobile (that will be switched on!) - i am reliably informed by a coworker that my number is 07957 386815 i should be there from 4:30~5 ish, enjoying a relaxing pint and explaining why i have a limp see you there! Greg * David Cantrell ([EMAIL PROTECTED]) wrote: > On Thu, Mar 08, 2001 at 04:15:20PM +, Greg McCarroll wrote: > > > anyone fancy going early to this - i'm pretty exhausted with > > work and wouldn't mind getting an early pint in > > I'll probably leave work in an hour or so. > > -- > David Cantrell | [EMAIL PROTECTED] | http://www.cantrell.org.uk/david/ > > Breeding memes since 1973 > > ** I read encrypted mail first, so encrypt if your message is important ** -- Greg McCarroll http://www.mccarroll.uklinux.net
Re: heretics meeting
David Cantrell <[EMAIL PROTECTED]> writes: > --neYutvxvOLaeuPCA > Content-Type: text/plain; charset=us-ascii > Content-Disposition: inline > Content-Transfer-Encoding: quoted-printable > > On Thu, Mar 08, 2001 at 04:15:20PM +, Greg McCarroll wrote: > > > anyone fancy going early to this - i'm pretty exhausted with > > work and wouldn't mind getting an early pint in > > I'll probably leave work in an hour or so. Would it be Bad Voodoo to start drinking in Soho? ;-) Dave // Has to get a train home tonight :-/ -- Dave Hodgkinson, http://www.hodgkinson.org Editor-in-chief, The Highway Star http://www.deep-purple.com Apache, mod_perl, MySQL, Sybase hired gun for, well, hire -
Re: heretics meeting
Greg McCarroll <[EMAIL PROTECTED]> writes: > i should be there from 4:30~5 ish, enjoying a relaxing > pint and explaining why i have a limp limp what? -- Dave Hodgkinson, http://www.hodgkinson.org Editor-in-chief, The Highway Star http://www.deep-purple.com Apache, mod_perl, MySQL, Sybase hired gun for, well, hire -
RE: heretics meeting
> From: Greg McCarroll [SMTP:[EMAIL PROTECTED]] > i should be there from 4:30~5 ish, enjoying a relaxing > pint and explaining why i have a limp A limp what? Your message seems to have been truncated Greg ;-) Andrew.
RE: Descrambling CSS w/ 7 Lines Of Perl
On Wed, 7 Mar 2001 17:02:39 -0800, Simon Batistoni wrote:
> Anyway, the guy who originally posted the perl code to the web is archiving
> as many copies of DeCSS as he can get his hands on, going as far as the rock
> song which uses the code as the lyrics:
>
> http://www.cs.cmu.edu/~dst/DeCSS/Gallery/
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 pack("H224",$1) if(/^x([^z]*)/)' | gunzip
--
Peter Haworth [EMAIL PROTECTED]
Signature lost in transit. We apologise for any inconvenience caused.
RPC stuff
What's the best way forward for RPC / distributed Perl stuff? I don't need anything super complicated, but RPC::Simple seems to want to use Tk ?! Jonathan PetersonIdeas Hub Ltd (t) +44 (0)20 7487 1310 www.ideashub.com
Re: RPC stuff
-Original Message- From: Jonathan Peterson <[EMAIL PROTECTED]> >What's the best way forward for RPC / distributed Perl stuff? I don't need >anything super complicated, but RPC::Simple seems to want to use Tk ?! XML-RPC and SOAP are both interesting at the mo. Homepage http://www.xmlrpc.org/ XML-RPC perl tutorial. http://www-106.ibm.com/developerworks/library/ws-xpc1/?dwzone=ws SOAP::Lite tutorial. http://home.cnet.com/webbuilding/0-7704-8-4874769-1.html Although neither are really my field. Dean (Must stay on topic...) -- Perl Coder SecTech E-mail troll Profanity is the one language all programmers understand. --- Anon
