Burning Man 2001

view the slideshow.

%# %# 20011019-01:19:11 mengwong@newbabe:~/html/mason/www.mengwong.com/photography/bm2001% egrep 'render,[ ]compname' index.html | cut -d"'" -f2 | perl -nle 'my $f = $_; $f =~ tr/\//-/; printf "cp $_-m.jpg slideshow/%03d-$f-m.jpg; cp $_-s.jpg slideshow/%03d-$f-s.jpg\n", $., $.' | sh %# 20011019-01:19:25 mengwong@newbabe:~/html/mason/www.mengwong.com/photography/bm2001% pcdindex slideshow %# pcdindex: indexing slideshow ... creating caption indexes ... chmod... wwwis... done. %# 20011019-01:19:32 mengwong@newbabe:~/html/mason/www.mengwong.com/photography/bm2001% %# %# <%init> my @rolls = map { basename $_ } sort glob ($m->current_comp->source_dir . "/roll??"); use File::Basename qw(basename); <& render, compname => 'roll13/025', size => "m" &>

my camp
<& render, compname => 'roll04/031' &> <& render, compname => 'roll04/034' &> <& render, compname => 'roll04/035' &> <& render, compname => 'roll13/001' &> <& render, compname => 'roll13/005' &> <& render, compname => 'roll13/003' &> <& render, compname => 'roll13/009' &> <& render, compname => 'roll01/019' &>


people
<& render, compname => 'roll01/032' &> <& render, compname => 'roll02/027' &> <& render, compname => 'roll01/003' &> <& render, compname => 'roll01/002' &> <& render, compname => 'roll01/001' &> <& render, compname => 'roll09/034' &> <& render, compname => 'roll05/007' &>
<& render, compname => 'roll08/013' &> <& render, compname => 'roll08/004' &> <& render, compname => 'roll08/015' &> <& render, compname => 'roll21/024' &> <& render, compname => 'roll21/026' &> <& render, compname => 'roll21/030' &> <& render, compname => 'roll21/036' &>


center camp
<& render, compname => 'roll14/021' &> <& render, compname => 'roll14/014' &> <& render, compname => 'roll14/015' &> <& render, compname => 'roll14/008' &>


art
<& render, compname => 'roll03/022' &> <& render, compname => 'roll03/027' &> <& render, compname => 'roll03/025' &> <& render, compname => 'roll08/003' &> <& render, compname => 'roll02/008' &> <& render, compname => 'roll01/012' &> <& render, compname => 'roll06/004' &> <& render, compname => 'roll02/011' &> <& render, compname => 'roll03/010' &> <& render, compname => 'roll09/028' &>


art cars
<& render, compname => 'roll03/008' &> <& render, compname => 'roll03/009' &> <& render, compname => 'roll03/035' &> <& render, compname => 'roll15/023' &> <& render, compname => 'roll03/024' &> <& render, compname => 'roll03/037' &>


place
<& render, compname => 'roll06/028' &> <& render, compname => 'roll02/033' &> <& render, compname => 'roll06/012' &> <& render, compname => 'roll06/023' &> <& render, compname => 'roll01/029' &> <& render, compname => 'roll01/027' &> <& render, compname => 'roll15/013' &> <& render, compname => 'roll09/037' &>


the temple of tears
<& render, compname => 'roll09/003' &> <& render, compname => 'roll09/024' &> <& render, compname => 'roll09/033' &> <& render, compname => 'roll09/022' &> <& render, compname => 'roll09/021' &> <& render, compname => 'roll09/005' &> <& render, compname => 'roll09/010' &> <& render, compname => 'roll09/012' &> <& render, compname => 'roll09/014' &> <& render, compname => 'roll09/020' &> <& render, compname => 'roll09/013' &>


the man
<& render, compname => 'roll01/007' &> <& render, compname => 'roll10/009' &> <& render, compname => 'roll10/037' &> <& render, compname => 'roll11/027' &>


the burn
<& render, compname => 'roll04/006' &> <& render, compname => 'roll11/014' &> <& render, compname => 'roll11/013' &> <& render, compname => 'roll11/010' &> <& render, compname => 'roll11/011' &> <& render, compname => 'roll11/009' &> <& render, compname => 'roll11/007' &> <& render, compname => 'roll11/006' &> <& render, compname => 'roll11/005' &> <& render, compname => 'roll11/004' &> <& render, compname => 'roll11/003' &> <& render, compname => 'roll07/004' &> <& render, compname => 'roll07/007' &> <& render, compname => 'roll07/008' &> <& render, compname => 'roll07/027' &> <& render, compname => 'roll07/029' &> <& render, compname => 'roll07/034' &> <& render, compname => 'roll07/033' &> <& render, compname => 'roll04/002' &> <& render, compname => 'roll04/005' &> <& render, compname => 'roll04/008' &> <& render, compname => 'roll04/014' &> <& render, compname => 'roll04/016' &> <& render, compname => 'roll04/020' &>


vignettes
<& render, compname => 'roll04/025' &> <& render, compname => 'roll04/023' &> <& render, compname => 'roll06/033' &> <& render, compname => 'roll14/029' &> <& render, compname => 'roll14/031' &> <& render, compname => 'roll14/006' &>


<& render, compname => 'roll14/035', size => "m" &>

I must go again next year.


Thumbnails for each roll: % foreach my $roll (@rolls) { <%$roll%> % }

Do you dare view all thumbnails on a single page?