From Charles.Leggett at gactr.uga.edu  Thu Sep  2 14:22:41 2004
From: Charles.Leggett at gactr.uga.edu (Charles H. Leggett)
Date: Thu Sep  2 14:22:45 2004
Subject: [Classiccity-pm] Any musicians in the group?
Message-ID: <D41C8DD02BC8614AA16714C168ADB0056904FD@EBE1.gc.nat>

Many of you may have seen this on Slashdot but:

http://www.perl.com/pub/a/2004/08/31/livecode.html

I think that this is a very cool idea.  If any of you want to put on a show.
I will help you get it setup.

I have neither the musical inclination nor the perl-ability.  Yet.  ;-).

TTFN.

--
Charles H. Leggett - Network Support
The University of Georgia Center for Continuing Education
Charles.Leggett@gactr.uga.edu

From markh at markh.com  Fri Sep  3 14:43:11 2004
From: markh at markh.com (Mark Hazen)
Date: Fri Sep  3 14:19:50 2004
Subject: [Classiccity-pm] Flyer Ideas
Message-ID: <20040903194311.GB26685@archon.thehazens.net>

http://roma.oie.uga.edu/~mhazen/pm/

Some basic flyer ideas... if you like specific ones, dislike specific ones,
or have suggestions, I'm all ears... 

-mh.
----
   . _+m"m+_"+_    Mark Hazen
 d' Jp     qh qh
Jp  O       O  O
Yb  Yb     dY dY
 O   "Y5m2Y"  "  even the mightiest wave starts out as a ripple.
  "Y_            why make waves when it's easier to nurture ripples?
From markh at markh.com  Thu Sep  9 13:58:43 2004
From: markh at markh.com (Mark Hazen)
Date: Thu Sep  9 13:39:28 2004
Subject: [Classiccity-pm] #perl humor.
Message-ID: <20040909185842.GA12971@archon.thehazens.net>


Sometimes, the people ion #perl get a little tired of getting programming
questions (there's #perl-help intended for that). I just saw an instance of
this, which was, to say the least, rather funny, and I've saved it for all
of you.

http://perl.markh.com/switched.html

Ouch.

At the bottom of the conversation, is a link to an article on a similar
programming issue which is, unfortunately, funny. Sample comment about the
pasted switch statement code:

"I especially love the 'default' part - just in case FOR should increment i
beyond its bounds."

Oy. :)

Schadenfreude, get yer hot, fresh schadenfreude!

-mh.
----
   . _+m"m+_"+_    Mark Hazen
 d' Jp     qh qh
Jp  O       O  O
Yb  Yb     dY dY
 O   "Y5m2Y"  "  even the mightiest wave starts out as a ripple.
  "Y_            why make waves when it's easier to nurture ripples?
From darrell at golliher.net  Wed Sep 29 13:08:05 2004
From: darrell at golliher.net (Darrell Golliher)
Date: Wed Sep 29 13:08:06 2004
Subject: [Classiccity-pm] timtowtdi
Message-ID: <20040929180804.GA30807@golliher.net>


I'm interested in seeing out other people would do something.  I have
a solution I like, it's at the end.

The problem:  You have parsed out an uptime string from the web
interface of a network device.  The string is in this form:

	  "20 hours 5 minutes 34 seconds"

And here are some observations for different cases:

	 "1 hours 3 minutes 20 seconds"

	 "3 minutes 13 seconds"
	 
	 "25 seconds"

How would you parse that to properly populate these three variables:

    $hours
    $minutes
    $seconds

Here is my solution where $uptime is the starting string;

  my ($hours,$minutes,$seconds) = (reverse split /\s+/,  $uptime)[5,3,1];


cheers,

-Darrell
From markh at markh.com  Wed Sep 29 14:55:00 2004
From: markh at markh.com (Mark Hazen)
Date: Wed Sep 29 14:35:13 2004
Subject: [Classiccity-pm] timtowtdi
In-Reply-To: <20040929180804.GA30807@golliher.net>
References: <20040929180804.GA30807@golliher.net>
Message-ID: <20040929195500.GA7916@thehazens.net>

Darrell Golliher posted the below:

> I'm interested in seeing out other people would do something.  I have
> a solution I like, it's at the end.

I prefer something like the following, because it'll only grab numeric
values, and it zero-fills the missing elements:

     my ($sec, $min, $hour) =
          (reverse grep /\b\d+\b/, split /\b/, '0 0 0 ' . $uptime); 


mh.
----
   . _+m"m+_"+_    Mark Hazen
 d' Jp     qh qh
Jp  O       O  O
Yb  Yb     dY dY
 O   "Y5m2Y"  "  even the mightiest wave starts out as a ripple.
  "Y_            why make waves when it's easier to nurture ripples?