From doug.miles at bpxinternet.com Mon Jun 4 13:37:18 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday Message-ID: <3B1BD55E.30CE18F4@bpxinternet.com> Does anyone have anything they'd like to present on Thursday? Let me know. Eden might have a short presentation on VIM sometime. Eden? From doug.miles at bpxinternet.com Tue Jun 5 15:04:31 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday References: <3B1BD55E.30CE18F4@bpxinternet.com> Message-ID: <3B1D3B4F.68591677@bpxinternet.com> Doug Miles wrote: > > Does anyone have anything they'd like to present on Thursday? Let me > know. Eden might have a short presentation on VIM sometime. Eden? Ahhhh! The silence is deafening! :) Well, how about a social meeting at the Willow House? Anyone up for that? From jobrooks at us.dhl.com Tue Jun 5 15:35:54 2001 From: jobrooks at us.dhl.com (Jo Brooks) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday References: <3B1BD55E.30CE18F4@bpxinternet.com> <3B1D3B4F.68591677@bpxinternet.com> Message-ID: <3B1D42AA.CCCC74C2@us.dhl.com> so what and where is Willow House? jo Doug Miles wrote: > > Doug Miles wrote: > > > > Does anyone have anything they'd like to present on Thursday? Let me > > know. Eden might have a short presentation on VIM sometime. Eden? > > Ahhhh! The silence is deafening! :) Well, how about a social meeting at > the Willow House? Anyone up for that? From macnaughtan at hotmail.com Tue Jun 5 16:56:48 2001 From: macnaughtan at hotmail.com (Heather Macnaughtan) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday Message-ID: Willow House sounds good to me. -Heather _________________________________________________________________ Get your FREE download of MSN Explorer at http://explorer.msn.com From Bryan.Lane at VITALPS.COM Tue Jun 5 17:04:40 2001 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday Message-ID: <219B26AF200FD411A11200805FE6EF2503B3F32A@tef00021.vitalps.com> Sorry, I don't think I will be able to come. I have to take Aubrey to practice. > -----Original Message----- > From: doug.miles@bpxinternet.com [SMTP:doug.miles@bpxinternet.com] > Sent: Tuesday, June 05, 2001 1:05 PM > To: phoenix-pm-list@happyfunball.pm.org > Subject: Re: Phoenix.pm: Presentation for Thursday > > Doug Miles wrote: > > > > Does anyone have anything they'd like to present on Thursday? Let me > > know. Eden might have a short presentation on VIM sometime. Eden? > > Ahhhh! The silence is deafening! :) Well, how about a social meeting at > the Willow House? Anyone up for that? From phaedrus at illogics.org Tue Jun 5 18:21:34 2001 From: phaedrus at illogics.org (Scott Walters) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday In-Reply-To: <3B1BD55E.30CE18F4@bpxinternet.com> Message-ID: Testing.. can I speak again? -scott On Mon, 4 Jun 2001, Doug Miles wrote: > Does anyone have anything they'd like to present on Thursday? Let me > know. Eden might have a short presentation on VIM sometime. Eden? > From phaedrus at illogics.org Tue Jun 5 18:38:20 2001 From: phaedrus at illogics.org (Scott Walters) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Fwd:Code as per Doug's request: parsing nested structures (fwd) Message-ID: Sending this again... about a month or two late... Changed my config so I wasn't running pine as root, so my email changed, and apparently majordomo started ignoring me (justifibly so). It should have been ignoring me for mailing as root, too. -scott ---------- Forwarded message ---------- Date: Sat, 5 May 2001 18:15:35 -0700 (PDT) From: Scott Walters To: phoenix-pm-list@happyfunball.pm.org Subject: Code as per Doug's request: parsing nested structures Perl Mungers, Last meeting, I whiped out a bit of code in response to a comment by Doug, who asked me to post the code. (Doug had nested, balanced strings qouting other strings.) Please keep in mind that this code was never ment to be seen by anyone else ;) The output from it is visible at: http://weehours.net/map.cgi The code in it's entirety is at the end... the relavent bit is: # we reconstruct this array from data stored in a file: @flags=(); # the indexes are initialized to 0, and the names of the indexes are # stored in the @dice array. we use softreferences to increment the # variables of the same names. $depth=-1; $x=0; $y=0; $z=0; @dice=qw(y x foo); # the \G in a regex matches were you left off last time and works in # conjunction with the /g flat on the end. we loop on this, taking off # a single "bite" each time, which will be one of: ({ number }) # we ignore commas that may be on the end. # depending on which of those three things we found, we work with a # "higher" index, push a number onto the end of the array, or work with # a "lower" index and increment that index and 0 the indexes below it. # note that all numbers are pushed on to a hardcoded depth.. the push() # call would have to be changed to allow a variable depth (construct an # index from the $depth variable). while($flags =~ m/\G(?:(\Q({\E)|([0-9]+)|(\Q})\E)),?/go) { if($1 eq '({') { $depth++; } elsif(length($2)) { push(@{$flags[$x]->[$y]}, $2); } elsif($3 eq '})') { $depth--; ${$dice[$depth]}++; # this limits the array to essentially 3D... this next line SHOULD be # something more like...: # for(my $i=$depth+1;$i) { my $line=$_; (my $key, my $value) = $line =~ m/([a-z_]+) (.*)/; $lines{$key} = $value; } close MAP; $flags = $lines{'flags'}; @flags=(); $depth=-1; $x=0; $y=0; $z=0; @dice=qw(y x foo); while($flags =~ m/\G(?:(\Q({\E)|([0-9]+)|(\Q})\E)),?/go) { if($1 eq '({') { $depth++; } elsif(length($2)) { push(@{$flags[$x]->[$y]}, $2); } elsif($3 eq '})') { $depth--; ${$dice[$depth]}++; ${$dice[$depth+1]}=0; # print "x: $x y: $y\n"; } } # map exit flag bits to which pixels to set to illustrate that exit. # [x, y] offset of pixel to toggle, measured from top left of image. @exits = ( [halfwidth,0, halfwidth+1,0, halfwidth-1,0], # bit 1 - north [0,halfwidth, 0,halfwidth+1, 0,halfwidth-1], # bit 2 - west [-1,halfwidth, -1,halfwidth+1, -1,halfwidth-1], # bit 3 - east [halfwidth,-1, halfwidth+1,-1, halfwidth-1,-1], # bit 4 - south [halfwidth,halfwidth-1], # bit 5 - up [halfwidth,halfwidth+1], # bit 6 - down undef, # bit 7 - ignoring undef, # bit 8 - ignoring undef, # bit 9 - ignoring undef, # bit 10 - ignoring [0,1, 1,0, 1,1, 0,2, 2,0], # bit 11 - northwest [-1,1, -2,0, -2,1, -3,0, -1,2], # bit 12 - northeast [0,-2, 1,-1, 1,-2, 0,-3, 2,-1], # bit 13 - southwest [-1,-2, -2,-1, -2,-2, -1,-3, -3,-1], # bit 14 - southeast ); # in our modifications to the standard tiles listed in @exits, this lets us abbreviate tilewidth-x as just -x. foreach my $i (@exits) { if($i) { foreach my $j (@$i) { $j=tilewidth+$j if($j<0); } } } for($y=0;$y>$exits[$i][$j]); # then with bit corresponding to 'x' flipped } } } $glyphs[$x][$y]=[@glyph]; #if($exitsfound != $lastexitsfound) { # print STDERR "debug: using glyph:\n", join('', @{$glyph[0]}, "\n", @{$glyph[1]}, "\n", @{$glyph[2]}, "\n"); # $lastexitsfound=$exitsfound; #} } } print STDERR $exitsfound, " exits found\n"; $ydim=scalar(@flags); $xdim=scalar(@{$flags[0]}); @flags=(); # reclaim memory... open PPM, '>/tmp/map.ppm'; print PPM "P3\n#just another Perl script\n", $xdim*tilewidth, " ", $ydim*tilewidth, "\n255\n"; for($y=0;$y>$_) ? $color : '0,0,0,' } (0 .. tilewidth-1), ); print PPM "\n"; } } } close PPM; @glyphs=(); # reclaim memory... print "Content-type: image/gif\n\n" if($ENV{'SERVER_NAME'}); open GIF, '/usr/local/bin/ppmtogif /tmp/map.ppm |'; # open GIF, '/usr/local/bin/pnmscale -xscale 4 -yscale 4 /tmp/map.ppm | /usr/local/bin/ppmtogif|'; while(read(GIF,$buf, 1024)) { print $buf; } close GIF; From djmilesfamily at earthlink.net Tue Jun 5 18:32:14 2001 From: djmilesfamily at earthlink.net (Doug and Julie Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Fwd: Mundie to Speak at O'Reilly Open Source Convention Message-ID: <5.0.2.1.0.20010605163155.03c30b50@mail.earthlink.net> >Date: Tue, 5 Jun 2001 09:22:02 -0700 (PDT) >From: Denise Olliffe >To: djmilesfamily@earthlink.net >Subject: Mundie to Speak at O'Reilly Open Source Convention > >Your members may be interested in this bit of news... > >MICROSOFT SENIOR VICE-PRESIDENT CRAIG MUNDIE TO SPEAK >AT O'REILLY OPEN SOURCE CONVENTION > >Microsoft Senior Vice President Craig Mundie set off a far-reaching >debate recently when he introduced Microsoft's Shared Source program, >which blends access to source code with the preservation of strong >intellectual property rights by software developers, and contrasted >Shared Source to Open Source and the GNU Public License. > >There's been a strong response from the open source and free software >communities, accusing Microsoft of trying to co-opt the momentum of >open source with a program that offers superficial similarities, but >few of the real benefits. Microsoft counters that they are trying to >find a balance between the needs of commercial developers and the >lessons learned from the open source movement. > >"We think that this is a debate worth having," says Tim O'Reilly. >"Chicago law professor Cass Sunstein's book 'Republic.com' makes the >case that when people talk only to those who already agree with them, >their views become more extreme, but when they engage with those of >opposite views, both sides move towards the middle. The best way for >the open source community to change Microsoft's business practices is >to engage them in serious conversation, not just criticize them from a >distance." > >At the O'Reilly Open Source Convention on July 26th, Craig Mundie will >discuss ways in which Shared Source differs from Open Source, and why >Microsoft believes that the Shared Source Philosophy supports a strong >software business case for commercial software developers and their >customers. > >Red Hat CTO Michael Tiemann will then make the case for open source. >His speech will be followed by a panel discussion with Tiemann, Mundie, >and other experts on intellectual property and the software industry. >The panel will be moderated by Tim O'Reilly. > > >About the O'Reilly Open Source Convention: >The 3rd annual O'Reilly Open Source Convention will be held July 23-27, >2001, at the Waterfront Sheraton Hotel and Marina in San Diego, >California. This year's expanded convention includes over 250 sessions >in 14 tracks on key open source technologies such as Perl, Apache, XML, >Python, PHP, MySQL, Linux, and many more. The convention will attract >over 2000 hardcore system administrators, programmers, and Web >developers, who join the leaders of the critical open source >technologies to learn how to understand, code, and manage these >powerful tools. Held in conjunction with the Open Source Convention, >the O'Reilly Summit on Open Source Strategies, organized by O'Reilly >Research, brings together technology leaders from open source companies >along with executives (CTOs, CIOs, CEOs) from leading companies that >use open source software for strategic advantage. For more information >see: http://conferences.oreilly.com/oscon/ > >For more details on Craig Mundie's speech, please see: >http://conferences.oreillynet.com/cs/os2001/view/e_sess/1834 > >O'Reilly Open Source Convention and Perl Conference 5 Early Bird >Registration through June 22, 2001: >http://conferences.oreillynet.com/cs/os2001/pub/10/register.html > >To obtain your press pass for the O'Reilly Open Source Convention >and Perl Conference 5, see: >http://conferences.oreillynet.com/cs/os2001/create/e_press > > ># # # > >O'Reilly is a registered trademark of O'Reilly & Associates, Inc. All >other trademarks are property of their respective owners. From Bryan.Lane at VITALPS.COM Tue Jun 5 18:39:57 2001 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Fwd: Mundie to Speak at O'Reilly Open Source Conv ention Message-ID: <219B26AF200FD411A11200805FE6EF2503B3F32B@tef00021.vitalps.com> Is this Craig guy serious? He thinks he can somehow merge the two communities? Has he read any of the open source discussion boards lately? > -----Original Message----- > From: Doug and Julie Miles [SMTP:djmilesfamily@earthlink.net] > Sent: Tuesday, June 05, 2001 4:32 PM > To: phoenix-pm-list@happyfunball.pm.org > Subject: Phoenix.pm: Fwd: Mundie to Speak at O'Reilly Open Source > Convention > > > >Date: Tue, 5 Jun 2001 09:22:02 -0700 (PDT) > >From: Denise Olliffe > >To: djmilesfamily@earthlink.net > >Subject: Mundie to Speak at O'Reilly Open Source Convention > > > >Your members may be interested in this bit of news... > > > >MICROSOFT SENIOR VICE-PRESIDENT CRAIG MUNDIE TO SPEAK > >AT O'REILLY OPEN SOURCE CONVENTION > > > >Microsoft Senior Vice President Craig Mundie set off a far-reaching > >debate recently when he introduced Microsoft's Shared Source program, > >which blends access to source code with the preservation of strong > >intellectual property rights by software developers, and contrasted > >Shared Source to Open Source and the GNU Public License. > > > >There's been a strong response from the open source and free software > >communities, accusing Microsoft of trying to co-opt the momentum of > >open source with a program that offers superficial similarities, but > >few of the real benefits. Microsoft counters that they are trying to > >find a balance between the needs of commercial developers and the > >lessons learned from the open source movement. > > > >"We think that this is a debate worth having," says Tim O'Reilly. > >"Chicago law professor Cass Sunstein's book 'Republic.com' makes the > >case that when people talk only to those who already agree with them, > >their views become more extreme, but when they engage with those of > >opposite views, both sides move towards the middle. The best way for > >the open source community to change Microsoft's business practices is > >to engage them in serious conversation, not just criticize them from a > >distance." > > > >At the O'Reilly Open Source Convention on July 26th, Craig Mundie will > >discuss ways in which Shared Source differs from Open Source, and why > >Microsoft believes that the Shared Source Philosophy supports a strong > >software business case for commercial software developers and their > >customers. > > > >Red Hat CTO Michael Tiemann will then make the case for open source. > >His speech will be followed by a panel discussion with Tiemann, Mundie, > >and other experts on intellectual property and the software industry. > >The panel will be moderated by Tim O'Reilly. > > > > > >About the O'Reilly Open Source Convention: > >The 3rd annual O'Reilly Open Source Convention will be held July 23-27, > >2001, at the Waterfront Sheraton Hotel and Marina in San Diego, > >California. This year's expanded convention includes over 250 sessions > >in 14 tracks on key open source technologies such as Perl, Apache, XML, > >Python, PHP, MySQL, Linux, and many more. The convention will attract > >over 2000 hardcore system administrators, programmers, and Web > >developers, who join the leaders of the critical open source > >technologies to learn how to understand, code, and manage these > >powerful tools. Held in conjunction with the Open Source Convention, > >the O'Reilly Summit on Open Source Strategies, organized by O'Reilly > >Research, brings together technology leaders from open source companies > >along with executives (CTOs, CIOs, CEOs) from leading companies that > >use open source software for strategic advantage. For more information > >see: http://conferences.oreilly.com/oscon/ > > > >For more details on Craig Mundie's speech, please see: > >http://conferences.oreillynet.com/cs/os2001/view/e_sess/1834 > > > >O'Reilly Open Source Convention and Perl Conference 5 Early Bird > >Registration through June 22, 2001: > >http://conferences.oreillynet.com/cs/os2001/pub/10/register.html > > > >To obtain your press pass for the O'Reilly Open Source Convention > >and Perl Conference 5, see: > >http://conferences.oreillynet.com/cs/os2001/create/e_press > > > > > ># # # > > > >O'Reilly is a registered trademark of O'Reilly & Associates, Inc. All > >other trademarks are property of their respective owners. > From doug.miles at bpxinternet.com Wed Jun 6 12:56:24 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday References: <3B1BD55E.30CE18F4@bpxinternet.com> <3B1D3B4F.68591677@bpxinternet.com> <3B1D42AA.CCCC74C2@us.dhl.com> Message-ID: <3B1E6EC8.C1EF667C@bpxinternet.com> I appologize to the new people. :) The Willow House is a little Coffee House close to Bowne. Bowne is on McDowell and Central, and The Willow House is on 3rd Ave and McDowell: within easy walking distance. Jo Brooks wrote: > > so what and where is Willow House? > > jo > > Doug Miles wrote: > > > > Doug Miles wrote: > > > > > > Does anyone have anything they'd like to present on Thursday? Let me > > > know. Eden might have a short presentation on VIM sometime. Eden? > > > > Ahhhh! The silence is deafening! :) Well, how about a social meeting at > > the Willow House? Anyone up for that? From doug.miles at bpxinternet.com Wed Jun 6 12:58:48 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday References: Message-ID: <3B1E6F58.FC762130@bpxinternet.com> He's alive! He's alive mwahahaha! :) Scott Walters wrote: > > Testing.. can I speak again? > > -scott > > On Mon, 4 Jun 2001, Doug Miles wrote: > > > Does anyone have anything they'd like to present on Thursday? Let me > > know. Eden might have a short presentation on VIM sometime. Eden? > > From doug.miles at bpxinternet.com Wed Jun 6 13:00:07 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Fwd:Code as per Doug's request: parsing nested structures (fwd) References: Message-ID: <3B1E6FA7.A4C62195@bpxinternet.com> Thanks. I'll have a look at this... Scott Walters wrote: > > Sending this again... about a month or two late... > Changed my config so I wasn't running pine as root, > so my email changed, and apparently majordomo started > ignoring me (justifibly so). It should have been > ignoring me for mailing as root, too. > > -scott > > ---------- Forwarded message ---------- > Date: Sat, 5 May 2001 18:15:35 -0700 (PDT) > From: Scott Walters > To: phoenix-pm-list@happyfunball.pm.org > Subject: Code as per Doug's request: parsing nested structures > > Perl Mungers, > > Last meeting, I whiped out a bit of code in response to a comment > by Doug, who asked me to post the code. (Doug had nested, balanced > strings qouting other strings.) > Please keep in mind that this code was never ment to be seen by > anyone else ;) > The output from it is visible at: http://weehours.net/map.cgi > The code in it's entirety is at the end... the relavent bit is: > > # we reconstruct this array from data stored in a file: > @flags=(); > > # the indexes are initialized to 0, and the names of the indexes are > # stored in the @dice array. we use softreferences to increment the > # variables of the same names. > $depth=-1; $x=0; $y=0; $z=0; > @dice=qw(y x foo); > # the \G in a regex matches were you left off last time and works in > # conjunction with the /g flat on the end. we loop on this, taking off > # a single "bite" each time, which will be one of: ({ number }) > # we ignore commas that may be on the end. > # depending on which of those three things we found, we work with a > # "higher" index, push a number onto the end of the array, or work with > # a "lower" index and increment that index and 0 the indexes below it. > # note that all numbers are pushed on to a hardcoded depth.. the push() > # call would have to be changed to allow a variable depth (construct an > # index from the $depth variable). > while($flags =~ m/\G(?:(\Q({\E)|([0-9]+)|(\Q})\E)),?/go) { > if($1 eq '({') { > $depth++; > } elsif(length($2)) { > push(@{$flags[$x]->[$y]}, $2); > } elsif($3 eq '})') { > $depth--; > ${$dice[$depth]}++; > # this limits the array to essentially 3D... this next line SHOULD be > # something more like...: > # for(my $i=$depth+1;$i # as mentioned, this is kinda a kludge. anyway, this resets "lesser" > # indexes after incrementing a "higher" index, like when you go from > # Perl 5.000503 to Perl 5.6.0, the 3 turns into a 0, as an example. > ${$dice[$depth+1]}=0; > # print "x: $x y: $y\n"; > } > } > > Sample data: (Actually, the dataset is kinda largish and getting bigger): > (This was generated by another program, not a format I created): > flags ({({({0,0,0,0,365,382,65,0,0,}),({0,0,382,83,86,0,0,0,0,}),({0,0,0,0,382,35,3263,0,0,}),}),}) > > If this makes sence to anyone, and they want me to fix the caveats, I'll do > so, but not unless someone actually will benefit from me doing so ;) > The comments in the real program aren't very good either. Essentially, > this program is a test tool... I'm converting a graph-based "map" into > a 3d array, and wanted to see the output of that conversion to verify > correct operation of the conversion tool. > > -scott > > #!/usr/bin/perl > > # we looks at the exit bits in a map.o file (from WeeHours map server daemon) and > # render an image that represents the exits > > require 5.6.0; > > open MAP, '/home/ah/map.o'; > > sub tilewidth () { 9 } > sub halfwidth () { int tilewidth/2 } > > while() { > my $line=$_; > (my $key, my $value) = $line =~ m/([a-z_]+) (.*)/; > $lines{$key} = $value; > } > close MAP; > > $flags = $lines{'flags'}; > > @flags=(); > $depth=-1; $x=0; $y=0; $z=0; > @dice=qw(y x foo); > while($flags =~ m/\G(?:(\Q({\E)|([0-9]+)|(\Q})\E)),?/go) { > if($1 eq '({') { > $depth++; > } elsif(length($2)) { > push(@{$flags[$x]->[$y]}, $2); > } elsif($3 eq '})') { > $depth--; > ${$dice[$depth]}++; > ${$dice[$depth+1]}=0; > # print "x: $x y: $y\n"; > } > } > > # map exit flag bits to which pixels to set to illustrate that exit. > # [x, y] offset of pixel to toggle, measured from top left of image. > @exits = ( > [halfwidth,0, halfwidth+1,0, halfwidth-1,0], # bit 1 - north > [0,halfwidth, 0,halfwidth+1, 0,halfwidth-1], # bit 2 - west > [-1,halfwidth, -1,halfwidth+1, -1,halfwidth-1], # bit 3 - east > [halfwidth,-1, halfwidth+1,-1, halfwidth-1,-1], # bit 4 - south > [halfwidth,halfwidth-1], # bit 5 - up > [halfwidth,halfwidth+1], # bit 6 - down > undef, # bit 7 - ignoring > undef, # bit 8 - ignoring > undef, # bit 9 - ignoring > undef, # bit 10 - ignoring > [0,1, 1,0, 1,1, 0,2, 2,0], # bit 11 - northwest > [-1,1, -2,0, -2,1, -3,0, -1,2], # bit 12 - northeast > [0,-2, 1,-1, 1,-2, 0,-3, 2,-1], # bit 13 - southwest > [-1,-2, -2,-1, -2,-2, -1,-3, -3,-1], # bit 14 - southeast > ); > > # in our modifications to the standard tiles listed in @exits, this lets us abbreviate tilewidth-x as just -x. > foreach my $i (@exits) { > if($i) { > foreach my $j (@$i) { > $j=tilewidth+$j if($j<0); > } > } > } > > for($y=0;$y for($x=0;$x @glyph = (0b0011111110, > 0b0110000011, > 0b0100000001, > 0b0100000001, > 0b0100000001, > 0b0100000001, > 0b0100000001, > 0b0110000011, > 0b0011111110, > ); > $flag = $flags[$y][$x][1]; # [1] is the Z value -- this is the "main floor". shouldnt be hardcode, though. > for($i=0;$i if($flag & 1<<$i) { > $exitsfound++; > print STDERR "debug: at $x $y found exit bit position $i\n"; > for($j=0;$j # each set of points specified for this exit in @exits' entry for this flag... > # *t = \$glyph[$exits[$i][$j+1]][$exits[$i][$j]]; $t=$t?0:1; > *t = \$glyph[$exits[$i][$j+1]]; # reference to part of glyph indexed by 'y' > $t = $t ^ ((1<<(tilewidth-1))>>$exits[$i][$j]); # then with bit corresponding to 'x' flipped > } > } > } > $glyphs[$x][$y]=[@glyph]; > #if($exitsfound != $lastexitsfound) { > # print STDERR "debug: using glyph:\n", join('', @{$glyph[0]}, "\n", @{$glyph[1]}, "\n", @{$glyph[2]}, "\n"); > # $lastexitsfound=$exitsfound; > #} > } > } > print STDERR $exitsfound, " exits found\n"; > > $ydim=scalar(@flags); $xdim=scalar(@{$flags[0]}); > @flags=(); # reclaim memory... > > open PPM, '>/tmp/map.ppm'; > print PPM "P3\n#just another Perl script\n", $xdim*tilewidth, " ", $ydim*tilewidth, "\n255\n"; > for($y=0;$y for($i=0;$i for($x=0;$x $color = ($x == $xdim/2 && $y == $ydim/2) ? '254,10,10,' : '255,255,255,'; > > # print PPM "# $x $y $i\n"; > print PPM ( > map { $glyphs[$x][$y][$i] & ((1<<(tilewidth-1))>>$_) ? $color : '0,0,0,' } (0 .. tilewidth-1), > ); > print PPM "\n"; > } > } > } > close PPM; > > @glyphs=(); # reclaim memory... > > print "Content-type: image/gif\n\n" if($ENV{'SERVER_NAME'}); > > open GIF, '/usr/local/bin/ppmtogif /tmp/map.ppm |'; > # open GIF, '/usr/local/bin/pnmscale -xscale 4 -yscale 4 /tmp/map.ppm | /usr/local/bin/ppmtogif|'; > while(read(GIF,$buf, 1024)) { > print $buf; > } > close GIF; From doug.miles at bpxinternet.com Wed Jun 6 13:01:21 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Fwd: Mundie to Speak at O'Reilly Open Source Convention References: <219B26AF200FD411A11200805FE6EF2503B3F32B@tef00021.vitalps.com> Message-ID: <3B1E6FF1.F3C63D5F@bpxinternet.com> JAMSF (Just Another Microsoft FUDer) :) Bryan Lane wrote: > > Is this Craig guy serious? He thinks he can somehow merge the two > communities? Has he read any of the open source discussion boards lately? > > > -----Original Message----- > > From: Doug and Julie Miles [SMTP:djmilesfamily@earthlink.net] > > Sent: Tuesday, June 05, 2001 4:32 PM > > To: phoenix-pm-list@happyfunball.pm.org > > Subject: Phoenix.pm: Fwd: Mundie to Speak at O'Reilly Open Source > > Convention > > > > > > >Date: Tue, 5 Jun 2001 09:22:02 -0700 (PDT) > > >From: Denise Olliffe > > >To: djmilesfamily@earthlink.net > > >Subject: Mundie to Speak at O'Reilly Open Source Convention > > > > > >Your members may be interested in this bit of news... > > > > > >MICROSOFT SENIOR VICE-PRESIDENT CRAIG MUNDIE TO SPEAK > > >AT O'REILLY OPEN SOURCE CONVENTION > > > > > >Microsoft Senior Vice President Craig Mundie set off a far-reaching > > >debate recently when he introduced Microsoft's Shared Source program, > > >which blends access to source code with the preservation of strong > > >intellectual property rights by software developers, and contrasted > > >Shared Source to Open Source and the GNU Public License. > > > > > >There's been a strong response from the open source and free software > > >communities, accusing Microsoft of trying to co-opt the momentum of > > >open source with a program that offers superficial similarities, but > > >few of the real benefits. Microsoft counters that they are trying to > > >find a balance between the needs of commercial developers and the > > >lessons learned from the open source movement. > > > > > >"We think that this is a debate worth having," says Tim O'Reilly. > > >"Chicago law professor Cass Sunstein's book 'Republic.com' makes the > > >case that when people talk only to those who already agree with them, > > >their views become more extreme, but when they engage with those of > > >opposite views, both sides move towards the middle. The best way for > > >the open source community to change Microsoft's business practices is > > >to engage them in serious conversation, not just criticize them from a > > >distance." > > > > > >At the O'Reilly Open Source Convention on July 26th, Craig Mundie will > > >discuss ways in which Shared Source differs from Open Source, and why > > >Microsoft believes that the Shared Source Philosophy supports a strong > > >software business case for commercial software developers and their > > >customers. > > > > > >Red Hat CTO Michael Tiemann will then make the case for open source. > > >His speech will be followed by a panel discussion with Tiemann, Mundie, > > >and other experts on intellectual property and the software industry. > > >The panel will be moderated by Tim O'Reilly. > > > > > > > > >About the O'Reilly Open Source Convention: > > >The 3rd annual O'Reilly Open Source Convention will be held July 23-27, > > >2001, at the Waterfront Sheraton Hotel and Marina in San Diego, > > >California. This year's expanded convention includes over 250 sessions > > >in 14 tracks on key open source technologies such as Perl, Apache, XML, > > >Python, PHP, MySQL, Linux, and many more. The convention will attract > > >over 2000 hardcore system administrators, programmers, and Web > > >developers, who join the leaders of the critical open source > > >technologies to learn how to understand, code, and manage these > > >powerful tools. Held in conjunction with the Open Source Convention, > > >the O'Reilly Summit on Open Source Strategies, organized by O'Reilly > > >Research, brings together technology leaders from open source companies > > >along with executives (CTOs, CIOs, CEOs) from leading companies that > > >use open source software for strategic advantage. For more information > > >see: http://conferences.oreilly.com/oscon/ > > > > > >For more details on Craig Mundie's speech, please see: > > >http://conferences.oreillynet.com/cs/os2001/view/e_sess/1834 > > > > > >O'Reilly Open Source Convention and Perl Conference 5 Early Bird > > >Registration through June 22, 2001: > > >http://conferences.oreillynet.com/cs/os2001/pub/10/register.html > > > > > >To obtain your press pass for the O'Reilly Open Source Convention > > >and Perl Conference 5, see: > > >http://conferences.oreillynet.com/cs/os2001/create/e_press > > > > > > > > ># # # > > > > > >O'Reilly is a registered trademark of O'Reilly & Associates, Inc. All > > >other trademarks are property of their respective owners. > > From phaedrus at illogics.org Wed Jun 6 13:53:23 2001 From: phaedrus at illogics.org (Scott Walters) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday In-Reply-To: <3B1E6EC8.C1EF667C@bpxinternet.com> Message-ID: To answer Doug's previous question, Willow House social is fine. I expect to make it. I could bring a bit of code that couldn't possibly be of interest to anyone except Kurt... I have a local mail delivery agent (for Unix) written in Perl that delivers Internet mail to LPMud mail boxes. I won't waste the paper unless I get atleast one more interested party, though ;) -scott From doug.miles at bpxinternet.com Wed Jun 6 13:35:30 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Meeting 06/07/2001 Message-ID: <3B1E77F2.2BBF2E3C@bpxinternet.com> We'll be having a Phoenix.pm meeting Thursday June 7th at 7:00PM. It will be held at The Willow House, which is located at 149 W. McDowell Rd., which is just West of Bowne on McDowell. This is a social meeting, so just show up, hang out, and have fun. The Willow House has coffee, and sandwiches, so bring some money if you are hungry. If you want more information, visit http://www.willowhouse.com/. See you there! -- For a list of the ways which technology has failed to improve our quality of life, press 3. From lajandy at yahoo.com Thu Jun 7 17:18:21 2001 From: lajandy at yahoo.com (Andrew Johnson) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Meeting 06/07/2001 In-Reply-To: <3B1E77F2.2BBF2E3C@bpxinternet.com> Message-ID: <20010607221821.18791.qmail@web10101.mail.yahoo.com> Alas, work has intervened again to prevent from having a life outside of it. Have a good time without me! --- Doug Miles wrote: > We'll be having a Phoenix.pm meeting Thursday June 7th at 7:00PM. ===== __________________________________________________ Do You Yahoo!? Get personalized email addresses from Yahoo! Mail - only $35 a year! http://personal.mail.yahoo.com/ From Eden.Li at asu.edu Fri Jun 8 03:28:40 2001 From: Eden.Li at asu.edu (Eden.Li@asu.edu) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Presentation for Thursday In-Reply-To: <3B1BD55E.30CE18F4@bpxinternet.com> References: <3B1BD55E.30CE18F4@bpxinternet.com> Message-ID: <991988920.3b208cb83d171@webmail1.asu.edu> Maybe sometime in August or September, after I get back from my trip on July 31st. Eden Quoting Doug Miles : > Does anyone have anything they'd like to present on Thursday? Let me > know. Eden might have a short presentation on VIM sometime. Eden? From doug.miles at bpxinternet.com Wed Jun 20 11:04:21 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Meeting 06/21/2001] Message-ID: <3B30C985.BDCECE75@bpxinternet.com> We'll be having a Phoenix.pm meeting Thursday, May 3rd at 7:00PM. It will be held at Bowne, which is located at 1500 N. Central Avenue, which is on the Southwest corner of Central and McDowell. The parking lot is gated, so just press the button on the intercom, and tell the receptionist that you are there for the Perl meeting. Park in the lot that is straight ahead from the entrance on the South side of McDowell. Park in any uncovered, non-reserved space. Proceed to the main lobby, which is on the Northeast side of the parking lot. I'll be talking about what will (might) be comming in Perl 6. P.S. I'll be on vacation the first week of July, so there won't be a meeting then, unless someone else wants to put something together (Willow House?). -- - Doug Don't anthropomorphize computers. They hate that. From doug.miles at bpxinternet.com Wed Jun 20 11:06:39 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Meeting 06/21/2001 Message-ID: <3B30CA0F.A2420C15@bpxinternet.com> Sorry. I bumped the send button. This message has the correct date. We'll be having a Phoenix.pm meeting Thursday, June 21st at 7:00PM. It will be held at Bowne, which is located at 1500 N. Central Avenue, which is on the Southwest corner of Central and McDowell. The parking lot is gated, so just press the button on the intercom, and tell the receptionist that you are there for the Perl meeting. Park in the lot that is straight ahead from the entrance on the South side of McDowell. Park in any uncovered, non-reserved space. Proceed to the main lobby, which is on the Northeast side of the parking lot. I'll be talking about what will (might) be coming in Perl 6. P.S. I'll be on vacation the first week of July, so there won't be a meeting then, unless someone else wants to put something together (Willow House?). -- - Doug Don't anthropomorphize computers. They hate that. From doug.miles at bpxinternet.com Fri Jun 22 15:00:29 2001 From: doug.miles at bpxinternet.com (Doug Miles) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Perl 6 resources Message-ID: <3B33A3DD.DA9C890@bpxinternet.com> For those of you who couldn't make it last night, here is Damian Conway's presentation and some other links: Presenation: http://www.crystalflame.net/keynote.mp3 Slides: http://www.yetanother.org/damian/Perl6/YAPC_talk.pdf http://www.perl.org/perl6/ (Offical Perl 6 site) http://infotrope.net/opensource/software/perl6/ (Unoffical, but very useful, Perl 6 site) http://www.perl.com/pub/2000/10/23/soto2000.html (Larrys TPC4 speech) http://technetcast.com/tnc_play_stream.html?stream_id=375 (Larrys Atlanta Linux Showcase speech) http://slashdot.org/articles/00/07/20/210229.shtml (Geekdom's reaction) http://dev.perl.org/ (Perl 6 repository) http://www.perl.com/pub/2000/11/perl6rfc.html (A critique of the RFC process) http://www.perl.com/pub/2000/11/jarkko.html (A rebuttal of the above critique) http://www.etla.org/retroperl/ (Archive of former versions of Perl) http://history.perl.org/ (The Perl timeline) Enjoy! From phaedrus at illogics.org Fri Jun 22 16:26:00 2001 From: phaedrus at illogics.org (Scott Walters) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Perl 6 resources In-Reply-To: <3B33A3DD.DA9C890@bpxinternet.com> Message-ID: awww, crud. i completely forgot. sorry guys... re: the technetcast things, i happend upon those not too long ago, and since have been going through and listening to a lot of those... lots of very interesting speeches, from usenix, etc. good stuff. thanks for the links, doug. -scott On Fri, 22 Jun 2001, Doug Miles wrote: > For those of you who couldn't make it last night, here is Damian > Conway's presentation and some other links: > > Presenation: http://www.crystalflame.net/keynote.mp3 > Slides: http://www.yetanother.org/damian/Perl6/YAPC_talk.pdf > > http://www.perl.org/perl6/ > (Offical Perl 6 site) > > http://infotrope.net/opensource/software/perl6/ > (Unoffical, but very useful, Perl 6 site) > > http://www.perl.com/pub/2000/10/23/soto2000.html > (Larrys TPC4 speech) > > http://technetcast.com/tnc_play_stream.html?stream_id=375 > (Larrys Atlanta Linux Showcase speech) > > http://slashdot.org/articles/00/07/20/210229.shtml > (Geekdom's reaction) > > http://dev.perl.org/ > (Perl 6 repository) > > http://www.perl.com/pub/2000/11/perl6rfc.html > (A critique of the RFC process) > > http://www.perl.com/pub/2000/11/jarkko.html > (A rebuttal of the above critique) > > http://www.etla.org/retroperl/ > (Archive of former versions of Perl) > > http://history.perl.org/ > (The Perl timeline) > > Enjoy! > From Bryan.Lane at VITALPS.COM Fri Jun 22 15:44:23 2001 From: Bryan.Lane at VITALPS.COM (Bryan Lane) Date: Thu Aug 5 00:16:26 2004 Subject: Phoenix.pm: Perl 6 resources Message-ID: <219B26AF200FD411A11200805FE6EF2503B3F366@tef00021.vitalps.com> Very cool! I was afaid that I would miss this discussion all together! Thanks! > -----Original Message----- > From: doug.miles@bpxinternet.com [SMTP:doug.miles@bpxinternet.com] > Sent: Friday, June 22, 2001 1:00 PM > To: Phoenix.pm > Subject: Phoenix.pm: Perl 6 resources > > For those of you who couldn't make it last night, here is Damian > Conway's presentation and some other links: > > Presenation: http://www.crystalflame.net/keynote.mp3 > Slides: http://www.yetanother.org/damian/Perl6/YAPC_talk.pdf > > http://www.perl.org/perl6/ > (Offical Perl 6 site) > > http://infotrope.net/opensource/software/perl6/ > (Unoffical, but very useful, Perl 6 site) > > http://www.perl.com/pub/2000/10/23/soto2000.html > (Larrys TPC4 speech) > > http://technetcast.com/tnc_play_stream.html?stream_id=375 > (Larrys Atlanta Linux Showcase speech) > > http://slashdot.org/articles/00/07/20/210229.shtml > (Geekdom's reaction) > > http://dev.perl.org/ > (Perl 6 repository) > > http://www.perl.com/pub/2000/11/perl6rfc.html > (A critique of the RFC process) > > http://www.perl.com/pub/2000/11/jarkko.html > (A rebuttal of the above critique) > > http://www.etla.org/retroperl/ > (Archive of former versions of Perl) > > http://history.perl.org/ > (The Perl timeline) > > Enjoy!