From lembark at wrkhors.com Fri Feb 1 15:23:58 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 01 Feb 2008 18:23:58 -0500 Subject: [Chicago-talk] Removing "." from a string? In-Reply-To: <20080131202007.E05F1228@condor.depaul.edu> References: <629719.64624.qm@web604.biz.mail.mud.yahoo.com> <20080131153105.D98C6229@condor.depaul.edu> <200801311200.14512.arodland@comcast.net> <20080131202007.E05F1228@condor.depaul.edu> Message-ID: <47A3AA0E.1090600@wrkhors.com> > Other than saving one keystroke, is there anything specifically more > correct or better to using tr/// there than using perl's re? Less overhead: tr is iterative & table-driven, regex is recursive NDA. -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From andy at petdance.com Fri Feb 1 15:22:45 2008 From: andy at petdance.com (Andy Lester) Date: Fri, 1 Feb 2008 17:22:45 -0600 Subject: [Chicago-talk] Removing "." from a string? In-Reply-To: <47A3AA0E.1090600@wrkhors.com> References: <629719.64624.qm@web604.biz.mail.mud.yahoo.com> <20080131153105.D98C6229@condor.depaul.edu> <200801311200.14512.arodland@comcast.net> <20080131202007.E05F1228@condor.depaul.edu> <47A3AA0E.1090600@wrkhors.com> Message-ID: <9EF2B0E6-0EA7-4E2D-9FB7-380C0F9F179B@petdance.com> On Feb 1, 2008, at 5:23 PM, Steven Lembark wrote: >> Other than saving one keystroke, is there anything specifically more >> correct or better to using tr/// there than using perl's re? > > Less overhead: tr is iterative & table-driven, > regex is recursive NDA. All of which is undoubtedly irrelevant in this case, or 99% of any case unless for some reason you have a program where the bottleneck is the removal of periods from a string. In this case, Richard wants the most readable version. xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From lembark at wrkhors.com Fri Feb 1 15:26:53 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 01 Feb 2008 18:26:53 -0500 Subject: [Chicago-talk] Removing "." from a string? In-Reply-To: References: Message-ID: <47A3AABD.8050803@wrkhors.com> Andy_Bach at wiwb.uscourts.gov wrote: > Did somebody *not* say "benchmark" ;-> > > # perl /tmp/dot.pl 10000000 > Benchmark: timing 10000000 iterations of joinmatch, splitjoin, subst, > whileindex... > joinmatch: 4 wallclock secs ( 3.09 usr + 0.00 sys = 3.09 CPU) @ > 3236245.95/s (n=10000000) > splitjoin: 3 wallclock secs ( 3.23 usr + 0.00 sys = 3.23 CPU) @ > 3095975.23/s (n=10000000) > subst: 0 wallclock secs ( 0.91 usr + 0.00 sys = 0.91 CPU) @ > 10989010.99/s (n=10000000) > whileindex: 3 wallclock secs ( 2.73 usr + 0.00 sys = 2.73 CPU) @ > 3663003.66/s (n=10000000) index + Substr will always beat the pants of anything regex for time: it uses a few of the fastest C calls availale. That's why I knew what the loop looked like. Don't know that it's worth the code for stripping a few dots, however -- unless you have 10_000_000 IP's to process :-) -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From lembark at wrkhors.com Fri Feb 1 15:28:08 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 01 Feb 2008 18:28:08 -0500 Subject: [Chicago-talk] Removing "." from a string? In-Reply-To: References: <629719.64624.qm@web604.biz.mail.mud.yahoo.com> <20080131153105.D98C6229@condor.depaul.edu> <200801311200.14512.arodland@comcast.net> <20080131202007.E05F1228@condor.depaul.edu> <863asdzj5x.fsf@blue.stonehenge.com> Message-ID: <47A3AB08.8070409@wrkhors.com> Eric Ellington wrote: >> subst: 0 wallclock secs ( 0.91 usr + 0.00 sys = 0.91 CPU) @ >> 10989010.99/s (n=10000000) >> >> tr: 1 wallclock secs ( 1.51 usr + 0.00 sys = 1.51 CPU) @ >> 6622516.56/s (n=10000000) >> >> 'subst' => "\$dotted_quad =~ s/\D//g;", >> > > I am confused. Didn't Andy Bach show that s/// was the quickest in this case? > In what case would tr be quicker? No index + substr is. Index is a single C call and substr does a single memcpy within the malloc'd block and reduces the string length. -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From arodland at comcast.net Fri Feb 1 15:41:54 2008 From: arodland at comcast.net (Andrew Rodland) Date: Fri, 1 Feb 2008 17:41:54 -0600 Subject: [Chicago-talk] Removing "." from a string? In-Reply-To: <9EF2B0E6-0EA7-4E2D-9FB7-380C0F9F179B@petdance.com> References: <629719.64624.qm@web604.biz.mail.mud.yahoo.com> <47A3AA0E.1090600@wrkhors.com> <9EF2B0E6-0EA7-4E2D-9FB7-380C0F9F179B@petdance.com> Message-ID: <200802011741.54403.arodland@comcast.net> On Friday 01 February 2008 05:22:45 pm Andy Lester wrote: > On Feb 1, 2008, at 5:23 PM, Steven Lembark wrote: > >> Other than saving one keystroke, is there anything specifically more > >> correct or better to using tr/// there than using perl's re? > > > > Less overhead: tr is iterative & table-driven, > > regex is recursive NDA. > > All of which is undoubtedly irrelevant in this case, or 99% of any > case unless for some reason you have a program where the bottleneck is > the removal of periods from a string. > > In this case, Richard wants the most readable version. Agreed, which is why I framed it as a joke in the first place. Besides, the regex engine has been tweaked in recent versions to be competitive with tr in terms of speed, for the jobs that they both do. :) Andrew From Darren.Young at ChicagoGSB.edu Wed Feb 6 10:46:47 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Wed, 06 Feb 2008 12:46:47 -0600 Subject: [Chicago-talk] Regular expression Message-ID: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> Need some help on a regular expression... I've always been horrible at regex's with spaces. Have the output from a Windows cluster command that looks like this: Group Node Status -------------------- --------------- ------ Cluster Group GSBDHCL2 Online <- the line I'm splitting on. Perl code on this is: ### START my $clustergroup = "Cluster Group"; my $cluster = "gsdhcp"; my $clustercmd = "cluster.exe /cluster:$clustrer group \"$clustergroup\" /status"; open(CLUSTERCMD, "$clustercmd|") or die "Unable to open cluster command pipe\n"; while() { ### print; if ( /$clustergroup/ ) { my ( $group, $activenode, $status) = split(/\s(.+)/, $_); ### regex here not working print "group: $group\n"; print "active node: $activenode\n"; print "status: $status\n"; } } close(CLUSTERCMD); exit(0); ### END I want to split on "more than 1 space" so I get the first "Cluster Group" value as the variable $group in the while() loop. If someone named the cluster group without a space it'd be nice, but they didn't. Any help would be great. Darren Young Systems & Security Architect Computing Services Chicago GSB 5807 South Woodlawn Avenue Chicago, IL 60637 Voice 773.702.0331 | Fax 773.702.0233 From merlyn at stonehenge.com Wed Feb 6 10:50:50 2008 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: Wed, 06 Feb 2008 10:50:50 -0800 Subject: [Chicago-talk] Regular expression In-Reply-To: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> (Darren Young's message of "Wed, 06 Feb 2008 12:46:47 -0600") References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> Message-ID: <86lk5xq5px.fsf@blue.stonehenge.com> >>>>> "Young," == Young, Darren writes: Young,> Need some help on a regular expression... I've always been horrible at Young,> regex's with spaces. Have the output from a Windows cluster command that Young,> looks like this: Young,> Group Node Status Young,> -------------------- --------------- ------ Young,> Cluster Group GSBDHCL2 Online For fixed-width columns, a better solution is unpack() rather than a regex. -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! From andy at petdance.com Wed Feb 6 10:50:53 2008 From: andy at petdance.com (Andy Lester) Date: Wed, 6 Feb 2008 12:50:53 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> Message-ID: <985CFF68-DD18-418E-A585-427667D3A00D@petdance.com> On Feb 6, 2008, at 12:46 PM, Young, Darren wrote: > Group Node Status > -------------------- --------------- ------ > Cluster Group GSBDHCL2 Online <- the line > I'm > splitting on. If they're fixed width columns, use unpack(), like so: my ($group,undef,$node,undef,$status) = unpack( 'A20 A1 A15 A1 A6', $str ); That's saying "Split out the first 20 alphas into $group, ignore the next 1, the next 15 into $node, the next 1 ignored, and the last 6 into $status". You may need to adjust those widths, since I didn't count carefully, but you get the idea. xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From cjhamil at gmail.com Wed Feb 6 10:55:26 2008 From: cjhamil at gmail.com (Chris Hamilton) Date: Wed, 6 Feb 2008 12:55:26 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <985CFF68-DD18-418E-A585-427667D3A00D@petdance.com> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <985CFF68-DD18-418E-A585-427667D3A00D@petdance.com> Message-ID: If you _really_ want a regex you could replace your spilt with this: split(/\s\s\s*/, $_) But the other suggestion regarding unpack() is the better option. -Chris On Feb 6, 2008 12:50 PM, Andy Lester wrote: > > On Feb 6, 2008, at 12:46 PM, Young, Darren wrote: > > > Group Node Status > > -------------------- --------------- ------ > > Cluster Group GSBDHCL2 Online <- the line > > I'm > > splitting on. > > > If they're fixed width columns, use unpack(), like so: > > my ($group,undef,$node,undef,$status) = unpack( 'A20 A1 A15 A1 A6', > $str ); > > That's saying "Split out the first 20 alphas into $group, ignore the > next 1, the next 15 into $node, the next 1 ignored, and the last 6 > into $status". You may need to adjust those widths, since I didn't > count carefully, but you get the idea. > > xoxo, > Andy > > -- > Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance > > > > > > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > From Darren.Young at ChicagoGSB.edu Wed Feb 6 11:14:08 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Wed, 06 Feb 2008 13:14:08 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <86lk5xq5px.fsf@blue.stonehenge.com> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <86lk5xq5px.fsf@blue.stonehenge.com> Message-ID: <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> I've tested it on a couple of other clusters and found it's not fixed width. > -----Original Message----- > From: Randal L. Schwartz [mailto:merlyn at stonehenge.com] > Sent: Wednesday, February 06, 2008 12:51 PM > To: Young, Darren > Cc: chicago-talk at pm.org > Subject: Re: [Chicago-talk] Regular expression > > >>>>> "Young," == Young, Darren writes: > > Young,> Need some help on a regular expression... I've always been > horrible at > Young,> regex's with spaces. Have the output from a Windows cluster > command that > Young,> looks like this: > > Young,> Group Node Status > Young,> -------------------- --------------- ------ > Young,> Cluster Group GSBDHCL2 Online > > For fixed-width columns, a better solution is unpack() rather > than a regex. > > -- > Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 > 0095 > > Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. > See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl > training! From Andy_Bach at wiwb.uscourts.gov Wed Feb 6 11:15:17 2008 From: Andy_Bach at wiwb.uscourts.gov (Andy_Bach at wiwb.uscourts.gov) Date: Wed, 6 Feb 2008 13:15:17 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: Message-ID: my ( $group, $activenode, $status) = split(/\s(.+)/, $_); ### ###regex here not working yeah, you're saying 'split on one space followed by one or more "any char but newline"'s which isn't what you want. > If you _really_ want a regex you could replace your spilt with this: split(/\s\s\s*/, $_) well: split(/\s+/, $_) is one or more spaces: split(/\s{2,}/, $_) is two or more. What I worry about in these situations is data validation: ### print; if ( /$clustergroup/ ) { my ( $group, $activenode, $status) = split(/\s(.+)/, $_); ###regex here not working print "group: $group\n"; print "active node: $activenode\n"; print "status: $status\n"; } } so you know that /$clustergroup/ has been found (is there a chance that'll ever be *not* the first field? Contain a meta char (".", "/" etc)? pluralized or the substr of another word? Be safe: if ( /^\Q$clustergroup\b/ ) { This'll help if there's more than one cluster group, so you could do: my $clustergroup = "(Cluster Group A|Cluster Group B|Cluster group C)"; and: if ( s/^$clustergroup\s+// ) { # remove group and spaces my $group = $1; if ( /(\S+)\s+(\S+)/ ) { my ($activenode, $status) = ($!, $2); print "group: $group\n"; print "active node: $activenode\n"; print "status: $status\n"; } else { warn("Bad data: $_ for $group"); } # if \S\s\S which then does some validation of the data line. a ------------------- Andy Bach Systems Mangler Internet: andy_bach at wiwb.uscourts.gov Voice: (608) 261-5738 Fax: 264-5932 The only function of economic forecasting is to make astrology look respectable. - John Kenneth Galbraith From andy at petdance.com Wed Feb 6 11:19:42 2008 From: andy at petdance.com (Andy Lester) Date: Wed, 6 Feb 2008 13:19:42 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <86lk5xq5px.fsf@blue.stonehenge.com> <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> Message-ID: <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> On Feb 6, 2008, at 1:14 PM, Young, Darren wrote: > I've tested it on a couple of other clusters and found it's not fixed > width. >> >> >> Young,> Group Node Status >> Young,> -------------------- --------------- ------ >> It looks fixed width between each run. Count the dashes on the second row and you'll have it. my (undef) = <>; # skip headings my $dashes = <>; # dashes chomp $dashes; my @dashes = split( /\s+/, $dashes ); # Make an array of each line of dashes my @widths = map { length } @dashes; # And get the length of each one my $mask_for_unpack = sprintf( 'A%d A1 A%d A1 A%d', @widths ); xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From merlyn at stonehenge.com Wed Feb 6 11:22:10 2008 From: merlyn at stonehenge.com (Randal L. Schwartz) Date: Wed, 06 Feb 2008 11:22:10 -0800 Subject: [Chicago-talk] Regular expression In-Reply-To: <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> (Andy Lester's message of "Wed, 6 Feb 2008 13:19:42 -0600") References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <86lk5xq5px.fsf@blue.stonehenge.com> <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> Message-ID: <86d4r9q49p.fsf@blue.stonehenge.com> >>>>> "Andy" == Andy Lester writes: Andy> my (undef) = <>; # skip headings or just: defined(<>) or die; # toss a line -- Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095 Perl/Unix/security consulting, Technical writing, Comedy, etc. etc. See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training! From Darren.Young at ChicagoGSB.edu Wed Feb 6 11:23:57 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Wed, 06 Feb 2008 13:23:57 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: References: Message-ID: <07A371D457B501478C1DB3C3DE8372D7FF9F57@GSBHEX2V.gsb.uchicago.edu> > well: > split(/\s+/, $_) > > is one or more spaces: > split(/\s{2,}/, $_) > > is two or more. What I worry about in these situations is data > validation: > ### print; > if ( /$clustergroup/ ) { > my ( $group, $activenode, $status) = split(/\s(.+)/, $_); > ###regex here not working > print "group: $group\n"; > print "active node: $activenode\n"; > print "status: $status\n"; > } > } > I'm asking specifically for the status of one group via: my $clustercmd = "cluster.exe /cluster:gsbdhcp group \"$clustergroup\" /status"; Unless I move the script to another cluster it should be ok. > so you know that /$clustergroup/ has been found (is there a chance > that'll > ever be *not* the first field? Contain a meta char (".", "/" etc)? > pluralized or the substr of another word? Be safe: > if ( /^\Q$clustergroup\b/ ) { > > This'll help if there's more than one cluster group, so you could do: > my $clustergroup = "(Cluster Group A|Cluster Group B|Cluster group C)"; > > and: > if ( s/^$clustergroup\s+// ) { # remove group and spaces > my $group = $1; > if ( /(\S+)\s+(\S+)/ ) { > my ($activenode, $status) = ($!, $2); > print "group: $group\n"; > print "active node: $activenode\n"; > print "status: $status\n"; > } > else { > warn("Bad data: $_ for $group"); > } # if \S\s\S > > > which then does some validation of the data line. Thanks, that'll work perfect when I roll to a getActiveNode($group) sub. The end result I'm after here... Have a script that's installed on a shared cluster drive that's scheduled to run on each node every night. The script processes a log file that's only accessible on the current active node so I need to compare Sys::Hostname::hostname() to the results of the cluster.exe command to make sure the script can actually run. From Darren.Young at ChicagoGSB.edu Wed Feb 6 10:46:47 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Wed, 06 Feb 2008 12:46:47 -0600 Subject: [Chicago-talk] Regular expression Message-ID: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> Need some help on a regular expression... I've always been horrible at regex's with spaces. Have the output from a Windows cluster command that looks like this: Group Node Status -------------------- --------------- ------ Cluster Group GSBDHCL2 Online <- the line I'm splitting on. Perl code on this is: ### START my $clustergroup = "Cluster Group"; my $cluster = "gsdhcp"; my $clustercmd = "cluster.exe /cluster:$clustrer group \"$clustergroup\" /status"; open(CLUSTERCMD, "$clustercmd|") or die "Unable to open cluster command pipe\n"; while() { ### print; if ( /$clustergroup/ ) { my ( $group, $activenode, $status) = split(/\s(.+)/, $_); ### regex here not working print "group: $group\n"; print "active node: $activenode\n"; print "status: $status\n"; } } close(CLUSTERCMD); exit(0); ### END I want to split on "more than 1 space" so I get the first "Cluster Group" value as the variable $group in the while() loop. If someone named the cluster group without a space it'd be nice, but they didn't. Any help would be great. Darren Young Systems & Security Architect Computing Services Chicago GSB 5807 South Woodlawn Avenue Chicago, IL 60637 Voice 773.702.0331 | Fax 773.702.0233 From arodland at comcast.net Wed Feb 6 20:04:38 2008 From: arodland at comcast.net (Andrew Rodland) Date: Wed, 6 Feb 2008 22:04:38 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> Message-ID: <200802062204.38500.arodland@comcast.net> On Wednesday 06 February 2008 01:19:42 pm Andy Lester wrote: > > my @dashes = split( /\s+/, $dashes ); # Make an array of each line of > dashes > my @widths = map { length } @dashes; # And get the length of each one > my $mask_for_unpack = sprintf( 'A%d A1 A%d A1 A%d', @widths ); I've used this very trick in the past, and it works beautifully. You can actually use 'x1' in place of 'A1' in the unpack template to throw away the space between columns instead of returning them. Andrew From andy at petdance.com Wed Feb 6 20:06:53 2008 From: andy at petdance.com (Andy Lester) Date: Wed, 6 Feb 2008 22:06:53 -0600 Subject: [Chicago-talk] Regular expression In-Reply-To: <200802062204.38500.arodland@comcast.net> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> <07A371D457B501478C1DB3C3DE8372D7FF9F37@GSBHEX2V.gsb.uchicago.edu> <4B43972D-3BC5-4205-9D4F-ED0662B58ECD@petdance.com> <200802062204.38500.arodland@comcast.net> Message-ID: On Feb 6, 2008, at 10:04 PM, Andrew Rodland wrote: > I've used this very trick in the past, and it works beautifully. You > can > actually use 'x1' in place of 'A1' in the unpack template to throw > away the > space between columns instead of returning them. Thanks! I knew there was a code for it but I missed it in the man page for pack. xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From lembark at wrkhors.com Thu Feb 7 12:03:38 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Thu, 07 Feb 2008 15:03:38 -0500 Subject: [Chicago-talk] Regular expression In-Reply-To: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> References: <07A371D457B501478C1DB3C3DE8372D7FF9EDE@GSBHEX2V.gsb.uchicago.edu> Message-ID: <47AB641A.9050507@wrkhors.com> Young, Darren wrote: > Need some help on a regular expression... I've always been horrible at > regex's with spaces. Have the output from a Windows cluster command that > looks like this: > > Group Node Status > -------------------- --------------- ------ > Cluster Group GSBDHCL2 Online <- the line I'm splitting on. If you know that the status and node columns do not have space you could also just strip off the last two items, whatever's left is the group. # the split with capturing regex returns: # # ( # 'Cluster', # ' ', # 'Group', # ' ', -4 discard # 'GSBDHCL2', -3 node name # ' ', -2 discard # Online' -1 status # ) # # splice off the last four items and whatever's # left has the original whitespace embedded in # it. join that together with nothing and you # have the original group back. # # this doesn't fry you if the manufacturer # botches the dashes (happend to me before); # does fry you if the node or status are # missing entirely (seems unlikley). my $line = read_the_next_line; my @tokenz = split m{ (\s+) }x, $line; my ( undef, $node, undef, $status ) = splice @tokenz, -4; my $group = join '', @tokenz; That or you could strip them off with a search using a regex for space followed by nonspace: my $group = read_the_next_line; $group =~ s{ \s+ (\S+) $}{}x or die "No tokens in the group: '$group'"; my $status = $1; $group =~ s{ \s+ (\S+) $}{}x or die "Gak, you have only one token on the group: '$group $status'"; my $node = $1; # at this point whatever's left in $group # IS the group. enjoi -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From whjackson at gmail.com Thu Feb 7 12:56:43 2008 From: whjackson at gmail.com (Whitney Jackson) Date: Thu, 7 Feb 2008 14:56:43 -0600 Subject: [Chicago-talk] perl test harness failures Message-ID: I just compiled perl-5.10.0 on a Linux box at work and ran 'make test' (partial output below). Most tests worked but a significant number didn't. All the failed tests bomb w/ seg faults. All seem to be related to signal handling/IPC. By peeling away the successful parts of one test file I found I could reproduce the seg fault with this one liner: $ ./perl -MTestInit -e 'pipe(R, W); close R; $SIG{PIPE} = sub {}; print W "_";' zsh: segmentation fault ./perl -MTestInit -e Can anyone recommend a strategy for addressing this sort of problem? Thanks, Whitney Example individual test output ----------------------- $ ./perl -MTestInit io/pipe.t 1..24 ok 1 - open |- || exec ok 2 - again ok 3 - open -| ok 4 - again ok 5 - '97 98 99 10 114 115 116 13 120 121 122 13 10 102 111 111 10' passes through '-|' ok 6 - '97 98 99 10 114 115 116 13 120 121 122 13 10 102 111 111 10' passes through '|-' ok 7 - pipe & fork ok 8 - with fh dup zsh: segmentation fault ./perl -MTestInit io/pipe.t 'make test' output: ------------------- ... t/pod/poderrs.................................................ok t/pod/podselect...............................................ok t/pod/special_seqs............................................ok t/pod/twice...................................................ok t/x2p/s2p.....................................................ok Failed 10 tests out of 1428, 99.30% okay. ../ext/IO/t/io_pipe.t ../ext/POSIX/t/posix.t ../ext/POSIX/t/sigaction.t ../ext/Socket/t/socketpair.t ../ext/Time/HiRes/t/HiRes.t ../lib/warnings.t io/nbk6iot.t io/pipe.t op/alarm.t op/magic.t ### Since not all tests were successful, you may want to run some of ### them individually and examine any diagnostic messages they produce. ### See the INSTALL document's section on "make test". ### You have a good chance to get more information by running ### ./perl harness ### in the 't' directory since most (>=80%) of the tests succeeded. ### You may have to set your dynamic library search path, ### LD_LIBRARY_PATH, to point to the build directory: ### setenv LD_LIBRARY_PATH `pwd`:$LD_LIBRARY_PATH; cd t; ./perl harness ### LD_LIBRARY_PATH=`pwd`:$LD_LIBRARY_PATH; export LD_LIBRARY_PATH; cd t; ./perl harness ### export LD_LIBRARY_PATH=`pwd`:$LD_LIBRARY_PATH; cd t; ./perl harness ### for csh-style shells, like tcsh; or for traditional/modern ### Bourne-style shells, like bash, ksh, and zsh, respectively. u=2.59 s=1.16 cu=334.21 cs=31.92 scripts=1428 tests=189386 make[2]: *** [_test_tty] Error 1 make[2]: Leaving directory `/usr2/tmp/perl-5.10.0' make[1]: *** [_test] Error 2 make[1]: Leaving directory `/usr2/tmp/perl-5.10.0' make: *** [test] Error 2 From lembark at wrkhors.com Fri Feb 8 08:22:46 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 08 Feb 2008 11:22:46 -0500 Subject: [Chicago-talk] perl test harness failures In-Reply-To: References: Message-ID: <47AC81D6.3010901@wrkhors.com> Whitney Jackson wrote: > I just compiled perl-5.10.0 on a Linux box at work and ran 'make test' > (partial output below). Most tests worked but a significant number > didn't. All the failed tests bomb w/ seg faults. All seem to be > related to signal handling/IPC. By peeling away the successful parts > of one test file I found I could reproduce the seg fault with this one > liner: > > $ ./perl -MTestInit -e 'pipe(R, W); close R; $SIG{PIPE} = sub {}; print W "_";' > zsh: segmentation fault ./perl -MTestInit -e > > Can anyone recommend a strategy for addressing this sort of problem? More able to help with: - What O/S (i.e., uname -a output)? - What compiler switches (i.e., 'perl -V' output)? In the meantime, try compiling the thing with '-O0' and see if the result changes (may be a pain depending compile time). Optimizing the snot out of perl may have pushed it over the edge (e.g., I used -O3 w/ remove statck frames, but it worked and re-compiling it only takes a few minutes). You might also take a look at which lib's ./perl is linked with (e.g., via ldd) and see if any of them have known issues with reads on closed pipes. -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From whjackson at gmail.com Fri Feb 8 09:30:30 2008 From: whjackson at gmail.com (Whitney Jackson) Date: Fri, 8 Feb 2008 11:30:30 -0600 Subject: [Chicago-talk] perl test harness failures In-Reply-To: <47AC81D6.3010901@wrkhors.com> References: <47AC81D6.3010901@wrkhors.com> Message-ID: Thanks Steven. Here's the info you requested. I'll give -O0 a try and let you know what happens. $ uname -a Linux xxxxxxxxx 2.4.21-40.ELsmp #1 SMP Thu Feb 2 22:22:39 EST 2006 i686 i686 i386 GNU/Linux $ ./perl -MTestInit -V Summary of my perl5 (revision 5 version 10 subversion 0) configuration: Platform: osname=linux, osvers=2.4.21-40.elsmp, archname=i686-linux-thread-multi uname='linux xxxxxxxxx 2.4.21-40.elsmp #1 smp thu feb 2 22:22:39 est 2006 i686 i686 i386 gnulinux ' config_args='' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='gcc', ccflags ='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-O2', cppflags='-D_REENTRANT -D_GNU_SOURCE -fno-strict-aliasing -pipe' ccversion='', gccversion='3.3.2', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=4, prototype=define Linker and Libraries: ld='gcc', ldflags ='' libpth=/lib /usr/lib libs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc -lrt perllibs=-lnsl -ldl -lm -lcrypt -lutil -lpthread -lc -lrt libc=/lib/libc-2.3.2.so, so=so, useshrplib=false, libperl=libperl.a gnulibc_version='2.3.2' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' cccdlflags='-fPIC', lddlflags='-shared -O2' Characteristics of this binary (from libperl): Compile-time options: MULTIPLICITY PERL_DONT_CREATE_GVSV PERL_IMPLICIT_CONTEXT PERL_MALLOC_WRAP USE_ITHREADS USE_LARGE_FILES USE_PERLIO USE_REENTRANT_API Built under linux Compiled at Feb 7 2008 13:44:48 %ENV: PERL_CORE="1" @INC: ../lib $ ldd ./perl libnsl.so.1 => /lib/libnsl.so.1 (0x0021a000) libdl.so.2 => /lib/libdl.so.2 (0x00a67000) libm.so.6 => /lib/tls/libm.so.6 (0x00ba7000) libcrypt.so.1 => /lib/libcrypt.so.1 (0x00244000) libutil.so.1 => /lib/libutil.so.1 (0x00383000) libpthread.so.0 => /lib/tls/libpthread.so.0 (0x00edf000) libc.so.6 => /lib/tls/libc.so.6 (0x00386000) librt.so.1 => /lib/tls/librt.so.1 (0x00111000) /lib/ld-linux.so.2 => /lib/ld-linux.so.2 (0x00e45000) On Feb 8, 2008 10:22 AM, Steven Lembark wrote: > Whitney Jackson wrote: > > I just compiled perl-5.10.0 on a Linux box at work and ran 'make test' > > (partial output below). Most tests worked but a significant number > > didn't. All the failed tests bomb w/ seg faults. All seem to be > > related to signal handling/IPC. By peeling away the successful parts > > of one test file I found I could reproduce the seg fault with this one > > liner: > > > > $ ./perl -MTestInit -e 'pipe(R, W); close R; $SIG{PIPE} = sub {}; print W "_";' > > zsh: segmentation fault ./perl -MTestInit -e > > > > Can anyone recommend a strategy for addressing this sort of problem? > > More able to help with: > > - What O/S (i.e., uname -a output)? > - What compiler switches (i.e., 'perl -V' output)? > > In the meantime, try compiling the thing with > '-O0' and see if the result changes (may be a > pain depending compile time). Optimizing the > snot out of perl may have pushed it over the > edge (e.g., I used -O3 w/ remove statck frames, > but it worked and re-compiling it only takes a > few minutes). > > You might also take a look at which lib's ./perl > is linked with (e.g., via ldd) and see if any of > them have known issues with reads on closed pipes. > > -- > Steven Lembark +1 888 359 3508 > Workhorse Computing 85-09 90th St > lembark at wrkhors.com Woodhaven, NY 11421 > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > From list at phaedrusdeinus.org Fri Feb 8 09:14:14 2008 From: list at phaedrusdeinus.org (John Melesky) Date: Fri, 8 Feb 2008 11:14:14 -0600 Subject: [Chicago-talk] ANN: TechCoffee, Season Five! Message-ID: <697F87A5-E8BB-4482-A86A-6E7278A50A99@phaedrusdeinus.org> Short version: Starting Monday, Feb 11, 6:30AM, for 10 weeks, at the Same Ol' Caribou Coffee (at the NW corner of LaSalle and Lake) Long version: It's Friday. You're looking forward to the weekend, where you will sit back and relax. But don't you have a patch you're working on for Perl6? Isn't your blog comment system still screwed up? How about that business idea that really should only need a couple days' worth of coding, but that you just haven't gotten around to? That, my friends, is what TechCoffee is for. A few hours of productivity, once a week. Why are you productive at TechCoffee? Because everyone there is working, and there's power in numbers. It's like a quilting bee, or a running club. Only for coders. Because we work at the productive hours of the day, before the coding life has been drained out of you by a workday of meetings and drudgery. Are you ready? Okay. Show up to the Caribou Coffee at LaSalle and Lake (conveniently located near *every* L line) at 6:30AM Monday morning. Once you're there, code. Promise someone that you'll be there the following Monday. Repeat. Or, if you're feeling advanced, remember that the season goes for ten weeks. Plan milestones. Get all project-managerish. Make a chart. Just remember to code, too. I promise y'all that i'll be there Monday morning, 6:30AM. I'll bring a power strip, too. And i'm gonna code. -johnnnnnnnn ps- Check http://techcoffee.com/ for more info (well, actually, for pretty much the same info). pps- This is the location: http://maps.google.com/maps?f=q&hl=en&geocode=&q=200+N+Lasalle,+Chicago,+il&sll=41.88549,-87.632468&sspn=0.014266,0.010643&ie=UTF8&ll=41.884659,-87.632425&spn=0.014266,0.010643&z=16&om=0 -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/chicago-talk/attachments/20080208/bea7c095/attachment.html From lembark at wrkhors.com Fri Feb 8 10:21:00 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 08 Feb 2008 13:21:00 -0500 Subject: [Chicago-talk] perl test harness failures In-Reply-To: References: <47AC81D6.3010901@wrkhors.com> Message-ID: <47AC9D8C.1030903@wrkhors.com> > $ ./perl -MTestInit -V > Summary of my perl5 (revision 5 version 10 subversion 0) configuration: > Platform: > osname=linux, osvers=2.4.21-40.elsmp, archname=i686-linux-thread-multi > uname='linux xxxxxxxxx 2.4.21-40.elsmp #1 smp thu feb 2 22:22:39 Threading is usually a pain. Unless you need it try turning off threads also and see if that helps any other problems. > gnulibc_version='2.3.2' Pretty old, so is your kernel. It might be worth upgrading this if you're interested in checking out software. -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From whjackson at gmail.com Fri Feb 8 12:10:22 2008 From: whjackson at gmail.com (Whitney Jackson) Date: Fri, 8 Feb 2008 14:10:22 -0600 Subject: [Chicago-talk] perl test harness failures In-Reply-To: <47AC9D8C.1030903@wrkhors.com> References: <47AC81D6.3010901@wrkhors.com> <47AC9D8C.1030903@wrkhors.com> Message-ID: > Threading is usually a pain. Unless you need > it try turning off threads also and see if that > helps any other problems. It turns out I need threads. > Pretty old, so is your kernel. It might be worth > upgrading this if you're interested in checking > out software. Agreed. Unfortunately, this is a standard OS install where I work (stodgy old financial institution...what're you gonna do?). So I'm stuck with it for the time being. > In the meantime, try compiling the thing with > '-O0' and see if the result changes. Switching from -O2 to -O0 made the problem disappear. Thanks for the suggestion! I'm going to experiment a little more with different settings for this switch to find out what works and what doesn't. Thanks again for the help! From lembark at wrkhors.com Fri Feb 8 12:22:34 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Fri, 08 Feb 2008 15:22:34 -0500 Subject: [Chicago-talk] perl test harness failures In-Reply-To: References: <47AC81D6.3010901@wrkhors.com> <47AC9D8C.1030903@wrkhors.com> Message-ID: <47ACBA0A.4020404@wrkhors.com> > Switching from -O2 to -O0 made the problem disappear. Thanks for the > suggestion! I'm going to experiment a little more with different > settings for this switch to find out what works and what doesn't. You might want to see if '-O1' works, at least you'll get some improvement. If it does then send the perl -V, gcc, glib, uname -a info to the maintainers: perl -V gcc --version uname -a; prior script that causes the error. -- Steven Lembark +1 888 359 3508 Workhorse Computing 85-09 90th St lembark at wrkhors.com Woodhaven, NY 11421 From Darren.Young at ChicagoGSB.edu Fri Feb 8 12:48:50 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Fri, 08 Feb 2008 14:48:50 -0600 Subject: [Chicago-talk] Windows event Logs Message-ID: <07A371D457B501478C1DB3C3DE8372D70103B6A0@GSBHEX2V.gsb.uchicago.edu> Anyone here messed with gathering Windows event log data? From what I can find I have 2 options for this, native Perl Win32::EventLog or open dumpel.exe and read from it. What I need are event 540's from the security log (successful network logon events) for the previous day which will be parsed and stored in a SQL table. Each AD DC stores 2 days worth of logs (10 DC's globally) with several hundred thousand of these events on each DC each day. Dumpel.exe takes a switch of "days" to dump for where I don't see any such option for Win32::EventLog, but then, I've never actually used it. I'm wondering if anyone here has done this and might have some suggestions. Perl 5.8 on Windows 2003. Darren Young Systems & Security Architect Computing Services Chicago GSB 5807 South Woodlawn Avenue Chicago, IL 60637 Voice 773.702.0331 | Fax 773.702.0233 From e.ellington at gmail.com Fri Feb 8 13:19:15 2008 From: e.ellington at gmail.com (Eric Ellington) Date: Fri, 8 Feb 2008 15:19:15 -0600 Subject: [Chicago-talk] Windows event Logs In-Reply-To: <07A371D457B501478C1DB3C3DE8372D70103B6A0@GSBHEX2V.gsb.uchicago.edu> References: <07A371D457B501478C1DB3C3DE8372D70103B6A0@GSBHEX2V.gsb.uchicago.edu> Message-ID: Using ActiveState I have used Win32::EventLog. It works. It will gather info from local and remote machines. Copied from their website: use Win32::EventLog; $handle=Win32::EventLog->new("System", $ENV{ComputerName}) or die "Can't open Application EventLog\n"; $handle->GetNumber($recs) or die "Can't get number of EventLog records\n"; $handle->GetOldest($base) or die "Can't get number of oldest EventLog record\n"; while ($x < $recs) { $handle->Read(EVENTLOG_FORWARDS_READ|EVENTLOG_SEEK_READ, $base+$x, $hashRef) or die "Can't read EventLog entry #$x\n"; if ($hashRef->{Source} eq "EventLog") { Win32::EventLog::GetMessageText($hashRef); print "Entry $x: $hashRef->{Message}\n"; } $x++; } Just swap $ENV{ComputerName} with a remote computer name and it will grab the info. Provided whatever user is running the scripts has permission to grab log files remotely. Also, 540 can look like a weird event. A 540 is generated when a user logs on a machine, but also when a user access anything over the network. So if the user views a network drive you will get a new 540. Also if the user starts editing files in the network directory you will get a ton of 540 events. So every time word auto saves to a network drive you can expect a new 540. Eric On Feb 8, 2008 2:48 PM, Young, Darren wrote: > Anyone here messed with gathering Windows event log data? From what I > can find I have 2 options for this, native Perl Win32::EventLog or open > dumpel.exe and read from it. > > What I need are event 540's from the security log (successful network > logon events) for the previous day which will be parsed and stored in a > SQL table. Each AD DC stores 2 days worth of logs (10 DC's globally) > with several hundred thousand of these events on each DC each day. > > Dumpel.exe takes a switch of "days" to dump for where I don't see any > such option for Win32::EventLog, but then, I've never actually used it. > > I'm wondering if anyone here has done this and might have some > suggestions. Perl 5.8 on Windows 2003. > > > Darren Young > Systems & Security Architect > Computing Services > Chicago GSB > 5807 South Woodlawn Avenue > Chicago, IL 60637 > > Voice 773.702.0331 | Fax 773.702.0233 > > > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > -- Eric Ellington e.ellington at gmail.com From Darren.Young at ChicagoGSB.edu Fri Feb 8 13:41:13 2008 From: Darren.Young at ChicagoGSB.edu (Young, Darren) Date: Fri, 08 Feb 2008 15:41:13 -0600 Subject: [Chicago-talk] Windows event Logs In-Reply-To: References: <07A371D457B501478C1DB3C3DE8372D70103B6A0@GSBHEX2V.gsb.uchicago.edu> Message-ID: <07A371D457B501478C1DB3C3DE8372D70103B73F@GSBHEX2V.gsb.uchicago.edu> > Using ActiveState I have used Win32::EventLog. It works. It will > gather info from local and remote machines. Have you ever tried to parse the "Strings" part of the messages? I'm noticing there's not a whole lot of consistency between different event id's. Even in the 540 the number of "columns" in the actual even message isn't consistent. > Also, 540 can look like a weird event. A 540 is generated when a user > logs on a machine, but also when a user access anything over the > network. So if the user views a network drive you will get a new 540. > Also if the user starts editing files in the network directory you > will get a ton of 540 events. So every time word auto saves to a > network drive you can expect a new 540. Yea, I noticed that and I don't see any way to break the logon type down much more granular than type 3. What I have to do here... The University has decided to forward on DMCA complaints to network users. I'm in a "business unit" (graduate school) where we run our own DHCP and authentication (LDAP and AD). Our central NETSEC group receives a DMCA complaint because they're listed against the 128.135.x.x block, however if the IP in question is on one of ours they forward the request to me to determine who the user actually was during the date/time in question. I get the date/time, IP address and MAC address of the "offender" in question from the NETSEC group. So, my first step was to log all DHCP events to a database table and keep 3 months of those. With that I can then prove in fact we gave that IP to that MAC during that time period (they can get the MAC wrong). What I have to do now is map that IP back to an authentication request to AD to obtain the Windows username which can then be tracked to a person. The only event I can find that fits is the 540 logon type 3, even though there are a ton of them. That event contains the source IP address of the request that hit AD as well as the Windows username that was authenticated. Perhaps there's some way I can filter them down even further (remove network drive access, etc) before inserting them into a database table. From e.ellington at gmail.com Fri Feb 8 14:38:01 2008 From: e.ellington at gmail.com (Eric Ellington) Date: Fri, 8 Feb 2008 16:38:01 -0600 Subject: [Chicago-talk] Windows event Logs In-Reply-To: <07A371D457B501478C1DB3C3DE8372D70103B73F@GSBHEX2V.gsb.uchicago.edu> References: <07A371D457B501478C1DB3C3DE8372D70103B6A0@GSBHEX2V.gsb.uchicago.edu> <07A371D457B501478C1DB3C3DE8372D70103B73F@GSBHEX2V.gsb.uchicago.edu> Message-ID: On Feb 8, 2008 3:41 PM, Young, Darren wrote: > > Using ActiveState I have used Win32::EventLog. It works. It will > > gather info from local and remote machines. > > Have you ever tried to parse the "Strings" part of the messages? I'm > noticing there's not a whole lot of consistency between different event > id's. Even in the 540 the number of "columns" in the actual even message > isn't consistent. > Yup, it sucks. It is sort of filled in with data from the event, and sort of not. This is the description from an entry in the event log: The audit log was cleared Primary User Name: SYSTEM Primary Domain: NT AUTHORITY Primary Logon ID: (0x0,0x3E7) Client User Name: SYSTEM Client Domain: NT AUTHORITY Client Logon ID: (0x0,0x3E7) For more information, see Help and Support Center at http://go.microsoft.com/fwlink/events.asp. Strings gives you null spaced crap (I think): SYSTEM \0 NT AUTHORITY \0 (0x0,0x3E7) \0 SYSTEM \0 NT AUTHORITY \0 (0x0,0x3E7) I added the \0s So you can use tr/\0/\n/ or something similar. I am not sure what \0 really means I have never found it in any official docs, I found it on the web a while back. It will replace the nulls in the string however. > > Also, 540 can look like a weird event. A 540 is generated when a user > > logs on a machine, but also when a user access anything over the > > network. So if the user views a network drive you will get a new 540. > > Also if the user starts editing files in the network directory you > > will get a ton of 540 events. So every time word auto saves to a > > network drive you can expect a new 540. > > Yea, I noticed that and I don't see any way to break the logon type down > much more granular than type 3. > > What I have to do here... > > The University has decided to forward on DMCA complaints to network > users. I'm in a "business unit" (graduate school) where we run our own > DHCP and authentication (LDAP and AD). Our central NETSEC group receives > a DMCA complaint because they're listed against the 128.135.x.x block, > however if the IP in question is on one of ours they forward the request > to me to determine who the user actually was during the date/time in > question. I get the date/time, IP address and MAC address of the > "offender" in question from the NETSEC group. > > So, my first step was to log all DHCP events to a database table and > keep 3 months of those. With that I can then prove in fact we gave that > IP to that MAC during that time period (they can get the MAC wrong). > What I have to do now is map that IP back to an authentication request > to AD to obtain the Windows username which can then be tracked to a > person. The only event I can find that fits is the 540 logon type 3, > even though there are a ton of them. That event contains the source IP > address of the request that hit AD as well as the Windows username that > was authenticated. > > Perhaps there's some way I can filter them down even further (remove > network drive access, etc) before inserting them into a database table. > > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > -- Eric Ellington e.ellington at gmail.com From andy at petdance.com Sun Feb 17 15:16:15 2008 From: andy at petdance.com (Andy Lester) Date: Sun, 17 Feb 2008 17:16:15 -0600 Subject: [Chicago-talk] Chicagoans report in Message-ID: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> If you went to Minneapolis for Frozen Perl, I hope you got back OK. I drove back through some pretty dismal snow between Minneapolis and Madison today. I know Elliot Shank and I are both back. McAdams? Rockway? foy? Melesky? xoxo, Andy -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From joshua.mcadams at gmail.com Sun Feb 17 18:22:47 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Sun, 17 Feb 2008 20:22:47 -0600 Subject: [Chicago-talk] Chicagoans report in In-Reply-To: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> References: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> Message-ID: <49d805d70802171822r704d2210t92e8b203dd5b0008@mail.gmail.com> > If you went to Minneapolis for Frozen Perl, I hope you got back OK. I > drove back through some pretty dismal snow between Minneapolis and > Madison today. I know Elliot Shank and I are both back. McAdams? > Rockway? foy? Melesky? Yup, I'm back in Chi-town. It was a really good workshop.... wish I had stayed for the hack-a-thon now. From lembark at wrkhors.com Sun Feb 17 19:32:32 2008 From: lembark at wrkhors.com (Steven Lembark) Date: Sun, 17 Feb 2008 22:32:32 -0500 Subject: [Chicago-talk] Chicagoans report in In-Reply-To: <49d805d70802171822r704d2210t92e8b203dd5b0008@mail.gmail.com> References: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> <49d805d70802171822r704d2210t92e8b203dd5b0008@mail.gmail.com> Message-ID: <47B8FC50.3000906@wrkhors.com> > Yup, I'm back in Chi-town. It was a really good workshop.... wish I > had stayed for the hack-a-thon now. What are you planning for YAPC? -- Steven Lembark 85-09 90th St. Workhorse Computing Woodhaven, NY, 11421 lembark at wrkhors.com +1 888 359 3508 From joshua.mcadams at gmail.com Sun Feb 17 21:03:32 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Sun, 17 Feb 2008 23:03:32 -0600 Subject: [Chicago-talk] Chicagoans report in In-Reply-To: <47B8FC50.3000906@wrkhors.com> References: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> <49d805d70802171822r704d2210t92e8b203dd5b0008@mail.gmail.com> <47B8FC50.3000906@wrkhors.com> Message-ID: <49d805d70802172103o22a0b562o42021b5ad88978d6@mail.gmail.com> > What are you planning for YAPC? Definitely a post-yapc hack-a-thon... possibly one beforehand too since I've had requests for it. No details yet though :( From list at phaedrusdeinus.org Mon Feb 18 09:55:06 2008 From: list at phaedrusdeinus.org (John Melesky) Date: Mon, 18 Feb 2008 11:55:06 -0600 Subject: [Chicago-talk] Chicagoans report in In-Reply-To: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> References: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> Message-ID: On Feb 17, 2008, at 5:16 PM, Andy Lester wrote: > I know Elliot Shank and I are both back.... Melesky? Roger that. Melesky present and accounted for. Amtrak doesn't mind snow, apparently. -johnnnnnnn From andy at petdance.com Mon Feb 18 11:17:35 2008 From: andy at petdance.com (Andy Lester) Date: Mon, 18 Feb 2008 13:17:35 -0600 Subject: [Chicago-talk] Fwd: [LUNI] ANN: PyCon 2008 in Chicago References: <20080216153056.GA23919@amk.local> Message-ID: <1255BA12-493D-4720-95AC-6DD9D1771911@petdance.com> Begin forwarded message: > From: "A.M. Kuchling" > Date: February 16, 2008 9:30:56 AM CST > To: luni-announce at luni.org > Subject: [LUNI] ANN: PyCon 2008 in Chicago > Reply-To: luni at luni.org > > The Python Software Foundation is proud to present PyCon 2008, the 6th > annual Python community conference, being held in Chicago. > > PyCon 2008: March 14-16, 2008 > Tutorial day: March 13 > Free sprints: March 17-20 > http://us.pycon.org > > Come to PyCon 2008 to: > > * meet interesting people in the Python community > * learn about cool things others have done recently > * show off the cool things you've done recently > * learn about projects, tools & techniques > * advance open source projects > > A sampling of this year's talks: > > * Core Python Containers -- Under the Hood > * Running a Successful Usergroup > * Programming for the One Laptop Per Child laptop > * Python-powered Multitouch > * The State of Django > * High performance Network IO with Python + Libevent > > See http://us.pycon.org/2008/conference/talks/ for the full list. > > The day before the conference, the tutorial day features 28 different > three-hour tutorials, on topics such as Python 101, scientific > programming, SQLAlchemy, PyGame, and web tools such as Django, > Turbogears, and Plone. > > http://us.pycon.org/2008/tutorials/ > > After the conference, we have four days of sprints where project > developers can work together and introduce new developers. Projects > sprinting this year include the Python interpreter, Jython, Django, > Turbogears, Bazaar, and Orbited. Sprints are free, and anyone can > attend. > > http://us.pycon.org/2008/sprints/projects/ > > If you haven't registered for PyCon yet, now is the time! The > early-bird registration deadline is this Wednesday, February 20. > After that, the price for registration will be going up. > > http://us.pycon.org/2008/registration/ > > > Andrew M. Kuchling > amk at amk.ca > Registration Manager, PyCon 2008 > http://us.pycon.org > -- > Linux Users Of Northern Illinois - Announcements Mailing List > http://luni.org/mailman/listinfo/luni-announce > -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From andy at petdance.com Mon Feb 18 11:18:42 2008 From: andy at petdance.com (Andy Lester) Date: Mon, 18 Feb 2008 13:18:42 -0600 Subject: [Chicago-talk] Chicagoans report in In-Reply-To: References: <2F89AD1D-9328-4859-8575-FC28F92F17B4@petdance.com> Message-ID: <3C49688E-15F5-4B81-8B0C-352C4916000E@petdance.com> On Feb 18, 2008, at 11:55 AM, John Melesky wrote: > Roger that. Melesky present and accounted for. Amtrak doesn't mind > snow, apparently. I have a Chicago-to-Boise trip from years ago that would like to disagree with you. -- Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance From joshua.mcadams at gmail.com Tue Feb 19 09:21:35 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Tue, 19 Feb 2008 11:21:35 -0600 Subject: [Chicago-talk] Chicago Perl Seminar Message-ID: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Would any of you be interested (and able to attend) a monthly (typically) Perl-focused seminar held downtown during the workday? We are thinking about bringing in big names in Perl from around the country (world maybe) and would like to gauge how much interest there is. Also, suggestions on days and times are very welcome, as are speaker ideas. Thanks, Josh From chicago.pm at galumph.com Tue Feb 19 09:36:58 2008 From: chicago.pm at galumph.com (Elliot Shank) Date: Tue, 19 Feb 2008 11:36:58 -0600 Subject: [Chicago-talk] Chicago Perl Seminar In-Reply-To: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Message-ID: <47BB13BA.4090804@galumph.com> Joshua McAdams wrote: > Would any of you be interested (and able to attend) a monthly > (typically) Perl-focused seminar held downtown during the workday? We > are thinking about bringing in big names in Perl from around the > country (world maybe) and would like to gauge how much interest there > is. Also, suggestions on days and times are very welcome, as are > speaker ideas. Are we talking an all-day thing? I'm certainly interested. From joshua.mcadams at gmail.com Tue Feb 19 09:40:28 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Tue, 19 Feb 2008 11:40:28 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: <47BB13BA.4090804@galumph.com> References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> <47BB13BA.4090804@galumph.com> Message-ID: <49d805d70802190940n34fead27u8133cafbcb5d9959@mail.gmail.com> > Are we talking an all-day thing? > > I'm certainly interested. All-day would probably put too much stress on the speaker. I'm thinking something more in-line with the Google tech talks.... one or two hours. As far as when, I'm thinking during lunch (for people who can't get off any other time) or later in the workday, so that people can come in early, leave early, and stop by the talk before getting on the train to go home. From esinclai at pobox.com Tue Feb 19 10:09:27 2008 From: esinclai at pobox.com (Eric Sinclair) Date: Tue, 19 Feb 2008 12:09:27 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: <49d805d70802190940n34fead27u8133cafbcb5d9959@mail.gmail.com> Message-ID: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> +1, particularly if it is boxed at 2 hours, it becomes easier to explain to a boss or partner... ------- Original message ------- From: Joshua McAdams To: chicago.pm at galumph.com Cc: windycity-pm at pm.org, chicago-talk at pm.org Sent: 19.2.'08, 11:40 > > Are we talking an all-day thing? > > > > I'm certainly interested. > > All-day would probably put too much stress on the speaker. I'm > thinking something more in-line with the Google tech talks.... one or > two hours. As far as when, I'm thinking during lunch (for people who > can't get off any other time) or later in the workday, so that people > can come in early, leave early, and stop by the talk before getting on > the train to go home. > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk From tom at yarrish.com Tue Feb 19 11:14:16 2008 From: tom at yarrish.com (Tom Yarrish) Date: Tue, 19 Feb 2008 13:14:16 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> References: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> Message-ID: -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 On Feb 19, 2008, at 12:09 PM, Eric Sinclair wrote: > +1, particularly if it is boxed at 2 hours, it becomes easier to > explain to > a boss or partner... > > ------- Original message ------- > From: Joshua McAdams > To: chicago.pm at galumph.com > Cc: windycity-pm at pm.org, chicago-talk at pm.org > Sent: 19.2.'08, 11:40 > >>> Are we talking an all-day thing? >>> >>> I'm certainly interested. >> >> All-day would probably put too much stress on the speaker. I'm >> thinking something more in-line with the Google tech talks.... one or >> two hours. As far as when, I'm thinking during lunch (for people who >> can't get off any other time) or later in the workday, so that people >> can come in early, leave early, and stop by the talk before getting >> on >> the train to go home. >> What would be the difference between this and having the same person come and do a talk at a PM meeting? I'd be interested either way, unfortunately there's no way for me to attend (since I work in the 'burbs). Tom -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.8 (Darwin) iEYEARECAAYFAke7KogACgkQZWzkfeDiTw4eywCfbdyQcO/qsqq696lSS4Rv4tuc D3UAn2XM5ZWr+BU+aNf1MAWHA2UbQjou =nUfT -----END PGP SIGNATURE----- From kent at c2group.net Tue Feb 19 11:21:28 2008 From: kent at c2group.net (Kent Cowgill) Date: Tue, 19 Feb 2008 13:21:28 -0600 Subject: [Chicago-talk] Chicago Perl Seminar In-Reply-To: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Message-ID: <16C737C5-253F-4A0D-BB43-4BC05F6988A9@c2group.net> On Feb 19, 2008, at 11:21 AM, Joshua McAdams wrote: > Would any of you be interested (and able to attend) a monthly > (typically) Perl-focused seminar held downtown during the workday? We > are thinking about bringing in big names in Perl from around the > country (world maybe) and would like to gauge how much interest there > is. Also, suggestions on days and times are very welcome, as are > speaker ideas. I'm definitely interested. As far as days and times - I think I like the lunch suggestion best. And if that's the time, then I don't know that I would personally have a preference for a given day over another. -Kent Cowgill C2 Group, Inc. kent at c2group.net http://www.c2group.net 312.804.0160 From frag at ripco.com Tue Feb 19 11:39:51 2008 From: frag at ripco.com (Mike Fragassi) Date: Tue, 19 Feb 2008 13:39:51 -0600 (CST) Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: References: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> Message-ID: On Tue, 19 Feb 2008, Tom Yarrish wrote: > What would be the difference between this and having the same person > come and do a talk at a PM meeting? I'd be interested either way, > unfortunately there's no way for me to attend (since I work in the > 'burbs). I'm not able to attend anything during work days, for the same reason. -- Mike F. From joshua.mcadams at gmail.com Tue Feb 19 14:53:30 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Tue, 19 Feb 2008 16:53:30 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: References: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> Message-ID: <49d805d70802191453v528c6b92x67e8fcf780598497@mail.gmail.com> > What would be the difference between this and having the same person > come and do a talk at a PM meeting? I'd be interested either way, > unfortunately there's no way for me to attend (since I work in the > 'burbs). The difference would be that it would allow for people who can't make the night meetings downtown to come to some meetings/seminars. We'd probably end up having the speaker stay over and come to an 'emergency' PM meeting the night of the talk if they were willing. Basically, I'm just trying to shake it up a bit and start having more options for meetings. There are some communities that actually have all of their user group meetings during the day because people are already concentrated downtown and can get the 2 hours off from work. I figured this would be worth a shot. Plus, I have a better chance of getting the speaker's travel paid for if I can get them to speak during the workday at an office. From warren.lindsey at gmail.com Tue Feb 19 17:02:54 2008 From: warren.lindsey at gmail.com (warren.lindsey at gmail.com) Date: Tue, 19 Feb 2008 19:02:54 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: <49d805d70802191453v528c6b92x67e8fcf780598497@mail.gmail.com> References: <20080219181032.2F68A341C@a-sasl-quonix.pobox.com> <49d805d70802191453v528c6b92x67e8fcf780598497@mail.gmail.com> Message-ID: <841e880a0802191702v24903e0xc15d54ac0ccd63c7@mail.gmail.com> I too would be interested indeed. Upper limit of work escape time would also be ~2 hours. Anything more starts to look like a half-day once you start to count commute time. On 2/19/08, Joshua McAdams wrote: > > What would be the difference between this and having the same person > > come and do a talk at a PM meeting? I'd be interested either way, > > unfortunately there's no way for me to attend (since I work in the > > 'burbs). > > The difference would be that it would allow for people who can't make > the night meetings downtown to come to some meetings/seminars. We'd > probably end up having the speaker stay over and come to an > 'emergency' PM meeting the night of the talk if they were willing. > Basically, I'm just trying to shake it up a bit and start having more > options for meetings. There are some communities that actually have > all of their user group meetings during the day because people are > already concentrated downtown and can get the 2 hours off from work. > I figured this would be worth a shot. Plus, I have a better chance of > getting the speaker's travel paid for if I can get them to speak > during the workday at an office. > _______________________________________________ > WindyCity-pm mailing list > WindyCity-pm at pm.org > http://mail.pm.org/mailman/listinfo/windycity-pm > From a.wong2.nu at gmail.com Tue Feb 19 20:27:14 2008 From: a.wong2.nu at gmail.com (Tony Wong) Date: Tue, 19 Feb 2008 22:27:14 -0600 Subject: [Chicago-talk] Chicago Perl Seminar In-Reply-To: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Message-ID: <334a3ab20802192027w7a7becdev8f53d41bc97dce1c@mail.gmail.com> I'd certainly be interested and willing to come. I haven't been able to come out for the last couple of Windy City PM meetings because of a standing Tuesday evening appointment since the beginning of the year. Since I missed Frozen Perl too (last minute) because of family reasons, I'm eager for some Perl content. Days/times are flexible for me since it would be during the workday. Thanks, Tony On Feb 19, 2008 11:21 AM, Joshua McAdams wrote: > Would any of you be interested (and able to attend) a monthly > (typically) Perl-focused seminar held downtown during the workday? We > are thinking about bringing in big names in Perl from around the > country (world maybe) and would like to gauge how much interest there > is. Also, suggestions on days and times are very welcome, as are > speaker ideas. > > Thanks, > Josh > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > From joshua.mcadams at gmail.com Wed Feb 20 06:38:08 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Wed, 20 Feb 2008 08:38:08 -0600 Subject: [Chicago-talk] Fwd: Floruish Conference 2008 Registration is Open In-Reply-To: <3d76512f0802192119l4386bc66ld9d1dacc89d238d@mail.gmail.com> References: <59732.131.193.35.151.1203348191.squirrel@acm.cs.uic.edu> <3d76512f0802192119l4386bc66ld9d1dacc89d238d@mail.gmail.com> Message-ID: <49d805d70802200638g76cf1abt55f619f25650e034@mail.gmail.com> Hello Everyone, Registration for Flourish Conference 2008 is now open. Please register if you plan on attending: http://www.flourishconf.com/ Thank you, Joel Luellwitz -- Linux Users Of Northern Illinois - Technical Discussion http://luni.org/mailman/listinfo/luni From jason at froebe.net Thu Feb 21 06:38:16 2008 From: jason at froebe.net (Jason L. Froebe) Date: Thu, 21 Feb 2008 06:38:16 -0800 (PST) Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar Message-ID: <193461.41729.qm@web801.biz.mail.mud.yahoo.com> For those of us that work out in the 'burbs, it would probably help us if we knew what the topic was and who the speaker will be at least 2 weeks out so we can get permission from the bosses to go. :) Jason L. Froebe WebBlog http://jfroebe.livejournal.com Tech log http://www.froebe.net/blog Froebe Fibers http://www.froebe-fibers.com ----- Original Message ---- From: "warren.lindsey at gmail.com" To: Joshua McAdams Cc: windycity-pm ; Chicago.pm chatter Sent: Tuesday, February 19, 2008 7:02:54 PM Subject: Re: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar I too would be interested indeed. Upper limit of work escape time would also be ~2 hours. Anything more starts to look like a half-day once you start to count commute time. On 2/19/08, Joshua McAdams wrote: > > What would be the difference between this and having the same person > > come and do a talk at a PM meeting? I'd be interested either way, > > unfortunately there's no way for me to attend (since I work in the > > 'burbs). > > The difference would be that it would allow for people who can't make > the night meetings downtown to come to some meetings/seminars. We'd > probably end up having the speaker stay over and come to an > 'emergency' PM meeting the night of the talk if they were willing. > Basically, I'm just trying to shake it up a bit and start having more > options for meetings. There are some communities that actually have > all of their user group meetings during the day because people are > already concentrated downtown and can get the 2 hours off from work. > I figured this would be worth a shot. Plus, I have a better chance of > getting the speaker's travel paid for if I can get them to speak > during the workday at an office. > _______________________________________________ > WindyCity-pm mailing list > WindyCity-pm at pm.org > http://mail.pm.org/mailman/listinfo/windycity-pm > _______________________________________________ Chicago-talk mailing list Chicago-talk at pm.org http://mail.pm.org/mailman/listinfo/chicago-talk -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/chicago-talk/attachments/20080221/839f4a9c/attachment.html From tzz at lifelogs.com Thu Feb 21 08:39:00 2008 From: tzz at lifelogs.com (Ted Zlatanov) Date: Thu, 21 Feb 2008 10:39:00 -0600 Subject: [Chicago-talk] Chicago Perl Seminar In-Reply-To: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> (Joshua McAdams's message of "Tue, 19 Feb 2008 11:21:35 -0600") References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Message-ID: <863armz2l7.fsf@lifelogs.com> On Tue, 19 Feb 2008 11:21:35 -0600 "Joshua McAdams" wrote: JM> Would any of you be interested (and able to attend) a monthly JM> (typically) Perl-focused seminar held downtown during the workday? We JM> are thinking about bringing in big names in Perl from around the JM> country (world maybe) and would like to gauge how much interest there JM> is. Also, suggestions on days and times are very welcome, as are JM> speaker ideas. I'd be interested, especially around lunch time regardless of the day. Go with Klipsch speakers, they are OK :) Ted From arodland at comcast.net Thu Feb 21 15:28:47 2008 From: arodland at comcast.net (Andrew Rodland) Date: Thu, 21 Feb 2008 17:28:47 -0600 Subject: [Chicago-talk] [WindyCity-pm] Chicago Perl Seminar In-Reply-To: References: <49d805d70802190921m4e9cd737rbb5870a6f9d11e33@mail.gmail.com> Message-ID: <200802211728.47724.arodland@comcast.net> On Thursday 21 February 2008 03:59:16 pm Craig A. Berry wrote: > 164: jdhedden at cpan.org perlbug at perl.org I nominate perlbug at perl.org to be the first speaker. Andrew From dave at obtiva.com Fri Feb 22 19:25:16 2008 From: dave at obtiva.com (Dave Hoover) Date: Fri, 22 Feb 2008 21:25:16 -0600 Subject: [Chicago-talk] The JavaScript Renaissance Part II: The Browser In-Reply-To: <11c8704e0801301051ne3bfef0m4b17557fcf73e4ed@mail.gmail.com> References: <11c8704e0801301051ne3bfef0m4b17557fcf73e4ed@mail.gmail.com> Message-ID: <11c8704e0802221925q1bc47985o99faa9670033df69@mail.gmail.com> Just in case anyone missed it, Fred posted the materials from his February talk on his blog: http://sustainablecode.com/blog/2008/02/more-mongering.html Fred has offered to do part 3 of his JavaScript series in April, so we're available for a talk in March. Please let me know if you have a Perl topic you'd like to hear or speak about. On Wed, Jan 30, 2008 at 12:51 PM, Dave Hoover wrote: > We're going to continue our focus on JavaScript for our Febrary > meeting in Wheaton. Fred Polgardy will continue his JavaScript > Renaissance series. > > When: Tuesday, Feb 12, 2008, 7-9 PM > Where: Wheaton, IIT - Rice Campus > Who: Frederick Polgardy > What: The JavaScript Renaissance Part II: The Browser > > What comes to mind when think of JavaScript? Broken web sites, browser > incompatibilities, and brittle spaghetti code? It doesn't have to be > this way anymore! Last time we learned about some powerful features of > JavaScript, the language. In Part II of our exploration, we'll be > focusing on JavaScript in its native habitat -- the Web browser. > We'll look at the Document Object Model, and how it enables us to > dynamically create and modify web page content. We'll learn about the > DOM Event Model, and how it gives us the capability to capture and > respond to user input. We'll also take a brief look at > XMLHttpRequest, the technology that makes Ajax possible, and see how > to communicate with the server without ever leaving the page. Along > the way, we'll grapple with browser incompatibility issues, and see > how libraries like Prototype and jQuery help us navigate the waters. > > More information and directions can be found at > http://chicago.pm.org/meetings/ > > Let me know if you have ideas for other talks in 2008. I'd definitely > like to get back to Perl, but haven't heard from anyone about what > they'd like to hear or talk about. > > Best, > > Dave Hoover > //obtiva: Agility applied. Software delivered. From joshua.mcadams at gmail.com Mon Feb 25 11:50:30 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Mon, 25 Feb 2008 13:50:30 -0600 Subject: [Chicago-talk] Chicago.pm Meeting Tommorrow Message-ID: <49d805d70802251150g636bd2d8qdf3debacc8f977cc@mail.gmail.com> Just a friendly reminder that there is a Chicago.pm meeting tomorrow at 7pm at Performics (180 N LaSalle 12th Floor). The topic of the meeting will be "New Features in Perl 5.10". If you haven't rsvp'd before, please let me know that you are coming. From seanpue at uchicago.edu Mon Feb 25 12:00:40 2008 From: seanpue at uchicago.edu (Sean Pue) Date: Mon, 25 Feb 2008 14:00:40 -0600 Subject: [Chicago-talk] Chicago.pm Meeting Tommorrow In-Reply-To: <49d805d70802251150g636bd2d8qdf3debacc8f977cc@mail.gmail.com> References: <49d805d70802251150g636bd2d8qdf3debacc8f977cc@mail.gmail.com> Message-ID: <47C31E68.4010001@uchicago.edu> Joshua McAdams wrote: > Just a friendly reminder that there is a Chicago.pm meeting tomorrow > at 7pm at Performics (180 N LaSalle 12th Floor). The topic of the > meeting will be "New Features in Perl 5.10". If you haven't rsvp'd > before, please let me know that you are coming. > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > Hi Joshua, I would like to come for this meeting, and I haven't RSVPed before. Best, Sean Pue From laylward at gmail.com Mon Feb 25 19:20:12 2008 From: laylward at gmail.com (Lee Aylward) Date: Mon, 25 Feb 2008 21:20:12 -0600 Subject: [Chicago-talk] Chicago.pm Meeting Tommorrow In-Reply-To: <49d805d70802251150g636bd2d8qdf3debacc8f977cc@mail.gmail.com> References: <49d805d70802251150g636bd2d8qdf3debacc8f977cc@mail.gmail.com> Message-ID: On Mon, Feb 25, 2008 at 1:50 PM, Joshua McAdams wrote: > Just a friendly reminder that there is a Chicago.pm meeting tomorrow > at 7pm at Performics (180 N LaSalle 12th Floor). The topic of the > meeting will be "New Features in Perl 5.10". If you haven't rsvp'd > before, please let me know that you are coming. > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > I have only RSVP'd once or twice some time ago, so I'll put my name in once again. Thanks! -- Lee Aylward -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/chicago-talk/attachments/20080225/ea217814/attachment.html From joshua.mcadams at gmail.com Mon Feb 25 22:19:54 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Tue, 26 Feb 2008 00:19:54 -0600 Subject: [Chicago-talk] Last call for the February Meeting of Chicago.pm/WindyCity.pm Message-ID: <49d805d70802252219h1d362f5ax35e4d966cf80e0d9@mail.gmail.com> Who knew that a talk on Perl 5.10 would be such a hot topic... I sure didn't. Regardless, I've gotten a slew of RSVP's for the meeting today (Tuesday February 26th at 7pm) so I wanted to put out one more final call for RSVPs just in case anyone didn't see the first round. If you haven't RSVP'd for a Chicago.pm/WindyCity.pm meeting in the last few months and if you even have the slightest urge to come to the meeting, please let me know by noon today so that I can get you on the security list. The meeting will be a group discussion/exploration led by brian d foy and myself on some of the changes that have gone into Perl 5.10, or as I like to call it in front of my Java friends, Perl 10 (joke). The meeting will begin around 7pm on Tuesday February 26th at the offices of Performics at 180 N La Salle St. on the 12th floor. See you tonight! Josh From seanpue at uchicago.edu Fri Feb 29 09:10:55 2008 From: seanpue at uchicago.edu (A. Sean Pue) Date: Fri, 29 Feb 2008 11:10:55 -0600 (CST) Subject: [Chicago-talk] Perl and Unicode Locale Data Message-ID: <20080229111055.BBA66200@m4500-02.uchicago.edu> Hiya, I am trying to access Unicode locale data. I know from Java of IBM's International Components for Unicode, http://icu-project.org/ , which is open-source (?) and also available for C. I have seen some Google hits in relation to it and Perl 6. It looks like (all/most?) of its data is from Unicode's Common Locale Data Repository: http://www.unicode.org/cldr/ . Is that information available from Perl? I am particularly interested in getting what the ICU locale explorer describes as the "Exemplar Characters" and also applying the Collate Rules, ie on this page http://demo.icu-project.org/icu-bin/locexp?d_=en&_=hi_IN I have used Unicode::Collate but have not found a way to use these types of standardized, perhaps versioned (like UCD) collation rules, especially in this easy to read abstracted format with easy insertion rules and so on. Thanks in advance. It was great meeting some of you on Tuesday. Best, Sean From cmlong at invisiblestreams.com Fri Feb 29 15:10:39 2008 From: cmlong at invisiblestreams.com (chris long) Date: Fri, 29 Feb 2008 17:10:39 -0600 Subject: [Chicago-talk] Trouble compiling DBD::Oracle for Fedora core 8 Message-ID: <4E140ED1-7781-4248-8C52-370AF703390E@invisiblestreams.com> Im trying to set up and configure a development environment based around Apache/mod_perl and Oracle on a Fedora Core 8 server. I have run into issues configuring the DBD::Oracle module for the Perl DBI. Notes on the steps I've taken thus far: I have successfully installed the rpm's for the oracle instant client, and the developers package with the necessary library and header files. I was able to successfully write the makefile for DBD::Oracle, but when I run make I experience a series of syntax errors and warnings related to the perl core. [root at surveystars DBD-Oracle-1.20]# make gcc -c -I/usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi/auto/ DBI -I/usr/include/oracle/11.1.0.1/client -O2 -g -pipe -m32 - march=i386 -mtune=pentium4 -DVERSION=\"1.20\" -DXS_VERSION=\"1.20\" - fPIC "-I/usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE" -Wall - Wcast-align -Wpointer-arith -DORA_OCI_VERSION=\"11.1.0.1\" Oracle.c In file included from /usr/lib/perl5/5.8.5/i386-linux-thread-multi/ CORE/op.h:487, from /usr/lib/perl5/5.8.5/i386-linux-thread-multi/ CORE/perl.h:2355, from /usr/lib/perl5/site_perl/5.8.5/i386-linux- thread-multi/auto/DBI/DBIXS.h:19, from Oracle.h:51, from Oracle.xs:1: /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/reentr.h:611: error: field `_crypt_struct' has incomplete type In file included from /usr/lib/perl5/5.8.5/i386-linux-thread-multi/ CORE/perl.h:3565, from /usr/lib/perl5/site_perl/5.8.5/i386-linux- thread-multi/auto/DBI/DBIXS.h:19, from Oracle.h:51, from Oracle.xs:1: /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:199: error: syntax error before "off64_t" /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:201: error: syntax error before "Perl_do_sysseek" /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:201: error: syntax error before "off64_t" /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:201: warning: type defaults to `int' in declaration of `Perl_do_sysseek' /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:201: warning: data definition has no type or storage class /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:202: error: syntax error before "Perl_do_tell" /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:202: warning: type defaults to `int' in declaration of `Perl_do_tell' /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:202: warning: data definition has no type or storage class /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:1308: error: syntax error before "Perl_PerlIO_tell" /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:1308: warning: type defaults to `int' in declaration of `Perl_PerlIO_tell' /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:1308: warning: data definition has no type or storage class /usr/lib/perl5/5.8.5/i386-linux-thread-multi/CORE/proto.h:1309: error: syntax error before "off64_t" Oracle.xs: In function `XS_DBD__Oracle__db_ora_lob_write': Oracle.xs:209: warning: dereferencing type-punned pointer will break strict-aliasing rules Oracle.xs: In function `XS_DBD__Oracle__db_ora_lob_append': Oracle.xs:265: warning: dereferencing type-punned pointer will break strict-aliasing rules Oracle.xs: In function `XS_DBD__Oracle__db_ora_lob_read': Oracle.xs:333: warning: dereferencing type-punned pointer will break strict-aliasing rules Oracle.xs: In function `XS_DBD__Oracle__db_ora_lob_length': Oracle.xs:377: warning: dereferencing type-punned pointer will break strict-aliasing rules make: *** [Oracle.o] Error 1 Is there something wrong with the perl compiled on this distribution? If you are familiar with this, maybe you could suggest a Linux Distro that you have successfully compiled DBD::Oracle on for production use, or any other tips or suggestions you might have for setting up this environment. Thanks- Chris Long -------------- next part -------------- An HTML attachment was scrubbed... URL: http://mail.pm.org/pipermail/chicago-talk/attachments/20080229/ee44f3e7/attachment.html From chicago.pm at galumph.com Fri Feb 29 18:34:59 2008 From: chicago.pm at galumph.com (Elliot Shank) Date: Fri, 29 Feb 2008 20:34:59 -0600 Subject: [Chicago-talk] Perl and Unicode Locale Data In-Reply-To: <20080229111055.BBA66200@m4500-02.uchicago.edu> References: <20080229111055.BBA66200@m4500-02.uchicago.edu> Message-ID: <47C8C0D3.4050208@galumph.com> A. Sean Pue wrote: > I am trying to access Unicode locale data. I know from Java > of IBM's International Components for Unicode, > http://icu-project.org/ , which is open-source (?) and also > available for C. I have seen some Google hits in relation to > it and Perl 6. It looks like (all/most?) of its data is from > Unicode's Common Locale Data Repository: > http://www.unicode.org/cldr/ . Is that information available > from Perl? I'm no help in this matter, but I'm seriously interested in anything you find out. From joshua.mcadams at gmail.com Fri Feb 29 21:00:26 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Fri, 29 Feb 2008 23:00:26 -0600 Subject: [Chicago-talk] Perl and Unicode Locale Data In-Reply-To: <47C8C0D3.4050208@galumph.com> References: <20080229111055.BBA66200@m4500-02.uchicago.edu> <47C8C0D3.4050208@galumph.com> Message-ID: <49d805d70802292100qbe1b256hef26964c2bd933bc@mail.gmail.com> I know that Tatsuhiko Miyagawa has recently claimed to have groked Perl's Unicode. You might want to contact him directly or via use.perl comments: http://use.perl.org/~miyagawa/journal/ On Fri, Feb 29, 2008 at 8:34 PM, Elliot Shank wrote: > A. Sean Pue wrote: > > I am trying to access Unicode locale data. I know from Java > > of IBM's International Components for Unicode, > > http://icu-project.org/ , which is open-source (?) and also > > available for C. I have seen some Google hits in relation to > > it and Perl 6. It looks like (all/most?) of its data is from > > Unicode's Common Locale Data Repository: > > http://www.unicode.org/cldr/ . Is that information available > > from Perl? > > I'm no help in this matter, but I'm seriously interested in anything you find out. > > > _______________________________________________ > Chicago-talk mailing list > Chicago-talk at pm.org > http://mail.pm.org/mailman/listinfo/chicago-talk > From joshua.mcadams at gmail.com Fri Feb 29 21:06:09 2008 From: joshua.mcadams at gmail.com (Joshua McAdams) Date: Fri, 29 Feb 2008 23:06:09 -0600 Subject: [Chicago-talk] Trouble compiling DBD::Oracle for Fedora core 8 In-Reply-To: <4E140ED1-7781-4248-8C52-370AF703390E@invisiblestreams.com> References: <4E140ED1-7781-4248-8C52-370AF703390E@invisiblestreams.com> Message-ID: <49d805d70802292106r33d19a0es75b4b9411f40ed5e@mail.gmail.com> > I have successfully installed the rpm's for the oracle instant client, and > the developers package with the necessary library and header files. > I was able to successfully write the makefile for DBD::Oracle, but when I > run make I experience a series of syntax errors and warnings related to the > perl core. Since you've been going the rpm-route on the rest of the install, have you considered finding an rpm install of DBD-Oracle? It might not be ideal for you, but there is a good/better chance of you getting it to work.