From spug at i4031.net  Tue Nov  8 00:40:46 2005
From: spug at i4031.net (David Robins)
Date: Tue, 8 Nov 2005 01:40:46 -0700
Subject: SPUG: Next meeting?
Message-ID: <200511080040.46990.spug@i4031.net>

Looks like the thread on SPUG meeting revival petered out.  This is sad 
because I'd hoped to attend a meeting and meet the group.  (Hi!  Been in the 
area for several months, not writing perl for work now but did in Boston and 
Memphis; recently released Net::SSH2 and maintain a few others.)

Are there any concrete plans for more meetings (I waited for the TBD for the 
last one announced to be resolved, but alas)?  Or do I have to hop in my 
trusty time machine and go back to October 18, 2005 like 
http://seattleperl.org says?

Are there not enough people?  Is there no further interest, or is everyone 
just too busy?  Do we not have a place to meet?

Thanks,

-- 
Dave
Isa. 40:31

From jerry.gay at gmail.com  Tue Nov  8 07:17:20 2005
From: jerry.gay at gmail.com (jerry gay)
Date: Tue, 8 Nov 2005 07:17:20 -0800
Subject: SPUG: Next meeting?
In-Reply-To: <200511080040.46990.spug@i4031.net>
References: <200511080040.46990.spug@i4031.net>
Message-ID: <1d9a3f400511080717y1516ed42vd1683647f85e0b52@mail.gmail.com>

On 11/8/05, David Robins <spug at i4031.net> wrote:
> Looks like the thread on SPUG meeting revival petered out.  This is sad
>
indeed, sad it is. i find it particularly sad because i offered to
give a talk, and nobody responded to my offer--neither affirmative or
negative. as i mentioned, *it would be my first talk* at a perl group.
the lack of response is quite discouraging. so discouraging, in fact,
that i've contacted portland's perl group about joining them for a
meeting. there's a social gathering tomorrow, and i just may drive
5hrs round trip for it. am i crazy?

> Are there any concrete plans for more meetings (I waited for the TBD for the
> last one announced to be resolved, but alas)?  Or do I have to hop in my
> trusty time machine and go back to October 18, 2005 like
> http://seattleperl.org says?
>
i don't think you'd be happy when you got there and realized that the
october meeting had been cancelled. has there been a meeting since
stas bekman visited in august? (i forget, at the moment.) do we need
to bring him back in order to have another?

> Are there not enough people?  Is there no further interest, or is everyone
> just too busy?  Do we not have a place to meet?
>
i *cannot* provide a place for a technical meet, but i can and will
attend a social gathering any time possible. so, why don't we do a
social meet next tuesday--i'll be there. i'm willing to meet downtown,
or on the east side, whereever is convenient for everybody.

from the website duane set up: http://www.communitywalk.com/map/438#
(user: spug, pass: spugger) it seems most folks work downtown, between
90 and 520. anyone have a favorite bar or *gack* coffee shop? i don't
have one to suggest, since i haven't enjoyed a night out at a downtown
bar since i moved here in march.

somebody? anybody? please join me and hopefully david for a social
meeting a week from today. do i really need to go to portland to get
my fix?
~jerry

From MichaelRWolf at att.net  Tue Nov  8 08:10:29 2005
From: MichaelRWolf at att.net (Michael R. Wolf)
Date: Tue, 8 Nov 2005 08:10:29 -0800
Subject: SPUG: SPUG Program Committee Meeting - rewrite the community
In-Reply-To: <200511080040.46990.spug@i4031.net>
Message-ID: <mailman.12.1131466248.13039.spug-list@pm.org>

I propose that the next SPUG meeting be a "program committee" meeting.  For
those who don't like committees or meetings, let's call it a working session
- brainstorming, visioning, planning, and committing to deliverable
meetings.

I would facilitate (not lead - we'll all do that) such a meeting on the
regularly scheduled SPUG night - November 15 at a place TBD (ideas?).

I've been inactive with SPUG lately, as I've joined the board of another
professional group.  That group has a program committee, and typically has
one or two people responsible for each meeting.  With that kind of load,
burnout isn't a big problem - make your meeting happen, then sit back and
enjoy some other team's meeting.  I've also been active in a group that
planned a calendar of topics a year out, even though they didn't have
speakers.  The organizer knew (from talking to the members) what was of
interest, and set a long-term plan.  If we did that, it'd give that
meeting's leader a long time to research the topic, find appropriate
speaker(s), let the speaker(s) prepare, and appropriately plan the meeting
without having to do a last-minute crunch.

Many of us are programmers in the sense of writing computer programs.  
Anyone interested in joining me to become programmers in the sense of
providing events (i.e. programming)?

Pair-wise, or group-wise, Programming Anyone?

Let's play!

Michael Wolf

P.S.  Let's rewrite the community.

    Perl 5 was my rewrite of Perl. 
    I want Perl 6 to be the community's rewrite of Perl 
    and of the community.
      -- Larry Wall, State of the Onion speech, TPC4

-- 
Michael R. Wolf
    All mammals learn by playing!
        MichaelRWolf at att.net



From pdarley at kinesis-cem.com  Tue Nov  8 08:20:20 2005
From: pdarley at kinesis-cem.com (Peter Darley)
Date: Tue, 8 Nov 2005 08:20:20 -0800
Subject: SPUG: Next meeting?
In-Reply-To: <1d9a3f400511080717y1516ed42vd1683647f85e0b52@mail.gmail.com>
Message-ID: <PDEOIIFFBIAABMGNJAGPCEFODPAA.pdarley@kinesis-cem.com>

Folks,
	Our office is available for meetings if people are interested.  This is not
the cramped little building on Stone way that was used once.  This is a
spacious modern place with 20 chairs, plus lots of room for sitting on the
floor. :)
	It's on 1st and Harrison, two blocks due west from Key arena.  We've got a
projector as well.
	If someone is coordinating a meeting and wants to use our space, just let
me know.  Tours of the space to establish suitability welcome.
Thanks,
Peter Darley

-----Original Message-----
From: spug-list-bounces at pm.org [mailto:spug-list-bounces at pm.org]On
Behalf Of jerry gay
Sent: Tuesday, November 08, 2005 7:17 AM
To: David Robins
Cc: spug-list at pm.org
Subject: Re: SPUG: Next meeting?

i *cannot* provide a place for a technical meet


From bill at celestial.com  Tue Nov  8 09:31:14 2005
From: bill at celestial.com (Bill Campbell)
Date: Tue, 8 Nov 2005 09:31:14 -0800
Subject: SPUG: Next meeting?
In-Reply-To: <200511080040.46990.spug@i4031.net>
References: <200511080040.46990.spug@i4031.net>
Message-ID: <20051108173114.GB35063@alexis.mi.celestial.com>

On Tue, Nov 08, 2005, David Robins wrote:
>Looks like the thread on SPUG meeting revival petered out.  This is sad 
>because I'd hoped to attend a meeting and meet the group.  (Hi!  Been in the 
>area for several months, not writing perl for work now but did in Boston and 
>Memphis; recently released Net::SSH2 and maintain a few others.)

FWIW, the Seattle Unix Group meeting is at the Mercer Island Library
tonight (see http://www.seaslug.org/Meetings for details).  There's a fair
amount of overlap with the perl group, and this might be a good place to
talk about future meetings (which was the subject of our last meeting :-).

Bill
--
INTERNET:   bill at Celestial.COM  Bill Campbell; Celestial Software LLC
UUCP:               camco!bill  PO Box 820; 6641 E. Mercer Way
FAX:            (206) 232-9186  Mercer Island, WA 98040-0820; (206) 236-1676
URL: http://www.celestial.com/

When you have an efficient government, you have a dictatorship.
                -- Harry Truman

From kmeyer at blarg.net  Tue Nov  8 09:47:52 2005
From: kmeyer at blarg.net (Ken Meyer)
Date: Tue, 8 Nov 2005 09:47:52 -0800
Subject: SPUG: Next meeting?
In-Reply-To: <1d9a3f400511080717y1516ed42vd1683647f85e0b52@mail.gmail.com>
Message-ID: <NJBBIKGJOOGHIEPGNPLAMEPJEJAA.kmeyer@blarg.net>

No, you don't HAVE TO go to Portland for a "Perl fix".  What you , or any
other like-minded individuals, need to do is to take some real
responsibility for creating whatever meeting environment that you would like
to see.  That means asking direct questions about who could and would attend
meetings wherever and whenever, and then doing the shoe-leather research to
find suitable locations that will support whatever format that you would
like to see for the gathering.

Speculative talk is fine for creating discussion about the most desirable
types and implementations of activities, but sooner or later, the energy put
into implied bitching about why SOMEONE ELSE is not doing the work needs to
be channeled into specific, positive efforts to create events that may be
supported by the Perl community.  I do appreciate that it is more difficult
for new arrivals to the area to understand the history, the culture and the
potential logistics for such an event, but maybe that is over-ridden by the
opportunity to apply fresh approaches, based on previous experience
elsewhere.

My experience with recent SPUG meetings is that they have been very sparsely
attended; and the physical environment at Amazon, while incorporating
arguably the most incredible views of the terrain existing in a town that
has plenty of them, has been somewhat awkward due to security requirements.
And, there is always the possibility that a "critical mass" of people who
will reliably attend and put in the effort to create user group meetings
does not currently exist.

For some reason or other, there seems to be a very disappointing lack of
support for most xNIX UG's in town right now (except for the Mac folks).
The BSD group has previously suspended meeting operations.  The Unix group,
SeaSLUG, recently held a session on "the future of the order", but seems to
have determined to slog on for the present.  The Federal Way LUG is a
teeny-tiny operation; and even the previously very active and well-organized
TacLUG (they actually elect officers) has fallen into the doldrums -- though
it may be undergoing a revival under "new management".   I have been running
GSLUG with less and less support from the community, and am just about to
throw in the towel and put organization of the group's activities up for
grabs, as I have threatened to do for some time now.

Many of these groups typically seem to be sustained by the efforts of one or
two people.  For SPUG, Tim Maher did the work for FIVE years.  Andy Sweger
has attempted to pick up the ball, but small attendance and no real help
tends to burn one out, especially if one does not have an incentive based on
the creation of business or "connections" for one's own enterprises.

Running a group such as this is not by any means "rocket science"; but there
are numerous details that take time to execute, and some pretty big deals
like finding a suitable place to meet.  When meeting dates loom and there is
no speaker, one's own priorities have to take the back seat; and when the
turn-out does not indicate a widespread appreciation of the effort and
sacrifice that has been required, the progress to burn-out is accelerated,
especially as one's own deferred obligations begin to make their demands
more and more stridently.

The best antidote, IMHO, is to have a number of helping hands involved to
share the burden -- not just in the grudging, "Well, I'm really busy, but I
SUPPOSE that I could help THIS MONTH..." sort of offers that one gets, as if
one was being offered a personal favor rather than mutual assistance to
achieve goals desired by everyone. And, frankly, it is more work to break-in
a person to run a single meeting than it is to do it oneself, and the events
risk being "sub-optimal" until the producer has achieved some education by
experience.

A  real commitment is necessary to support the organization for a
substantial period -- at least six months, but better to be a year, as most
formal officer positions are set-up to be.  I urge you out there to make
real efforts to "give back to the community".  There are many benefits to
yourself as well as to the others who participate, and the potential to
accrue great personal satisfaction is really there.

Of course, Andy must be engaged in this conversation, to coordinate his
experience with any new initiatives and to acknowledge his position as the
current de facto "supreme organizer".  Perhaps Tim would also be willing to
provide some consultation, if he does not perceive a danger of being
"sucked-in" to the detriment of his nascent career as a book author.

Ken Meyer

PS  Just prior to launching this missive, I note a couple of very
encouraging offers incoming on the list.  I applaud those sentiments; but
I'm still going to send this one.  There's a good way to go to get back to
Perl Prosperity in this town.

KM


-----Original Message-----

From: spug-list-bounces at pm.org [mailto:spug-list-bounces at pm.org]On
Behalf Of jerry gay
Sent: Tuesday, November 08, 2005 7:17 AM
To: David Robins
Cc: spug-list at pm.org

Subject: Re: SPUG: Next meeting?

On 11/8/05, David Robins <spug at i4031.net> wrote:

> Looks like the thread on SPUG meeting revival petered out.  This is sad

indeed, sad it is. I find it particularly sad because I offered to
give a talk, and nobody responded to my offer--neither affirmative or
negative. as I mentioned, *it would be my first talk* at a Perl group.
the lack of response is quite discouraging. so discouraging, in fact,
that I've contacted Portland's Perl group about joining them for a
meeting. there's a social gathering tomorrow, and I just may drive
5hrs round trip for it. am I crazy?

> Are there any concrete plans for more meetings (I waited for the TBD for
the
> last one announced to be resolved, but alas)?  Or do I have to hop in my
> trusty time machine and go back to October 18, 2005 like
> http://seattleperl.org says?

I don't think you'd be happy when you got there and realized that the
October meeting had been cancelled. has there been a meeting since
Stas Bekman visited in August? (I forget, at the moment.); do we need
to bring him back in order to have another?

> Are there not enough people?  Is there no further interest, or is everyone
> just too busy?  Do we not have a place to meet?

i *cannot* provide a place for a technical meet, but i can and will
attend a social gathering any time possible. so, why don't we do a
social meet next tuesday--i'll be there. i'm willing to meet downtown,
or on the east side, whereever is convenient for everybody.

from the website duane set up: http://www.communitywalk.com/map/438#
(user: spug, pass: spugger) it seems most folks work downtown, between
90 and 520. anyone have a favorite bar or *gack* coffee shop? i don't
have one to suggest, since i haven't enjoyed a night out at a downtown
bar since i moved here in march.

somebody? anybody? please join me and hopefully david for a social
meeting a week from today. do i really need to go to portland to get
my fix?

~jerry

_____________________________________________________________
Seattle Perl Users Group Mailing List
     POST TO: spug-list at pm.org
SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
    MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
    WEB PAGE: http://seattleperl.org/



From kmeyer at blarg.net  Wed Nov  9 15:26:22 2005
From: kmeyer at blarg.net (Ken Meyer)
Date: Wed, 9 Nov 2005 15:26:22 -0800
Subject: SPUG: GSLUG THIS SATURDAY,
	November 12th -- The Virtues of Virtualization
Message-ID: <NJBBIKGJOOGHIEPGNPLAIECDEKAA.kmeyer@blarg.net>

Subject: GSLUG THIS SATURDAY, November 12th --

"The Virtues of Virtualization with VMWare and Intel's Vanderpool
Technology"

###############################################

The November 2005, regular meeting of the Greater Seattle Linux Users Group
(GSLUG) will be held this Saturday, November 12th, at 10:00 AM on the
North Seattle Community College campus, in room IB 3319.

Please feel free to forward this announcement.

  ********************************************************

    We are confirmed for use of room IB 3319.  This room is in the
Instructional
    Building (IB), which at the north end of the campus and is visible from
College
    Way, the road along the West side of campus.  See:

	http://www.northseattle.edu/maps/locate.htm

    Room 3319 is on the west (visible) side of the building, on the 3rd
floor, and
    about mid-way between the two sets of elevator/HVAC towers.  Parking is
    usually available in the lot to the west of the IB.  With heavy
equipment to
    bring up, it is easier to access the north elevator.

    Parking is free on weekends.

    For directions to the campus and for a map of the buildings on campus,
    please visit the GSLUG monthly meetings web page at:

     	http://www.gslug.org/meeting.html

  ********************************************************

The ability to run multiple virtual computers on one hardware platform is
not new by any means.  In the 70's, IBM's CTS/CMS system was in wide use at
Boeing for real-time access via a remote terminals (CTS) to applications
running on independent, virtual computers hosted by a single mainframe
(CMS).

Since then, VMWare has become the "800 pound Gorilla" for running virtual
computers on Intel PC hardware.  VMWare has traditionally been used to run a
Windows machine virtually in a Linux environment, when access to certain
Windows applications is necessary, and dual-booting is excessively
disruptive -- and conversely, to allow "closet" use of Linux when a Windows
environment is enforced by corporate or "domestic" policy.

However, recently, the scope of usage of virtual machines has expanded
significantly; and virtualization has become somewhat of a cause celebre,
with VMWare in a position to lead the way.  Computing resources available
today at a "reasonable price" allow running more than one interacting system
simultaneously.  Also, quite different task environments that have been run
on several individual servers can be consolidated to run on a single
hardware platform, or cluster thereof, to make more efficient use of
computing resources.

Recently, VMWare has released a free virtual machine player, providing
developers and clients with a new means for collaboration on new system
implementations.  "Prefabricated" machines are available for Red Hat and
SUSE Linux, among other operating environments.

	http://www.vmware.com/products/player/

Well, the achievement of "critical mass" frequently leads to the initiation
of more underlying support by other players in the computing environment.
In this case, Intel is beginning to build support for virtualization into
their processors, beginning with the Itanium and Xeon families.  The code
name is "Vanderpool Technology".

As is the case with the new, open source product described to us by Centeris
in September (and just formally announced), virtualization may help a
business or individual to execute a gradual transition to new operating
environments such as Linux, and thus support further penetration into a
cautious marketplace.

Come and learn about this technology, its potential applications, benefits
and limitations, so that you will be ready to take advantage of it and to
become the "local resource".

---------------------------------------------

The presentation topics will be:

    * 10:00 AM - Overview of VMware Virtual Infrastructure Technology

	By Kenon Owens

Through the use of VMware's Virtual Infrastructure Technology, customers
have
gained efficiencies in many aspects of their environment, in areas such as
Server Consolidation/Containment, Business Continuity Planning, and Testing
and Development.  In the Test and Development arena, customers have a
variety
of options for how to best use Virtualization Technology, from Hosted
Desktop
platforms to Bare Metal Virtualization.  We will discuss the technology
behind
VMware's Virtualization Platform as well as the different options available.

                       Kenon Owens' Bio

Kenon Owens is a Senior Systems Engineer at VMware and has been in the
Virtualization Industry for over 6 years.

                                ---------------

     * 11:15 AM - Overview of Intel's Virtualization Technology:
                          Hardware-based Virtual Machines

                            By Jeff Maxwell

Intel Virtualization (Vanderpool) Technology will enhance a hardware
platform's ability to run multiple operating systems and applications in
independent partitions. With virtualization, one computer system can
function as multiple "virtual" systems. With enhancements to Intel's various
platforms, Intel Virtualization Technology can improve the robustness and
performance of today's software-only solutions.

Intel Virtualization Technology is a set of hardware enhancements to Intel
server and client platforms that will provide a foundation for
widely-deployed virtualization solutions.  It provides headroom for more
robust hardware-assisted virtualization solutions.

When combined with feature-aware software, Intel Virtualization Technology
can improve the reliability and supportability of virtualization solutions,
enabling improved consolidation and fail-over for servers.  It also assists
optimized software to provide highly available and more secure client
virtualization partitions.

More information at:

	http://www.intel.com/technology/computing/vptech/index.htm

                            Jeff Maxwell's Bio

Jeff Maxwell has been using Linux for 15 years, and is presently a software
engineer at Intel, where he develops tools used to validate microprocessors.

[Jeff has been the President of TacLUG, our counterpart LUG in Tacoma, this
past year.]

    ---------------------------------------------------------------------

    The typical GSLUG meeting agenda is as follows:

       10:00 AM       First Presentation

       11:00 AM       Break

       11:10 AM       Key Announcements and (usually) Raffle Quiz

       11:15 AM       Second Presentation

       12:15 PM       Break

       12:30 PM       Raffle prizes giveaway, when available

       12:35 PM       GSLUG business, including discussion of potential
		          future presentation topics

                	          Announcements by attendees

                	          Requests for assistance desired during the
		          following Workshop session, including
		          trouble-shooting and help with Linux installation
		          (bring your system).

       1:00 PM-ish    Formal meeting is adjourned; Workshop and
                             social networking opportunities begin,
                             including:

                * Installation and trouble-shooting assistance

                   For recommendations on preparations to maximize the
                   probability of a successful outcome, it is recommended
                   that you consult the "What to Bring" topic, way down the
                   page at:

                        http://www.gslug.org/meeting.html

                * Potential break-out discussions about interest-group
                   activities

                * Informal PGP key signing

                * Talking, chatting, blathering, etc, etc.

       4:00 PM        End of meeting

  -----------------------------------------------------------------------

GSLUG meetings are held regularly on the second Saturday of the month
at 10 AM, currently at North Seattle Community College and USUALLY
in room 3319.

Meeting announcements are posted to the gslug-announce mail list.
To receive reminders for future GSLUG meetings and notice of other
GSLUG activities, you are invited to join the list at:

        http://lists.gslug.org/mailman/listinfo/gslug-announce

Directions, agenda, and presenters' bios will also be posted on
the GSLUG website, on the home page and at:

        http://www.gslug.org/meeting.html

You are also invited to join the gslug-general discussion list at:

        http://lists.gslug.org/mailman/listinfo/gslug-general

And a new wiki site is at:

        http://wiki.gslug.org/


  -- The GSLUG Crew

------------------------------- 30 ----------------------------


From cconnoll at u.washington.edu  Mon Nov 14 22:29:34 2005
From: cconnoll at u.washington.edu (Charles Connolly)
Date: Mon, 14 Nov 2005 22:29:34 -0800 (PST)
Subject: SPUG: regular expression question
Message-ID: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>

Hi,
     I'm having some trouble with a regular expression, and I thought I'd toss 
it out to the list, especially since it seems quiet here lately. 
     I'd like to process a file line by line, capturing the everything from the 
start of the line to a hash mark (#), which would indicate a comment. Here are 
some things I tried: 

my $line =~ /^(.*)\#?/; # this takes the entire line, as expected. 

my $line =~ /^(.*?)\#?/; # this works if there is a comment, but not if there 
isn't. If there isn't a comment it captures the shortest match, which is 
nothing.

All suggestions are welcomed.

Thanks,

Chuck


From krahnj at telus.net  Mon Nov 14 22:41:03 2005
From: krahnj at telus.net (John W. Krahn)
Date: Mon, 14 Nov 2005 22:41:03 -0800
Subject: SPUG: regular expression question
In-Reply-To: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
References: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
Message-ID: <437982FF.9060207@telus.net>

Charles Connolly wrote:
> Hi,
>      I'm having some trouble with a regular expression, and I thought I'd toss 
> it out to the list, especially since it seems quiet here lately. 
>      I'd like to process a file line by line, capturing the everything from the 
> start of the line to a hash mark (#), which would indicate a comment. Here are 
> some things I tried: 
> 
> my $line =~ /^(.*)\#?/; # this takes the entire line, as expected. 
> 
> my $line =~ /^(.*?)\#?/; # this works if there is a comment, but not if there 
> isn't. If there isn't a comment it captures the shortest match, which is 
> nothing.
> 
> All suggestions are welcomed.

my $line =~ /^([^#]*)/;



John
-- 
use Perl;
program
fulfillment

From MichaelRWolf at att.net  Mon Nov 14 22:41:52 2005
From: MichaelRWolf at att.net (Michael R. Wolf)
Date: Mon, 14 Nov 2005 22:41:52 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
Message-ID: <mailman.14.1132036929.13039.spug-list@pm.org>

> I propose that the next SPUG meeting be a "program committee" meeting.
> For those who don't like committees or meetings, let's call it a working
> session - brainstorming, visioning, planning, and committing to
> deliverable meetings.
> 
> I would facilitate (not lead - we'll all do that) such a meeting on the
> regularly scheduled SPUG night - November 15 at a place TBD (ideas?).

Due to low response (one participant, one host) I will *NOT* be facilitating
this meeting (at least not this month).

In the mean time, I'd suggest that we use the SPUG email list to discuss the
kinds of events we'd like to attend, and to create.  If there's a match
between what folks want to create and what folks want to consume, it looks
like we've got a starting point for a meeting.

In the mean time, I've got a Perl programming gig (announced on this list)
that's keeping me busy until the end of the year.  Thank you SPUG!!!

I'll revisit sponsoring a program creating core group after the new year.

SPUG-a-liciously,
Michael Wolf


-- 
Michael R. Wolf
    All mammals learn by playing!
        MichaelRWolf at att.net



From rkosai at u.washington.edu  Mon Nov 14 23:07:12 2005
From: rkosai at u.washington.edu (Ryan T. Kosai)
Date: Mon, 14 Nov 2005 23:07:12 -0800
Subject: SPUG: regular expression question
In-Reply-To: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
References: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
Message-ID: <43798920.2080102@u.washington.edu>

Here's an alternative regex that does what I think you might actually want:

#This one catches escaped # signs
#  Briefly, Capture anything other than a #, OR capture a # if there's
#  a \ behind it

$line =~ /^(([^#]|(?:(?<=\\)[#]))*)/;

print "$1\n";

Thanks,


Ryan T. Kosai, Undergraduate                     rkosai at u.washington.edu
Molecular Biology/Electrical Engr.      //students.washington.edu/rkosai



Charles Connolly wrote:
> Hi,
>      I'm having some trouble with a regular expression, and I thought I'd toss 
> it out to the list, especially since it seems quiet here lately. 
>      I'd like to process a file line by line, capturing the everything from the 
> start of the line to a hash mark (#), which would indicate a comment. Here are 
> some things I tried: 
> 
> my $line =~ /^(.*)\#?/; # this takes the entire line, as expected. 
> 
> my $line =~ /^(.*?)\#?/; # this works if there is a comment, but not if there 
> isn't. If there isn't a comment it captures the shortest match, which is 
> nothing.
> 
> All suggestions are welcomed.
> 
> Thanks,
> 
> Chuck
> 
> _____________________________________________________________
> Seattle Perl Users Group Mailing List  
>      POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/

From krahnj at telus.net  Tue Nov 15 05:46:34 2005
From: krahnj at telus.net (John W. Krahn)
Date: Tue, 15 Nov 2005 05:46:34 -0800
Subject: SPUG: regular expression question
In-Reply-To: <43798920.2080102@u.washington.edu>
References: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
	<43798920.2080102@u.washington.edu>
Message-ID: <4379E6BA.2090305@telus.net>

Ryan T. Kosai wrote:
> Here's an alternative regex that does what I think you might actually want:
> 
> #This one catches escaped # signs
> #  Briefly, Capture anything other than a #, OR capture a # if there's
> #  a \ behind it

Did you mean behind it like #\ or in front of it like \#?


> $line =~ /^(([^#]|(?:(?<=\\)[#]))*)/;

It looks like you have one too many sets of capturing parentheses, perhaps you
meant something like this:

$line =~ /^((?:[^#]|(?<=\\)#)*)/;


And of course the question is moot if the OP is using this on perl code as the
# character may not involve a comment, for example:

my @array = qw# one two three #;

my $string = sprintf '%#x  %#x', 1234, 5678;



John
-- 
use Perl;
program
fulfillment

From jerry.gay at gmail.com  Tue Nov 15 05:57:00 2005
From: jerry.gay at gmail.com (jerry gay)
Date: Tue, 15 Nov 2005 05:57:00 -0800
Subject: SPUG: regular expression question
In-Reply-To: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
References: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
Message-ID: <1d9a3f400511150556w10fd48f4k8f3f17dc0eb8b981@mail.gmail.com>

On 11/14/05, Charles Connolly <cconnoll at u.washington.edu> wrote:
> Hi,
>      I'm having some trouble with a regular expression, and I thought I'd toss
> it out to the list, especially since it seems quiet here lately.
>      I'd like to process a file line by line, capturing the everything from the
> start of the line to a hash mark (#), which would indicate a comment. Here are
> some things I tried:
>
> All suggestions are welcomed.
>
use the CPAN. from the Regexp::Common docs:

    use Regexp::Common qw /comment/;

    while (<>) {
        /$RE{comment}{C}/       and  print "Contains a C comment\n";
        /$RE{comment}{C++}/     and  print "Contains a C++ comment\n";
        /$RE{comment}{PHP}/     and  print "Contains a PHP comment\n";
        /$RE{comment}{Java}/    and  print "Contains a Java comment\n";
        /$RE{comment}{Perl}/    and  print "Contains a Perl comment\n";
        /$RE{comment}{awk}/     and  print "Contains an awk comment\n";
        /$RE{comment}{HTML}/    and  print "Contains an HTML comment\n";
    }

as you can see from the examples in previous emails, parsing comments
can be tricky. if you're working with files that use a comment style
that matches any of the above listed programming languages, i think
your best bet is to use the widely-used, well-tested Regexp::Common
module. if you still want to write your own for a learning experience,
i suggest you copy the appropriate test files from the distribution
and use them as your guide.

~jerry

From dblanchard at gmail.com  Tue Nov 15 10:45:52 2005
From: dblanchard at gmail.com (Duane Blanchard)
Date: Tue, 15 Nov 2005 10:45:52 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
In-Reply-To: <20051115064227.AD103177A4@x6.develooper.com>
References: <20051115064227.AD103177A4@x6.develooper.com>
Message-ID: <d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>

Sorry, I started a response and didn't get it sent off yesterday.
Still, three really isn't a crowd.

I'm on board for a full level of commitment and responsibility. Most
in the goup don't know me, and those who do probably don't remember
me. I have only made one meeting, and mostly been a consumer on the
mailing list. (Thanks to everyone for all your help/responses.)  I'm
at a good point in my life to start giving back a little more, and
this is what I'm choosing. (I was a scoutmaster for the past three
years and, while fulfilling, it hasn't been something I could really
throw myself into with abandon.)

I know I won't be able to make every meeting, but I think in groups
like this, whether the planner is going to be there is less important
than having made and publicized a plan. So, I volunteer to plan the
upcoming meeting, and maybe even bring cookies (the kind you eat).

For the record, Tuesdays are as good as any other day for me. Is there
a sense that people would prefer a different day?

I'm also going to plan a daytime event in Bellevue, somewhere near I-5
and I-90. Probably more social, but we'll see.

If you haven't added your address to the map,
http://www.communitywalk.com/map/438#
(user: spug, pass: spugger), and want your location to be considered
in planning events please do it soon.

Thanks,

Duane
On 11/14/05, Michael R. Wolf <MichaelRWolf at att.net> wrote:
> > I propose that the next SPUG meeting be a "program committee" meeting.
> > For those who don't like committees or meetings, let's call it a working
> > session - brainstorming, visioning, planning, and committing to
> > deliverable meetings.
> >
> > I would facilitate (not lead - we'll all do that) such a meeting on the
> > regularly scheduled SPUG night - November 15 at a place TBD (ideas?).
>
> Due to low response (one participant, one host) I will *NOT* be facilitating
> this meeting (at least not this month).
>
> In the mean time, I'd suggest that we use the SPUG email list to discuss the
> kinds of events we'd like to attend, and to create.  If there's a match
> between what folks want to create and what folks want to consume, it looks
> like we've got a starting point for a meeting.
>
> In the mean time, I've got a Perl programming gig (announced on this list)
> that's keeping me busy until the end of the year.  Thank you SPUG!!!
>
> I'll revisit sponsoring a program creating core group after the new year.
>
> SPUG-a-liciously,
> Michael Wolf
>
>
> --
> Michael R. Wolf
>     All mammals learn by playing!
>         MichaelRWolf at att.net
>
>
> _____________________________________________________________
> Seattle Perl Users Group Mailing List
>      POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/
>


--
Duane Blanchard
206.280.1263

There are 10 kinds of people in the world;
those who know binary and those who don't.

From dblanchard at gmail.com  Tue Nov 15 21:11:58 2005
From: dblanchard at gmail.com (Duane Blanchard)
Date: Tue, 15 Nov 2005 21:11:58 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
In-Reply-To: <d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>
References: <20051115064227.AD103177A4@x6.develooper.com>
	<d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>
Message-ID: <d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>

I just realized I said I-5 when I actually meant I-405.

Looking at the map, I see Ben Burnett and Matt Thomas who would be
close, and maybe David Robins.

Anyone else around Bellevue?

Thx,

D

On 11/15/05, Duane Blanchard <dblanchard at gmail.com> wrote:
> Sorry, I started a response and didn't get it sent off yesterday.
> Still, three really isn't a crowd.
>
> I'm on board for a full level of commitment and responsibility. Most
> in the goup don't know me, and those who do probably don't remember
> me. I have only made one meeting, and mostly been a consumer on the
> mailing list. (Thanks to everyone for all your help/responses.)  I'm
> at a good point in my life to start giving back a little more, and
> this is what I'm choosing. (I was a scoutmaster for the past three
> years and, while fulfilling, it hasn't been something I could really
> throw myself into with abandon.)
>
> I know I won't be able to make every meeting, but I think in groups
> like this, whether the planner is going to be there is less important
> than having made and publicized a plan. So, I volunteer to plan the
> upcoming meeting, and maybe even bring cookies (the kind you eat).
>
> For the record, Tuesdays are as good as any other day for me. Is there
> a sense that people would prefer a different day?
>
> I'm also going to plan a daytime event in Bellevue, somewhere near I-5
> and I-90. Probably more social, but we'll see.
>
> If you haven't added your address to the map,
> http://www.communitywalk.com/map/438#
> (user: spug, pass: spugger), and want your location to be considered
> in planning events please do it soon.
>
> Thanks,
>
> Duane
> On 11/14/05, Michael R. Wolf <MichaelRWolf at att.net> wrote:
> > > I propose that the next SPUG meeting be a "program committee" meeting.
> > > For those who don't like committees or meetings, let's call it a working
> > > session - brainstorming, visioning, planning, and committing to
> > > deliverable meetings.
> > >
> > > I would facilitate (not lead - we'll all do that) such a meeting on the
> > > regularly scheduled SPUG night - November 15 at a place TBD (ideas?).
> >
> > Due to low response (one participant, one host) I will *NOT* be facilitating
> > this meeting (at least not this month).
> >
> > In the mean time, I'd suggest that we use the SPUG email list to discuss the
> > kinds of events we'd like to attend, and to create.  If there's a match
> > between what folks want to create and what folks want to consume, it looks
> > like we've got a starting point for a meeting.
> >
> > In the mean time, I've got a Perl programming gig (announced on this list)
> > that's keeping me busy until the end of the year.  Thank you SPUG!!!
> >
> > I'll revisit sponsoring a program creating core group after the new year.
> >
> > SPUG-a-liciously,
> > Michael Wolf
> >
> >
> > --
> > Michael R. Wolf
> >     All mammals learn by playing!
> >         MichaelRWolf at att.net
> >
> >
> > _____________________________________________________________
> > Seattle Perl Users Group Mailing List
> >      POST TO: spug-list at pm.org
> > SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
> >     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
> >     WEB PAGE: http://seattleperl.org/
> >
>
>
> --
> Duane Blanchard
> 206.280.1263
>
> There are 10 kinds of people in the world;
> those who know binary and those who don't.
>


--
Duane Blanchard
206.280.1263

There are 10 kinds of people in the world;
those who know binary and those who don't.

From atom.powers at gmail.com  Wed Nov 16 06:55:30 2005
From: atom.powers at gmail.com (Atom Powers)
Date: Wed, 16 Nov 2005 06:55:30 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
In-Reply-To: <d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>
References: <20051115064227.AD103177A4@x6.develooper.com>
	<d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>
	<d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>
Message-ID: <df9ac37c0511160655i4f858cadk1bc5a12e3cd23931@mail.gmail.com>

If it was in Bellevue, I may actually be able to attend.

On 11/15/05, Duane Blanchard <dblanchard at gmail.com> wrote:
> I just realized I said I-5 when I actually meant I-405.
>
> Looking at the map, I see Ben Burnett and Matt Thomas who would be
> close, and maybe David Robins.
>
> Anyone else around Bellevue?
>
> Thx,
>
> D
>
> On 11/15/05, Duane Blanchard <dblanchard at gmail.com> wrote:
> > Sorry, I started a response and didn't get it sent off yesterday.
> > Still, three really isn't a crowd.
> >
> > I'm on board for a full level of commitment and responsibility. Most
> > in the goup don't know me, and those who do probably don't remember
> > me. I have only made one meeting, and mostly been a consumer on the
> > mailing list. (Thanks to everyone for all your help/responses.)  I'm
> > at a good point in my life to start giving back a little more, and
> > this is what I'm choosing. (I was a scoutmaster for the past three
> > years and, while fulfilling, it hasn't been something I could really
> > throw myself into with abandon.)
> >
> > I know I won't be able to make every meeting, but I think in groups
> > like this, whether the planner is going to be there is less important
> > than having made and publicized a plan. So, I volunteer to plan the
> > upcoming meeting, and maybe even bring cookies (the kind you eat).
> >
> > For the record, Tuesdays are as good as any other day for me. Is there
> > a sense that people would prefer a different day?
> >
> > I'm also going to plan a daytime event in Bellevue, somewhere near I-5
> > and I-90. Probably more social, but we'll see.
> >
> > If you haven't added your address to the map,
> > http://www.communitywalk.com/map/438#
> > (user: spug, pass: spugger), and want your location to be considered
> > in planning events please do it soon.
> >
> > Thanks,
> >
> > Duane
> > On 11/14/05, Michael R. Wolf <MichaelRWolf at att.net> wrote:
> > > > I propose that the next SPUG meeting be a "program committee" meeting.
> > > > For those who don't like committees or meetings, let's call it a working
> > > > session - brainstorming, visioning, planning, and committing to
> > > > deliverable meetings.
> > > >
> > > > I would facilitate (not lead - we'll all do that) such a meeting on the
> > > > regularly scheduled SPUG night - November 15 at a place TBD (ideas?).
> > >
> > > Due to low response (one participant, one host) I will *NOT* be facilitating
> > > this meeting (at least not this month).
> > >
> > > In the mean time, I'd suggest that we use the SPUG email list to discuss the
> > > kinds of events we'd like to attend, and to create.  If there's a match
> > > between what folks want to create and what folks want to consume, it looks
> > > like we've got a starting point for a meeting.
> > >
> > > In the mean time, I've got a Perl programming gig (announced on this list)
> > > that's keeping me busy until the end of the year.  Thank you SPUG!!!
> > >
> > > I'll revisit sponsoring a program creating core group after the new year.
> > >
> > > SPUG-a-liciously,
> > > Michael Wolf
> > >
> > >
> > > --
> > > Michael R. Wolf
> > >     All mammals learn by playing!
> > >         MichaelRWolf at att.net
> > >
> > >
> > > _____________________________________________________________
> > > Seattle Perl Users Group Mailing List
> > >      POST TO: spug-list at pm.org
> > > SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
> > >     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
> > >     WEB PAGE: http://seattleperl.org/
> > >
> >
> >
> > --
> > Duane Blanchard
> > 206.280.1263
> >
> > There are 10 kinds of people in the world;
> > those who know binary and those who don't.
> >
>
>
> --
> Duane Blanchard
> 206.280.1263
>
> There are 10 kinds of people in the world;
> those who know binary and those who don't.
> _____________________________________________________________
> Seattle Perl Users Group Mailing List
>      POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/
>


--
--
Perfection is just a word I use occasionally with mustard.
--Atom Powers--

From dblanchard at gmail.com  Wed Nov 16 17:05:50 2005
From: dblanchard at gmail.com (Duane Blanchard)
Date: Wed, 16 Nov 2005 17:05:50 -0800
Subject: SPUG: RE question
Message-ID: <d2489e840511161705u49473861q37bb0a4f993773b4@mail.gmail.com>

Hello All,

I want to match any one of three formats for dates in a file. I think
I understand the long way to do this, but know there must be a better,
or at least more clever, way to do it. I'm trying the following with
no success. I know it won't work the way I'm trying, but it gives you
an idea of what I am thinking of. What do you guys think? Some dates
have extraneous spaces and some have commas where wouldn't expect them
or don't where I would.

Thanks,

Duane

$RE_year = "(19|20)\d\d";
$RE_month = "(jan(uary)?|feb(ruary)?|mar(ch)?|apr(il)?|may|jun(e)?|jul(y)?|aug(ust)?|sep(tember)?|oct(ober)?|nov(ember)?|dec(ember)?)";
$RE_day = "[0-3]?\d";

@array = ("1993 Mar  3", "1993  Mar 15", "Mar 15, 1993", "15 Mar
2001", "2001, 15 Mar");

foreach $thing (@array)
{
	# in the first disjunction, find any one of the defined REs, in the
second, find any but the first one you found, etc.
	if ($line =~ /($RE_year|$RE_month|$RE_day),?\s*([^$1]($RE_year|$RE_month|$RE_day)),?\s*([^$1$2]($RE_year|$RE_month|$RE_day)))
	{print "You got a date: too bad it isn't with a girl.";}
}
--
Duane Blanchard
206.280.1263

There are 10 kinds of people in the world;
those who know binary and those who don't.

From stephen.menton at cingular.com  Wed Nov 16 17:15:48 2005
From: stephen.menton at cingular.com (Menton, Stephen)
Date: Wed, 16 Nov 2005 17:15:48 -0800
Subject: SPUG: RE question
Message-ID: <C2B77C66178C7443BB31F5AB4CF3D910094E4B@WA-MSG16-BTH.wireless.attws.com>

ParseDate from CPAN module Date::Manip might save you time... If you
can't CPAN it then I'd recommend something long but clear for your own
supportability's sake to match alll the patterns you wish to support.

In other news, your example say "for $thing" but your match checks
"$line". I'm also noticing a lack of "my", heh. Strict and -w are your
friends! ;-)

steve

-----Original Message-----
From: spug-list-bounces at pm.org [mailto:spug-list-bounces at pm.org] On
Behalf Of Duane Blanchard
Sent: Wednesday, November 16, 2005 17:06
To: spug-list at pm.org
Subject: SPUG: RE question


Hello All,

I want to match any one of three formats for dates in a file. I think I
understand the long way to do this, but know there must be a better, or
at least more clever, way to do it. I'm trying the following with no
success. I know it won't work the way I'm trying, but it gives you an
idea of what I am thinking of. What do you guys think? Some dates have
extraneous spaces and some have commas where wouldn't expect them or
don't where I would.

Thanks,

Duane

$RE_year = "(19|20)\d\d";
$RE_month =
"(jan(uary)?|feb(ruary)?|mar(ch)?|apr(il)?|may|jun(e)?|jul(y)?|aug(ust)?
|sep(tember)?|oct(ober)?|nov(ember)?|dec(ember)?)";
$RE_day = "[0-3]?\d";

@array = ("1993 Mar  3", "1993  Mar 15", "Mar 15, 1993", "15 Mar 2001",
"2001, 15 Mar");

foreach $thing (@array)
{
	# in the first disjunction, find any one of the defined REs, in
the second, find any but the first one you found, etc.
	if ($line =~
/($RE_year|$RE_month|$RE_day),?\s*([^$1]($RE_year|$RE_month|$RE_day)),?\
s*([^$1$2]($RE_year|$RE_month|$RE_day)))
	{print "You got a date: too bad it isn't with a girl.";}
}
--
Duane Blanchard
206.280.1263

There are 10 kinds of people in the world;
those who know binary and those who don't.
_____________________________________________________________
Seattle Perl Users Group Mailing List  
     POST TO: spug-list at pm.org
SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
    MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
    WEB PAGE: http://seattleperl.org/

From jarich at perltraining.com.au  Wed Nov 16 17:55:44 2005
From: jarich at perltraining.com.au (Jacinta Richardson)
Date: Thu, 17 Nov 2005 12:55:44 +1100
Subject: SPUG: RE question
In-Reply-To: <d2489e840511161705u49473861q37bb0a4f993773b4@mail.gmail.com>
References: <d2489e840511161705u49473861q37bb0a4f993773b4@mail.gmail.com>
Message-ID: <437BE320.5060208@perltraining.com.au>

Duane Blanchard wrote:

> $RE_year = "(19|20)\d\d";
> $RE_month = "(jan(uary)?|feb(ruary)?|mar(ch)?|apr(il)?|may|jun(e)?|jul(y)?|aug(ust)?|sep(tember)?|oct(ober)?|nov(ember)?|dec(ember)?)";
> $RE_day = "[0-3]?\d";

Separating things out like this is great.  However, have you considered that
your parens in the above statements will affect $1, $2 etc?  You probably mean
to be using non-capturing parens:

my $RE_year = qr/(?:19|20)\d\d/;
my $RE_month =
qr/(?:jan(?:uary)?|feb(?:ruary)?|mar(?:ch)?|apr(?:il)?|may|jun(?:e)?|jul(?:y)?|aug(?:ust)?|sep(?:tember)?|oct(?:ober)?|nov(?:ember)?|dec(?:ember)?)/i;
my $RE_day = qr/[0-3]?\d/;


> @array = ("1993 Mar  3", "1993  Mar 15", "Mar 15, 1993", "15 Mar
> 2001", "2001, 15 Mar");
> 
> foreach $thing (@array)
> {
> 	# in the first disjunction, find any one of the defined REs, in the
> second, find any but the first one you found, etc.
> 	if ($line =~ /($RE_year|$RE_month|$RE_day),?\s*([^$1]($RE_year|$RE_month|$RE_day)),?\s*([^$1$2]($RE_year|$RE_month|$RE_day)))
> 	{print "You got a date: too bad it isn't with a girl.";}

As you've determined, this isn't going to do what you want it to.  In the case
of "2001, 15 Mar" your pattern says:

        ((19|20)\d\d),?\s* 	# so, far so good, matches "2001, "
        ([^201]([0-3]?\d))      # oops, need something which isn't a 1.
                                # backtrack, match the space in this char class
                                # and then 1 with that second char class.  The
                                # \d then matches the 5.
        ,?\s*                   # matches okay: "2001, 15 "
        ([^2019]((mar(ch)?))    # hmm, okay, match the 'm' in the first char
                                # class, fail to find 'ar' in the options.
                                # backtrack and give the space to the char
                                # class, match "mar"
                                # pattern should match.


I expect you'll find it easier to handle each configuration separately.  It also
makes it a little easier to read your code.

my $RE_YMD = qr{$RE_year  [,/-]? \s* $RE_month  [/-]? \s* $RE_day}x;
my $RE_MDY = qr{$RE_month \s+        $RE_day    ,? \s+    $RE_year}x;
my $RE_DMY = qr{$RE_day   \s+        $RE_month  \s+       $RE_year}x;
my $RE_YDM = qr{$RE_year  ,? \s*     $RE_day    \s+       $RE_month}x;


Putting this all together should make all of the following examples work correctly.

my @array = ("1993 Mar  3", "1993  Mar 15", "Mar 15, 1993", "15 Mar 2001",
"2001, 15 Mar", "1993-Jan-31", "Jan 1 2000", "26 Jan 1988", "1976 01 Aug");

foreach my $date (@array)
{
        if($date =~ m/($RE_YMD|$RE_MDY|$RE_DMY|$RE_YDM)/ix) {
                print "$1 Matched!\n";
        }
        else {
                "$date failed\n";
        }
}

Hope this helps.

	Jacinta

-- 
   ("`-''-/").___..--''"`-._          |  Jacinta Richardson         |
    `6_ 6  )   `-.  (     ).`-.__.`)  |  Perl Training Australia    |
    (_Y_.)'  ._   )  `._ `. ``-..-'   |      +61 3 9354 6001        |
  _..`--'_..-_/  /--'_.' ,'           | contact at perltraining.com.au |
 (il),-''  (li),'  ((!.-'             |   www.perltraining.com.au   |



From spug at i4031.net  Wed Nov 16 23:54:05 2005
From: spug at i4031.net (David Robins)
Date: Wed, 16 Nov 2005 23:54:05 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
In-Reply-To: <d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>
References: <20051115064227.AD103177A4@x6.develooper.com>
	<d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>
	<d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>
Message-ID: <200511162354.05223.spug@i4031.net>

On Tuesday November 15, 2005 21:11, Duane Blanchard wrote:
> I just realized I said I-5 when I actually meant I-405.
> 
> Looking at the map, I see Ben Burnett and Matt Thomas who would be
> close, and maybe David Robins.
> 
> Anyone else around Bellevue?

Yep, I'd attend if it was in Bellevue.

-- 
Dave
Isa. 40:31

From ben.prew at gmail.com  Wed Nov 16 23:01:28 2005
From: ben.prew at gmail.com (Ben Prew)
Date: Wed, 16 Nov 2005 23:01:28 -0800
Subject: SPUG: regular expression question
In-Reply-To: <437982FF.9060207@telus.net>
References: <Pine.LNX.4.61.0511142222080.11050@howler.maasbiosystems>
	<437982FF.9060207@telus.net>
Message-ID: <24f4b2e80511162301w3be2a0f9g8ed1a499cd949cc2@mail.gmail.com>

The idea of using the "not character class" is well spelled out in Curtis'
(Ovid) post on perlmonks (http://perlmonks.org/?node_id=24640).

If you've not read it, I highly recommend it, and perlmonks for that matter.

On 11/14/05, John W. Krahn <krahnj at telus.net> wrote:
>
> Charles Connolly wrote:
> > Hi,
> > I'm having some trouble with a regular expression, and I thought I'd
> toss
> > it out to the list, especially since it seems quiet here lately.
> > I'd like to process a file line by line, capturing the everything from
> the
> > start of the line to a hash mark (#), which would indicate a comment.
> Here are
> > some things I tried:
> >
> > my $line =~ /^(.*)\#?/; # this takes the entire line, as expected.
> >
> > my $line =~ /^(.*?)\#?/; # this works if there is a comment, but not if
> there
> > isn't. If there isn't a comment it captures the shortest match, which is
> > nothing.
> >
> > All suggestions are welcomed.
>
> my $line =~ /^([^#]*)/;
>
>
>
> John
> --
> use Perl;
> program
> fulfillment
> _____________________________________________________________
> Seattle Perl Users Group Mailing List
> POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
> MEETINGS: 3rd Tuesdays, Location: Amazon.com <http://Amazon.com> Pac-Med
> WEB PAGE: http://seattleperl.org/
>



--
Ben Prew
ben.prew at gmail.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/spug-list/attachments/20051117/686f174c/attachment.html

From bill at celestial.com  Thu Nov 17 09:45:36 2005
From: bill at celestial.com (Bill Campbell)
Date: Thu, 17 Nov 2005 09:45:36 -0800
Subject: SPUG: CANCELLED: SPUG Program Committee Meeting - rewrite the
	community
In-Reply-To: <200511162354.05223.spug@i4031.net>
References: <20051115064227.AD103177A4@x6.develooper.com>
	<d2489e840511151045t417a6396jffb36b7758b3f331@mail.gmail.com>
	<d2489e840511152111i285ffc4as71b5939dbfddf580@mail.gmail.com>
	<200511162354.05223.spug@i4031.net>
Message-ID: <20051117174536.GC78821@alexis.mi.celestial.com>

On Wed, Nov 16, 2005, David Robins wrote:
>On Tuesday November 15, 2005 21:11, Duane Blanchard wrote:
>> I just realized I said I-5 when I actually meant I-405.
>> 
>> Looking at the map, I see Ben Burnett and Matt Thomas who would be
>> close, and maybe David Robins.
>> 
>> Anyone else around Bellevue?
>
>Yep, I'd attend if it was in Bellevue.

Depending on my schedule, I will as well.

Bill
--
INTERNET:   bill at Celestial.COM  Bill Campbell; Celestial Software LLC
UUCP:               camco!bill  PO Box 820; 6641 E. Mercer Way
FAX:            (206) 232-9186  Mercer Island, WA 98040-0820; (206) 236-1676
URL: http://www.celestial.com/

``My reading of history convinces me that most bad government results
from too much government.'' --Thomas Jefferson.

From dblanchard at gmail.com  Thu Nov 17 10:04:49 2005
From: dblanchard at gmail.com (Duane Blanchard)
Date: Thu, 17 Nov 2005 10:04:49 -0800
Subject: SPUG: Bellevue Meeting Proposal
Message-ID: <d2489e840511171004t32251d12pa22bddc3e80989b2@mail.gmail.com>

Hello,

This message is largely to start a new thread title, but I also have a
little in the way of news. Unless someone comes up with a suitable
Bellevue location for a more technical meeting, i.e. one that has a
projector, or at least a whiteboard, let's meet at one of the
locations below. Please wait till Monday (to give people a chance to
volunteer other locations, or nix them as needed) and then vote for a
location if you think you may attend, even if you can't commit to be
there. Since this is a new effort, I'll try to be as accommodating as
possible, so if you can't stand the smell of pizza, (and are not
afraid of being ostracized like the freak you must be) or such, mail
me and I'll revise the choices. I've chosen these based on my eating
preferences and have tried to find a range of geographic locations to
accommodate such needs if there are any.

Round Table Pizza
(425) 644-7117
15025 24th St
Bellevue, WA 98007

Azteca Mexican Restaurants
(425) 453-9087
150 112th Ave NE
Bellevue, WA 98004

Dixie's BBQ
(425) 828-2460
11522 Northup Way
Bellevue, WA 98004

Again, suggestions are encouraged. Please also vote for a time range;
are mornings better, lunchtime, after work, etc. If you really are
flexible, list all the times that would work for you.

Thanks,

D
--
Duane Blanchard
206.280.1263

There are 10 kinds of people in the world;
those who know binary and those who don't.

From tcaine at cac.washington.edu  Thu Nov 17 14:13:20 2005
From: tcaine at cac.washington.edu (tcaine@cac.washington.edu)
Date: Thu, 17 Nov 2005 14:13:20 -0800 (PST)
Subject: SPUG: job postings
Message-ID: <Pine.LNX.4.63a.0511171411280.3225@shiva1.cac.washington.edu>


Is this list appropriate for posting a few Perl related jobs?

From tcaine at cac.washington.edu  Thu Nov 17 14:21:26 2005
From: tcaine at cac.washington.edu (tcaine@cac.washington.edu)
Date: Thu, 17 Nov 2005 14:21:26 -0800 (PST)
Subject: SPUG: job postings
In-Reply-To: <Pine.LNX.4.63a.0511171411280.3225@shiva1.cac.washington.edu>
References: <Pine.LNX.4.63a.0511171411280.3225@shiva1.cac.washington.edu>
Message-ID: <Pine.LNX.4.63a.0511171420500.3225@shiva1.cac.washington.edu>


FYI - I was just pointed to http://seattleperl.org/jobs.html.

On Thu, 17 Nov 2005, tcaine at cac.washington.edu wrote:

>
> Is this list appropriate for posting a few Perl related jobs?
>

From aaron at activox.com  Thu Nov 17 16:30:52 2005
From: aaron at activox.com (aaron salo)
Date: Thu, 17 Nov 2005 16:30:52 -0800
Subject: SPUG: Date parsing (Was: question)
In-Reply-To: <C2B77C66178C7443BB31F5AB4CF3D910094E4B@WA-MSG16-BTH.wireless.attws.com>
References: <C2B77C66178C7443BB31F5AB4CF3D910094E4B@WA-MSG16-BTH.wireless.attws.com>
Message-ID: <437D20BC.80308@activox.com>

Menton, Stephen wrote:

ParseDate from CPAN module Date::Manip might save you time... If you
can't CPAN it then I'd recommend something long but clear for your own
supportability's sake to match alll the patterns you wish to support.


Another vote for Date::Manip here. Here is an example of something you 
can do with a simple call:

1. Parsing a date from any convenient format

  $date = ParseDate("today");
  $date = ParseDate("1st thursday in June 1992");
  $date = ParseDate("05/10/93");
  $date = ParseDate("12:30 Dec 12th 1880");
  $date = ParseDate("8:00pm december tenth");
  if (! $date) {
    # Error in the date
  }

If you are trying to parse dates as part of trying to put something into 
the outbox, use Date::Manip. Once you use it you will never go back. The 
time you spend reading the doc and examples will be repaid exponentially 
for the rest of your days.

http://search.cpan.org/~sbeck/DateManip-5.44/Manip.pod

If you are trying to parse dates as an academic exercise for your own 
amusement, and you need some regex examples, open Manip.pm and look 
under the hood. If you don't go that far, just reading the perldoc for 
it will give you uber-understanding of the challenges of date parsing, 
not only between different formats but also things like "every second 
Monday" and what not. Date::Manip very mature, robust, and useful 
module. I recommend it highly.

Peace~
Aaron


From rick.croote at philips.com  Fri Nov 18 10:57:10 2005
From: rick.croote at philips.com (Rick Croote)
Date: Fri, 18 Nov 2005 10:57:10 -0800
Subject: SPUG: regular expression question
In-Reply-To: <4379E6BA.2090305@telus.net>
Message-ID: <OF0DFD37B9.CEA83C10-ON852570BD.00673446-882570BD.00684511@philips.com>

spug-list-bounces at pm.org wrote on 2005-11-15 05:46:34 AM:

> Ryan T. Kosai wrote:
> > Here's an alternative regex that does what I think you might actually 
want:
> > 
> > #This one catches escaped # signs
> > #  Briefly, Capture anything other than a #, OR capture a # if there's
> > #  a \ behind it
> 
> Did you mean behind it like #\ or in front of it like \#?
> 
> 
> > $line =~ /^(([^#]|(?:(?<=\\)[#]))*)/;
> 
> It looks like you have one too many sets of capturing parentheses, 
perhaps you
> meant something like this:
> 
> $line =~ /^((?:[^#]|(?<=\\)#)*)/;
> 
> 
> And of course the question is moot if the OP is using this on perl code 
as the
> # character may not involve a comment, for example:
> 
> my @array = qw# one two three #;
> 
> my $string = sprintf '%#x  %#x', 1234, 5678;
> 
> 
> 
> John
> -- 
> use Perl;
> program
> fulfillment
> _____________________________________________________________
> Seattle Perl Users Group Mailing List 
>      POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/

Great point John.  I've done this type of project, like most of us I'm 
sure, and always found myself analyzing on a char at a time basis, because 
you need to know if you are in a comment, multi-line comment, quoted 
string and who knows what else you will run into.  I found that line at a 
time parsing was too difficult for this type of project. 

But in the interest of fun, if I were not concerned about embedded comment 
characters and just wanted to eliminate them line by line, I always prefer 
the trimming style, rather than the capture.

$line =~ s/#.*//;  # Now isn't this "simple"



---
Rick Croote
Software Engineer
Environment and Tools Team
Philips Medical Systems
Bothell, WA
Rick.Croote at Philips.com
Phone: 425-487-7834


-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://mail.pm.org/pipermail/spug-list/attachments/20051118/d693d883/attachment.html

From ryan at the-summit.net  Sat Nov 19 13:20:01 2005
From: ryan at the-summit.net (Ryan Allen)
Date: Sat, 19 Nov 2005 13:20:01 -0800
Subject: SPUG: Creating other "languages" from perl
Message-ID: <20051119212001.GA20812@the-summit.net>

At my work I have created a new "language" per say out of perl for
conducting automated tests.  It started out as a bunch of scripts, that
slowly evolved into a high level test definition "language", that allows
users to configure a machine, then pass traffic through the machine and
get stats.

Whats become a problem is, this "language" is not really a language at
all.  It's a  script file that gets read by a large perl program, and
the perl program does what the script tells it to do.  This has become
very limiting.  I need to add more functionality to the script files
like loops, counter variables, namespaces and perhaps subroutines.

I've thought about simply using perl, and just creating many very high
level helper objects and methods to make this easier.  However, I really
don't want to do that for it goes against most of the design goals of
this test scripting language.

Are there perhaps any packages or modules that may make this more easy
to implement?

Has anybody out there done anything similar?  Perhaps we could brain
meld? 

Does anybody know of any resources or places to go for information for
such tasks?

Thanks for any input you have to offer,

    - Ryan
-- 

+-----------------------------+
|     ryan at the-summit.net     |
|  http://www.the-summit.net  |
+-----------------------------+

From ingy at ttul.org  Sun Nov 20 11:57:25 2005
From: ingy at ttul.org (Ingy dot Net)
Date: Sun, 20 Nov 2005 11:57:25 -0800
Subject: SPUG: Creating other "languages" from perl
In-Reply-To: <20051119212001.GA20812@the-summit.net>
References: <20051119212001.GA20812@the-summit.net>
Message-ID: <20051120195725.GA4396@ttul.org>

Have you seen my Test::Base module? It is basically a minilanguage for
defining tests.

On 19/11/05 13:20 -0800, Ryan Allen wrote:
> At my work I have created a new "language" per say out of perl for
> conducting automated tests.  It started out as a bunch of scripts, that
> slowly evolved into a high level test definition "language", that allows
> users to configure a machine, then pass traffic through the machine and
> get stats.
> 
> Whats become a problem is, this "language" is not really a language at
> all.  It's a  script file that gets read by a large perl program, and
> the perl program does what the script tells it to do.  This has become
> very limiting.  I need to add more functionality to the script files
> like loops, counter variables, namespaces and perhaps subroutines.
> 
> I've thought about simply using perl, and just creating many very high
> level helper objects and methods to make this easier.  However, I really
> don't want to do that for it goes against most of the design goals of
> this test scripting language.
> 
> Are there perhaps any packages or modules that may make this more easy
> to implement?
> 
> Has anybody out there done anything similar?  Perhaps we could brain
> meld? 
> 
> Does anybody know of any resources or places to go for information for
> such tasks?
> 
> Thanks for any input you have to offer,
> 
>     - Ryan
> -- 
> 
> +-----------------------------+
> |     ryan at the-summit.net     |
> |  http://www.the-summit.net  |
> +-----------------------------+
> _____________________________________________________________
> Seattle Perl Users Group Mailing List  
>      POST TO: spug-list at pm.org
> SUBSCRIPTION: http://mail.pm.org/mailman/listinfo/spug-list
>     MEETINGS: 3rd Tuesdays, Location: Amazon.com Pac-Med
>     WEB PAGE: http://seattleperl.org/

From andrew at sweger.net  Mon Nov 21 10:16:38 2005
From: andrew at sweger.net (Andrew Sweger)
Date: Mon, 21 Nov 2005 10:16:38 -0800 (PST)
Subject: SPUG: O'Reilly looking for UG Podcasts to Feature Online
Message-ID: <Pine.LNX.4.21.0511211014170.22199-100000@gandalf.addnorya.net>

Daniel Steinberg has been working on podcasting for O'Reilly and he wants
to let you know about two ways in which user group members might want to
get involved. First, if you have your own podcast, let O'Reilly know about
it and they will link to it and feature your shows from time to time on
the podcasting home page (http://www.oreillynet.com/podcasts). Also, if
you have an interesting speaker coming up, you might want to do an
interview and submit it for inclusion in O'Reilly's magazine show
"Distributing the Future" (http://www.oreillynet.com/future). In any case,
if you have interesting ideas for how you might want to contribute to
O'Reilly podcasting, send Daniel an email at daniel at oreilly.com.


From jobs-noreply at seattleperl.org  Tue Nov 22 11:16:13 2005
From: jobs-noreply at seattleperl.org (SPUG Jobs)
Date: Tue, 22 Nov 2005 11:16:13 -0800 (PST)
Subject: SPUG: JOB: University of Washington, 3 positions
Message-ID: <Pine.LNX.4.21.0511221115170.22199-100000@gandalf.addnorya.net>

There are 3 new software engineering positions open with University of 
Washington's Computing and Communications.

Requirements:

* Bachelor's degree or equivalent in computer science or related field.
* Five years of experience implementing and supporting software systems
   with a focus on network management and monitoring.
* In-depth knowledge of UNIX and Windows.
* Strong programming skills in more than one high-level programming
   language.
* Experience with TCP/IP networking.
* Experience with SQL-based databases and building database-backed
   applications.

Desired Skills:
* Experience with Perl, CORBA, Java, SOAP, Postgresql, Apache.
* Experience building web services and using Java application servers such
   as Tomcat.
* Experience with SNMP, rrdtool, MRTG, netflow.
* Experience configuring network devices such as Ethernet switches and
   routers.
* Experience with network security systems.

This is a permanent position.

Currently, we are physically located in the University District.

Please use the official UW HR instructions detailed at the 
bottom of the online job posting to apply for any of these positions.

To access the job postings you must go to 
http://www.washington.edu/admin/hr/jobs/apl/.  Next, follow the "External 
Candidates: Search and apply for UW jobs" link.  Enter "Network Tools" in 
the "Keywords" text field and click the search button.  Alternatively, you 
can search for job req # 16662, 16671, or 16670.


From andrew at sweger.net  Tue Nov 22 15:25:15 2005
From: andrew at sweger.net (Andrew Sweger)
Date: Tue, 22 Nov 2005 15:25:15 -0800 (PST)
Subject: SPUG: A Special Holiday Offer from O'Reilly
Message-ID: <Pine.LNX.4.21.0511221524340.22199-100000@gandalf.addnorya.net>

Now through December 31st, get 30% off any books you order from us through
http://www.oreilly.com/buy.

Just use Discount Code HOHOHO when you place your order.  (Due to commerce
laws, this offer only applies to books shipped to US addresses).

Happy Holidays, from everyone at O'Reilly!