A rough account of what I did with Emacs recently.
${PERL} -i -p -e 'BEGIN{$/ = undef; $list = ""; opendir( CDDBDIR,"$ENV{\"HOME\"}/.cddb" ); @files = grep !/^\.\.?$/, readdir( CDDBDIR ); close( CDDBDIR ); for my $f ( @files ) { open( CDDBFILE, "<$ENV{\"HOME\"}/.cddb/$f" ); while( $x = <CDDBFILE> ) { if ( $x =~ m/.*DTITLE=(.*?)\n.*/ ) { push @titles, "$1"; last; }}}} $list = join( "<br/>\n", sort @titles ) . "<br/><br/>\n" . ($#titles + 1) . " CDs in the jukebox.<br/>\n"; s|(<!-- start list -->).*(<!-- end list -->)|$1${list}$2|s;' ~/public_html/music/index.html
Yes, I know, the last in there is unnecessary, or I
should undef $/ after I've built the list.
![]() the sound processor |
![]() the DVD player |
Vector vrEntityType = new Vector(); // Java blows goats, AGAIN.Tooled around with the GPS maptoy some more. The MapQuest maps don't line up either, although they do come close enough to be infuriating. I'm thinking of modifying my alignment function to make a stab at alignment, then do a comparison on the overlapped regions to see how good a fit it is.
TextField txDocumentRef = new TextField( 16 ); // MAGIC (see database)
while ( m.isVisible()) { // GROSS.
// NB this will throw back to the caller if it borks.
// XXX FATAL?
// Trying to do this right, so it doesn't need a parent window. Who
// at JavaSoft comes up with this crap?
filename = filename + "0"; // zero padding. I miss sprintf.
// LA LA LA SING ALONG WITH ME
// These should really be (a) in a separate class (b) provided by
// Java (c) faster
// This is kinda disgusting
// XXX MORE SILLYWALKING
| - | Nokia CardPhone 2.0 | _ | [] | X |
|
Some vital files are damaged. Please reinstall the software. [OK] |
||||
previous month | current month| next month