From chrisb at jesmond.demon.co.uk Wed Oct 9 15:41:19 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: [jimf@greybox.home.org: how many members in group?] Message-ID: <20021009214119.A14465@gamma.home> ----- Forwarded (with permission) from jimf ----- From: jimf Date: Sun, 6 Oct 2002 22:21:52 +0100 To: Chris Benson Subject: how many members in group? X-Mailer: KMail [version 1.4] Your recent mail got me to thinking about the lack of time I have to enjoy learning. I still class myself as a total novice in the perl programming field and was wondering how many group members are in the same genre. I am sure that if the novices all got together and agreed to pay a fee, say for arguments sake ?20 x 10 novices that would be ?200 to 'hire' a more experienced programmer from our group to run a small maybe 2 hour session once a month somewhere local. It would definately benefit those of us who need a more structured learning environment. It would introduce members of the group to each other, plus provide a bit of financial support to talented but perhaps 'resting' experts.. Dunno what do you think? I'm game, who else could be? regards, jimf@graybox.co.uk ----- End forwarded message ----- -- Chris Benson From chrisb at jesmond.demon.co.uk Wed Oct 9 15:43:23 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: how many members in group? Message-ID: <20021009214323.B14465@gamma.home> Hi Jim, Thanks for the comments. Do you mind if I forward it to the list for discussion? There are ~6 people on the list ... a couple I've never heard from and one back in London ... so I'm also wondering how to drum up a bit more interested in these post-.com days. I've written Perl courses for CAP Gemini and IBM (and still have access to some of the training material) so could do this if we can find a venue. Because of the difficulty of physical meetings, I was wondering about trying to make the list more of resource ... maybe I'll start by trying out something I was thinking about for work: 5-minute sessions on 'How to X with Perl' (for various values of X :-). Hmmm. I'll sleep on it. One thought that occurs straight away is needing a purpose to learn: what could you use Perl for? Best wishes On Sun, Oct 06, 2002 at 10:21:52PM +0100, jimf wrote: > Your recent mail got me to thinking about the lack of time I have to enjoy > learning. I still class myself as a total novice in the perl programming > field and was wondering how many group members are in the same genre. I am > sure that if the novices all got together and agreed to pay a fee, say for > arguments sake ?20 x 10 novices that would be ?200 to 'hire' a more > experienced programmer from our group to run a small maybe 2 hour session > once a month somewhere local. It would definately benefit those of us who > need a more structured learning environment. It would introduce members of > the group to each other, plus provide a bit of financial support to talented > but perhaps 'resting' experts.. Dunno what do you think? I'm game, who else > could be? > > regards, > > jimf@graybox.co.uk > -- Chris Benson From chrisb at jesmond.demon.co.uk Wed Oct 9 17:10:57 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: 5 minutes of Perl [5m/Perl] - Intro Message-ID: <20021009231057.A14803@gamma.home> 5 minutes of Perl WHAT IS THIS? Show some useful Perl code: - for people to use - to generate questions - to generate comment and discussion AIMS - As above - Get more people using Perl more of the time - Get more useful code NOTES - Initial examples are command-line based - Initial examples assume Unix-like environment - Others (from me) may be different Please comment, question, show your own favourites, ... -- Chris Benson From chrisb at jesmond.demon.co.uk Sun Oct 13 05:21:39 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: Isn't Perl wonderful! Message-ID: <20021013112139.A30023@gamma.home> PROBLEM: Oracle Financials patches - hundreds of patches need to be applied - there are strict order dependencies between the patches - dependency data is scattered through multiple documents for each patch. SOLUTION: GraphViz+Perl - 30 line program to prepare the data and plot the result as PostScript or PNG. - All the hard word done by GraphViz. - It took longer to find and list the dependencies than write the program. PREREQUISITES: - The GraphViz module has a few dependencies of its own. The main one is the graphviz package from http://www.graphviz.org/. Ta-raaaah! :- #!/usr/local/bin/perl -w use strict; use GraphViz; my $G = GraphViz->new(directed => 0, random_start => 1, epsilon => 0.01, no_overlap => 1, width => 7.5, height => 11); my %Seen; sub my_add_node { my ($node, $label) = split /\//, uc shift; $G->add_node($node) unless exists $Seen{$node}; ++ $Seen{$node}; $G->add_node($node, label => $label) if defined $label; return $node; } while () { next if /^\s*#/; my($node, @deps) = split; $node = my_add_node($node); foreach my $dep (@deps) { $dep = my_add_node($dep); $G->add_edge($node => $dep, dir => 'back'); } } # $G->as_png('graph.png'); print $G->as_ps; exit 0; # test data: patch-number/Name # patch prereq prereq prereq ... __END__ 2141471 2291496 2290149 2290149 2291496 2085104 AR.D 2243908/CE.G 2141471 2032040 1769725 1741469/GMS.F 1900156/GL.E 2336010 2085104/ssf.5.5.2c 2166451/GMS.I 1945611/AD.E 2177442 2032040/WF2.6 2028970/PA.H 2028970/PA.H 1324710 1344328/PER.A 2282144 2482020 PA.G 2205084 2297041 2205084 2322330/RG.E 1642167 2182672/XLA.E -- Chris Benson From alice at schiffwood.demon.co.uk Sat Oct 19 17:39:07 2002 From: alice at schiffwood.demon.co.uk (Alice Wood) Date: Wed Aug 4 00:10:58 2004 Subject: Hello Message-ID: <20021019233907.A25088@gamma.home> Hi there, Just wanted to introduce myself as I am new to the list as of last week. I have been steadily getting into Perl over the last couple of years, having programmed in heaps of other things for years. When I'm not hidden behind a computer screen I occasionally masquerade as a teacher. I have recently escaped up to Middlesbrough from London and am currently 'resting'. On a Perl related note (apologies if you know this already), on the fun with perl list this week, someone set up an interesting puzzle/quiz, email below. Seemed interesting enough. From: Mark-Jason Dominus >To: fwp@perl.org >I taught a class in Illinois last week, and one of the students asked >if there was a mailing list that would deliver a weekly Perl quiz or >programming puzzle. I said I didn't know of one, but that it sounded >like a good idea, and that I would set one up when I got back. > >I am now back. If you want to get the quiz-of-the-week, send a note >to > > perl-qotw-subscribe@plover.com > > >Please feel free to circulate this announcement to appropriate venues. > >Thanks. > The first quiz has just been completed, please email me if you want the questions. Best wishes, Alice Wood From chrisb at jesmond.demon.co.uk Thu Oct 24 15:00:32 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: [Festafacil@aol.com: [IBM-perl-course-content] German mag: Perl has become the top used language] Message-ID: <20021024210032.A12601@gamma.home> This might me of interest to non-IBM-perl-instructors too! ----- Forwarded message from festafacil ----- From: "festafacil" Date: Wed, 23 Oct 2002 19:11:07 -0000 To: IBM-perl-course-content@yahoogroups.com Subject: [IBM-perl-course-content] German mag: Perl has become the top used language X-Mailer: Yahoo Groups Message Poster I thought Perl instructors might appreciate this bit of news mentioned on perlmonks.org http://perlmonks.org/index.pl?node_id=207009 Brig _______________________________________________________ Every two years the german computer magazine iX starts a questionaire on the usage of operating systems, databases and programming languages. In the last six years, Perl has become the top used language, leading closely before Java. In big companies (>1000) it's even stronger! And that's Perl 5, I won't imagine what's going on with Perl 6! :-) The article is in German (http://www.heise.de/ix/artikel/2002/11/012/), if you don't understand, the Fish (http://babelfish.altavista.com) may help. ----- End forwarded message ----- -- Chris Benson From jimf at nunthorpe.co.uk Wed Oct 30 16:03:15 2002 From: jimf at nunthorpe.co.uk (jimf@nunthorpe.co.uk) Date: Wed Aug 4 00:10:58 2004 Subject: call for help Message-ID: <20021030220315.A20971@gamma.home> need to know if there are any usenet groups dealing with Win32 extensions, I want to get all machine names and ip addresses from the school domain. sorry to bother jimf From chrisb at jesmond.demon.co.uk Wed Oct 30 17:02:00 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: call for help In-Reply-To: <20021030220315.A20971@gamma.home> References: <20021030220315.A20971@gamma.home> Message-ID: <20021030230200.C20971@gamma.home> On Wed, Oct 30, 2002 at 10:03:15PM +0000, jimf@nunthorpe.co.uk wrote: > need to know if there are any usenet groups dealing with Win32 extensions, I want to get all machine names and ip addresses from the school domain. Not sure if you meant Perl Win32 extensions: http://www.perlmonks.org/ seems to deal with with them frequently ... I've not used the Win32::* modules. My thought would be (if there is DNS working) to do a use Socket; # for AF_INET foreach my $n (1..254) { my $ip = "$network.$n"; my $name = gethostbyaddr(inet_aton($ip),AF_INET)) print $name; } Mmmm searching for DNS at http://www.perlmonks.org/ returns http://www.perlmonks.org/index.pl?node_id=195099. If you don't have DNS and are using MS networking ... uhm, I've done this from a Linux box: foreach my $n (1..254) { my $ip = "$network.$n"; system 'smbclient', '-L', '-N', $ip; } to try connecting to each machine in turn and seeing what *they* think they're called (not always what other machines think they are!). Best wishes -- Chris Benson From chrisb at jesmond.demon.co.uk Wed Oct 30 17:18:11 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: call for help In-Reply-To: <20021030230200.C20971@gamma.home> References: <20021030220315.A20971@gamma.home> <20021030230200.C20971@gamma.home> Message-ID: <20021030231811.A21246@gamma.home> On Wed, Oct 30, 2002 at 11:02:00PM +0000, Chris Benson wrote: > On Wed, Oct 30, 2002 at 10:03:15PM +0000, jimf@nunthorpe.co.uk wrote: > > need to know if there are any usenet groups dealing with Win32 extensions, I want to get all machine names and ip addresses from the school domain. http://search.cpan.org/author/GSAR/libwin32-0.191/NetResource/NetResource.pm especially the example at the bottom looks like it could do what you need: # This example displays all the share points in the entire # visible part of the network. HTH -- Chris Benson From chrisb at jesmond.demon.co.uk Thu Oct 31 13:51:04 2002 From: chrisb at jesmond.demon.co.uk (Chris Benson) Date: Wed Aug 4 00:10:58 2004 Subject: A November meet? Message-ID: <20021031195104.A25052@gamma.home> Anyone interested in meeting in November? The day, time, venue and location are up for review. I'm working in Sunderland, living in Newcastle so would prefer one or the other: Any other suggestions? I've now got a 'proper' job so I'm around all week: what are good days for people? -- Chris Benson