From gburger at mweb.co.za Wed Jun 1 03:48:33 2005 From: gburger at mweb.co.za (Gert Burger) Date: Wed, 01 Jun 2005 12:48:33 +0200 Subject: [Za-pm] List alive? Message-ID: <1117622913.17439.1.camel@localhost> Is this list still alive? -- Gert Burger From wkruse at sars.gov.za Wed Jun 1 06:39:41 2005 From: wkruse at sars.gov.za (Walter Kruse) Date: Wed, 1 Jun 2005 15:39:41 +0200 Subject: [Za-pm] List alive? Message-ID: <373AA889F642934D8983245F7A514588D95992@gaptarcbnt00002.sars.prod> NB: This email and its contents are subject to our email legal notice which can be viewed at http://www.sars.gov.za/Email_Disclaimer.pdf ---- I am here, but it's very quiet. krgds Walter Kruse Senior test analyst Test and Data Services 082 660 7288 http://www.ou-ryperd.net -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/za-pm/attachments/20050601/a5f60ba0/attachment.html From tvilliers at Lastminute.com Wed Jun 1 06:45:04 2005 From: tvilliers at Lastminute.com (Tielman De Villiers) Date: Wed, 1 Jun 2005 14:45:04 +0100 Subject: [Za-pm] List alive? Message-ID: <016F0AD55E0CD143A2032456E6DA2C0A01385C41@LMNUKMXV01.corp.lastminute.com> -----Original Message----- From: za-pm-bounces at pm.org [mailto:za-pm-bounces at pm.org]On Behalf Of Walter Kruse Sent: 01 June 2005 14:40 To: za-pm at pm.org Subject: Re: [Za-pm] List alive? ---- I am here, but it's very quiet. dead quiet. ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager. This footnote also confirms that this email message has been swept by MIMEsweeper for the presence of computer viruses. www.mimesweeper.com ********************************************************************** From fouri_s at mtn.co.za Wed Jun 1 07:19:26 2005 From: fouri_s at mtn.co.za (Samuel Fourie [ MTN - Innovation Centre ]) Date: Wed, 1 Jun 2005 16:19:26 +0200 Subject: [Za-pm] Scripting Message-ID: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za> hi can anyone please help me ... i need to rewrite these info id 10 bbb 20 ccc ddd 1 eee 2 id 11 bbb 20 ccc 1 ddd 1 eee 2 id 12 bbb 20 ccc ddd 1 eee 2 in this form id 10,bbb 20,cc ,ddd 1,eee 2 id 11,bbb 20,cc 1,ddd 1,eee 2 id 12,bbb 20,cc ,ddd 1,eee 2 with a script regards spee -----Original Message----- From: za-pm-bounces at pm.org [mailto:za-pm-bounces at pm.org] On Behalf Of Tielman De Villiers Sent: Wednesday, 01 June 2005 3:45 PM To: za-pm at pm.org Subject: Re: [Za-pm] List alive? -----Original Message----- From: za-pm-bounces at pm.org [mailto:za-pm-bounces at pm.org]On Behalf Of Walter Kruse Sent: 01 June 2005 14:40 To: za-pm at pm.org Subject: Re: [Za-pm] List alive? ---- I am here, but it's very quiet. dead quiet. ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. If you have received this email in error please notify the system manager. This footnote also confirms that this email message has been swept by MIMEsweeper for the presence of computer viruses. www.mimesweeper.com ********************************************************************** _______________________________________________ Za-pm mailing list Za-pm at pm.org http://mail.pm.org/mailman/listinfo/za-pm NOTE: This e-mail message is subject to the MTN Group disclaimer see http://www.mtn.co.za/default.aspx?pid=34411 From pgp at consys.co.za Wed Jun 1 12:42:17 2005 From: pgp at consys.co.za (Piet le Roux) Date: Wed, 1 Jun 2005 21:42:17 +0200 Subject: [Za-pm] Scripting In-Reply-To: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za> References: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za> Message-ID: <200506012142.17384.pgp@consys.co.za> One of the ways: #!/usr/bin/perl use strict; use warnings; while (<>) { chomp; if (/^$/) { print "\n"; } else { print "$_,"; } } On Wednesday 01 June 2005 16:19, Samuel Fourie [ MTN - Innovation Centre ] wrote: > d 10 > bbb 20 From jason at dart.co.za Wed Jun 1 12:56:59 2005 From: jason at dart.co.za (Jason Armstrong) Date: Wed, 1 Jun 2005 21:56:59 +0200 Subject: [Za-pm] Scripting Message-ID: <20050601195659.GB16153@riverdrums.com> [ Samuel Fourie : Jun 1 16:21 ] > id 10,bbb 20,cc ,ddd 1,eee 2 > id 11,bbb 20,cc 1,ddd 1,eee 2 > id 12,bbb 20,cc ,ddd 1,eee 2 #!/usr/bin/perl -w use strict; use warnings; open FILE, "; close FILE; -- Jason Armstrong From spikeh at mweb.co.za Wed Jun 1 22:30:14 2005 From: spikeh at mweb.co.za (Spike) Date: Thu, 02 Jun 2005 07:30:14 +0200 Subject: [Za-pm] Scripting In-Reply-To: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za > References: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za> Message-ID: <6.2.1.2.2.20050602072511.02846a80@pop3.mweb.co.za> #!/bin/perl -w $/ = ''; # set the record delimiter to a paragraph while (<>) # or () if you opened one { chomp; s/\n/,/g; print "$_\n"; } __END__ expected:- id 10,bbb 20,ccc,ddd 1,eee 2 id 11,bbb 20,ccc 1,ddd 1,eee 2 At 2005/06/01 16:19, Samuel Fourie [ MTN - Innovation Centre ] wrote: >hi > >can anyone please help me ... i need to rewrite these info > >id 10 >bbb 20 >ccc >ddd 1 >eee 2 > >id 11 >bbb 20 >ccc 1 >ddd 1 >eee 2 > >id 12 >bbb 20 >ccc >ddd 1 >eee 2 > >in this form > >id 10,bbb 20,cc ,ddd 1,eee 2 >id 11,bbb 20,cc 1,ddd 1,eee 2 >id 12,bbb 20,cc ,ddd 1,eee 2 > >with a script > >regards > >spee > > > > > > > > >-----Original Message----- >From: za-pm-bounces at pm.org [mailto:za-pm-bounces at pm.org] On Behalf Of >Tielman De Villiers >Sent: Wednesday, 01 June 2005 3:45 PM >To: za-pm at pm.org >Subject: Re: [Za-pm] List alive? > > > >-----Original Message----- >From: za-pm-bounces at pm.org [mailto:za-pm-bounces at pm.org]On Behalf Of >Walter Kruse >Sent: 01 June 2005 14:40 >To: za-pm at pm.org >Subject: Re: [Za-pm] List alive? > > >---- I am here, but it's very quiet. > > > >dead quiet. > > > >********************************************************************** >This email and any files transmitted with it are confidential and >intended solely for the use of the individual or entity to whom they are >addressed. If you have received this email in error please notify the >system manager. > >This footnote also confirms that this email message has been swept by >MIMEsweeper for the presence of computer viruses. > >www.mimesweeper.com >********************************************************************** > >_______________________________________________ >Za-pm mailing list >Za-pm at pm.org >http://mail.pm.org/mailman/listinfo/za-pm > > >NOTE: This e-mail message is subject to the MTN Group disclaimer see >http://www.mtn.co.za/default.aspx?pid=34411 > >_______________________________________________ >Za-pm mailing list >Za-pm at pm.org >http://mail.pm.org/mailman/listinfo/za-pm -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/za-pm/attachments/20050602/0c88bc3f/attachment.html From spikeh at mweb.co.za Wed Jun 1 23:40:22 2005 From: spikeh at mweb.co.za (Spike) Date: Thu, 02 Jun 2005 08:40:22 +0200 Subject: [Za-pm] Scripting In-Reply-To: <6.2.1.2.2.20050602072511.02846a80@pop3.mweb.co.za> References: <54461D0825E5E44188349F4D8F3518A8010874B9@MTNMAIL.mtn.co.za> <6.2.1.2.2.20050602072511.02846a80@pop3.mweb.co.za> Message-ID: <6.2.1.2.2.20050602083901.028a8b38@pop3.mweb.co.za> Interesting - we have had (so far) three totally different solutions to the same problem! - cool stuff perl. At 2005/06/02 07:30, Spike wrote: >#!/bin/perl -w > >$/ = ''; # set the record delimiter to a paragraph > >while (<>) # or () if you opened one >{ > chomp; > s/\n/,/g; > print "$_\n"; >} > > >__END__ >expected:- >id 10,bbb 20,ccc,ddd 1,eee 2 >id 11,bbb 20,ccc 1,ddd 1,eee 2 > > > >At 2005/06/01 16:19, Samuel Fourie [ MTN - Innovation Centre ] wrote: >>hi >> >>can anyone please help me ... i need to rewrite these info >> >>id 10 >>bbb 20 >>ccc >>ddd 1 >>eee 2 >> >>id 11 >>bbb 20 >>ccc 1 >>ddd 1 >>eee 2 >> >>id 12 >>bbb 20 >>ccc >>ddd 1 >>eee 2 >> >>in this form >> >>id 10,bbb 20,cc ,ddd 1,eee 2 >>id 11,bbb 20,cc 1,ddd 1,eee 2 >>id 12,bbb 20,cc ,ddd 1,eee 2 >> >>with a script >> >>regards >> >>spee >> >> >> >> >> >> >> >> >>-----Original Message----- >>From: za-pm-bounces at pm.org [ mailto:za-pm-bounces at pm.org] On Behalf Of >>Tielman De Villiers >>Sent: Wednesday, 01 June 2005 3:45 PM >>To: za-pm at pm.org >>Subject: Re: [Za-pm] List alive? >> >> >> >>-----Original Message----- >>From: za-pm-bounces at pm.org [ mailto:za-pm-bounces at pm.org]On Behalf Of >>Walter Kruse >>Sent: 01 June 2005 14:40 >>To: za-pm at pm.org >>Subject: Re: [Za-pm] List alive? >> >> >>---- I am here, but it's very quiet. >> >> >> >>dead quiet. >> >> >> >>********************************************************************** >>This email and any files transmitted with it are confidential and >>intended solely for the use of the individual or entity to whom they are >>addressed. If you have received this email in error please notify the >>system manager. >> >>This footnote also confirms that this email message has been swept by >>MIMEsweeper for the presence of computer viruses. >> >>www.mimesweeper.com >>********************************************************************** >> >>_______________________________________________ >>Za-pm mailing list >>Za-pm at pm.org >>http://mail.pm.org/mailman/listinfo/za-pm >> >> >>NOTE: This e-mail message is subject to the MTN Group disclaimer see >>http://www.mtn.co.za/default.aspx?pid=34411 >> >>_______________________________________________ >>Za-pm mailing list >>Za-pm at pm.org >>http://mail.pm.org/mailman/listinfo/za-pm >_______________________________________________ >Za-pm mailing list >Za-pm at pm.org >http://mail.pm.org/mailman/listinfo/za-pm -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/za-pm/attachments/20050602/5e4167fd/attachment.html From oskar at qualica.com Tue Jun 7 08:22:25 2005 From: oskar at qualica.com (Oskar Pearson) Date: Tue, 07 Jun 2005 17:22:25 +0200 Subject: [Za-pm] Senior Perl Developer Requirement Message-ID: <42A5BBB1.6090205@qualica.com> Hi We, Qualica, are looking for a perl developer. (Please excuse cross-posts to any other lists you are on.) For more information on us, see www.qualica.com, or drop me a mail. Please submit CVs etc to hr at qualica.com. Thanks, Oskar Senior Perl Developer ===================== Description ----------- Work on the design, development and implementation of a variety of mod_perl web-based projects within a small project team. Required Skills --------------- 1. Perl (5+ years experience) - Excellent Perl skills (OO, DBI, CPAN, XS) - Experience on Linux/UNIX platforms 2. Database (3+ years experience) - Excellent working knowledge of SQL - Working knowledge of RDBMS (Sybase 11.x/12.x, MS SQL Server 7/2000, PostgreSQL 7.x) - Experience on Linux/UNIX platforms - Beneficial to have good design, stored procedure and performance tuning skills 3. Web Development (3+ years experience) - Good knowledge of HTML, DHTML - Good Javascript/ECMAScript skills (Procedural and OO) - Experience with Apache and mod_perl - Experience on Linux/UNIX platforms 4. Design Methodologies (1+ years experience) - Working knowledge of UML - Ability to work from Technical Design Specifications - Ability to adhere to design and coding standards Beneficial Skills ----------------- 1. CVS/Subversion - working knowledge 2. XML, SAX, XSLT skills 3. C/C++, Java - working knowledge From scarte at pan.uzulu.ac.za Tue Jun 7 23:13:04 2005 From: scarte at pan.uzulu.ac.za (Sean Carte) Date: Wed, 08 Jun 2005 08:13:04 +0200 Subject: [Za-pm] Catalyst: A Perl MVC Framework Message-ID: <1118211184.7344.5.camel@uzltsp01> This article at may be of interest to list-members: Catalyst by Jesse Sheidlower June 02, 2005 ... Catalyst is a new MVC framework for Perl. It is currently under rapid development, but the core API is now stable, and a growing number of projects use it. Catalyst borrows from other frameworks, such as Ruby on Rails and Apache Struts, but its main goal is to be a flexible, powerful, and fast framework for developing any type of web project in Perl. This article, the first of a series of two, introduces Catalyst and shows a simple application; a later article will demonstrate how to write a more complex project. ... -- Sean Carte University of Zululand -- NOTICE: Please note that this e-mail, and the contents thereof, is subject to the standard University of Zululand e-mail disclaimer which may be found at: http://www.ict.uzulu.ac.za/electronic_mail_disclaimer.html From spikeh at mweb.co.za Fri Jun 10 05:56:36 2005 From: spikeh at mweb.co.za (Spike) Date: Fri, 10 Jun 2005 14:56:36 +0200 Subject: [Za-pm] sub name in a special var? Message-ID: <6.2.1.2.2.20050610144627.028c6af8@pop3.mweb.co.za> Hi All Is there a special var that holds, or a function that returns the name of the current subroutine in the came way that $0 holds the script name or caller() returns the calling package? I am writing a load of subs that do various things to tables on a database. I will use the tablename as the sub name so that I don't get too lost and it would save a lot of code alterations if the selects, inserts and all the other things each sub will do could dynamically get the table name from the sub name. Each sub will do slightly different stuff so I can't use one sub and loop through the tablenames but they do have similarities that could be coded with a $subname instead of 'MY_TABLE" From jkeen at verizon.net Fri Jun 10 17:06:39 2005 From: jkeen at verizon.net (James Keenan) Date: Fri, 10 Jun 2005 20:06:39 -0400 Subject: [Za-pm] sub name in a special var? In-Reply-To: <6.2.1.2.2.20050610144627.028c6af8@pop3.mweb.co.za> References: <6.2.1.2.2.20050610144627.028c6af8@pop3.mweb.co.za> Message-ID: <1fc9e61927d68445d512a1a77a4ae102@verizon.net> On Jun 10, 2005, at 8:56 AM, Spike wrote: > Hi All > Is there a special var that holds, or a function that returns the name > of > the current subroutine in the came way that $0 holds the script name or > caller() returns the calling package? > > Yes, it's called ... caller! From perldoc -f caller caller EXPR [snip] With EXPR, it returns some extra information that the debugger uses to print a stack trace. The value of EXPR indicates how many call frames to go back before the current one. ($package, $filename, $line, $subroutine, $hasargs, $wantarray, $evaltext, $is_require, $hints, $bitmask) = caller($i); So, is there some reason why element[3] in the above list won't work for you? Jim Keenan From jan at henkins.za.net Mon Jun 20 08:30:22 2005 From: jan at henkins.za.net (Jan Henkins) Date: Mon, 20 Jun 2005 17:30:22 +0200 Subject: [Za-pm] Working with Berkeley DB - a few questions Message-ID: <1119281422.18181.35.camel@slashbat.henkins.za.net> Hello people, Only recently I started to muck about with Perl in a real programming sense, other than writing the odd script to help me with my sysadmin stuff on various Linux/Unix/Win32 machines and servers. So, working with databases is a new thing to me. The power and elegance of the DBI methods is astounding! You can imagine me giggling like a schoolgirl after I realised that I can update a CSV file (never mind a proper MySQL or PostgreSQL table) with SQL statements. The DBI tools helped me to build quite a nice system in terms of storing various configuration items in a database, be it a proper SQL engine or a common CSV file. Now, my next foray into databases is DBM, specifically Berkeley DB. Reason being that it is used as a config database for an Internet Cafe system (OpenKiosk, see http://openkiosk.sourceforge.net/), and I would like to pull data from these files in order to unify reporting. It's so different from SQL databases that I actually have a few problems getting my flat head around the "key=value" concept used in DBM files. OK, enough background noise, here is what I've got. I've managed to start getting some data out of a set of DBM-formatted files. What threw me for a loop is that they are formatted as Btree, not Hash or any other way. So, I managed to tap together the following script after wading through a lot if new, weird (for me at least) information in the BerkeleyDB module (just do a "perldoc BerkeleyDB" once you've installed the module to see what I mean): ---start--- #!/usr/bin/perl # Filename: bdbmfile.pl # use BerkeleyDB; use Fcntl; die "Usage\n$0 dbmfile.pl\n" if (@ARGV < 1); my $filename = $ARGV [0]; print "Dumping $filename:\n\n"; my %h; tie %h, 'BerkeleyDB::Btree', -Filename => $filename, -Flags => DB_RDONLY or die "Cannot open $filename $!\n"; foreach (keys %h) { print "$_\n" } untie %h; exit; ---end--- Rightyho, there aren't any original thinking behind this script, it's a conglomeration of cryptic clues and almost useless examples I bumped into in my "quest for info". Amazing how bad the docs are for Berkeley DB in comparison with other DB methods (like Gnu DB). On to my question: The above script only yanks out and display one set of key values. I have no proper idea (other than horseing around in the CPP source code of the Icafe application) of what keys are being used, or how many different keys are used. How is it possible to leech all different keys out of the db file and then to do a simple, formatted dump of all the "key=value" pairs without knowing the internal structure of the db file? At least I know that it's Btree formatted by using the "file" command on it like this: ---start--- jan at slashbat dataset $ file access.db access.db: Berkeley DB (Btree, version 9, native byte-order) ---end--- I attach the db file (called access.db, a small 8k file) to this mail, hoping that it will stay attached to the body. If not, I can mail it directly to whomever might be interested, or make it available via FTP/HTTP somewhere. If you do manage to get this file with this mail and run the above script against it (with the BerkeleyDB module installed of course), you should see output like this: ---start--- jan at slashbat dataset $ ./bdbmfile.pl access.db Dumping access.db: 0235696792 1006372727 1352929303 1391212861 1416430778 ... ... ---end--- Each of these numbers are session keys used by OpenKiosk to identify a client session. Now, attached to each session key are a whole host of other info like (1) has it been used, (2) for how long is the session valid, (3) how much does it cost, (4) which operator sold this session to a client, etc. etc. Any help, thoughts, ideas and even illuminating flames would be very much appreciated! :-) -- Regards, Jan Henkins -------------- next part -------------- A non-text attachment was scrubbed... Name: access.db Type: application/octet-stream Size: 8192 bytes Desc: not available Url : http://mail.pm.org/pipermail/za-pm/attachments/20050620/b373037e/access.obj From dirkvanderwalt at webmail.co.za Thu Jun 30 04:51:57 2005 From: dirkvanderwalt at webmail.co.za (DIRK KONRAD) Date: Thu, 30 Jun 2005 13:51:57 +0200 Subject: [Za-pm] perl on the GUI Message-ID: Hi list, For those who might be interested, here is an application which I wrote using the perl-Gtk2 bindings. http://forgeftp.novell.com//exam/homepage/index.html http://forge.novell.com/modules/xfmod/project/?exam Regards _____________________________________________________________________ For super low premiums, click here http://www.dialdirect.co.za/quote