Last updated: 12 March 2008
I created an Adobe Illustrator template for creating comps that work with Olav Bjorkoy's Blueprint CSS Framework.
The Illustrator template is simply a document with guides based on the 24 units provided by Blueprint. A layer is provided to show unit numbers if you like, and 2 layers showing the grid dividing into thirds and quarters (thanks to Phil for that). Additionally there is a page wireframe included to demonstrate the template's use. Enjoy!
See also the Photoshop Template for Blueprint
Last updated: 12 March 2008
I created an Adobe Photoshop template for creating comps that work with Olav Bjorkoy's Blueprint CSS Framework.
The Photoshop template is simply a document with vertical guides based on the 24 units provided by Blueprint. A layer is provided to show unit numbers if you like, and 2 layers showing the grid dividing into thirds and quarters (thanks to Phil for that). Additionally there is a page wireframe included to demonstrate the template's use. Enjoy!
See also the Illustrator Template for Blueprint

This is a series of place holder or greeking text for use in OmniGraffle. I use this stencil to drag blocks of text in to design documents using my web design template and wireframe palette.
Installing the palette
1) Download the file GreekingAngeles.gstencil.zip
2) Move it to your ~/Library/Application Support/OmniGraffle/Stencils directory. The ~ represents your user "home" folder. Palettes installed here will be visible only to you.
You're done.
You can purchase Omnigraffle Professional 4.0 from Amazon. I highly recommend the Pro version over the standard -- the Pro version allows you to create documents using slide masters.
This document has been updated for OmniGraffle Pro version 5, and is now maintained at Konigi. For more information and to download the new template, please go to Konigi.

Code to loop through query string and get name/value pairs.
[- @pairs = split(/\&/, $ENV{'QUERY_STRING'}); -]
<ul>
[$ foreach $pair (@pairs) $]
[-
($name, $value) = split(/=/, $pair); # Split into name and value.
$$name = $value; # Assign value to scalar matching name.
$$name =~ s/%(..)/chr(hex($1))/ge; # Decode encoded stuff.
$$name =~ s/\+/ /g; # substitute +'s for spaces.
-]
<li>name = [+ $name; +]; value = [+ $value +]</li>
[$ endforeach $]
</ul>2 ways to get values out of a hash using loops.
Make the hash
[- %customers = ( "AT&T Corp","1.2.11.1", "BellSouth Corp","1.2.16.1", "British Telecommunications","1.2.19.1", "BroadWing Inc","1.2.155", "China Unicom","1.2.3" ) -]
Output using "foreach"
-
[$ foreach $name (sort keys %customers) $]
- [+ $name +] [$ endforeach $]
Output using "do"
[- $total = scalar(keys %customers); -] [- $i = 0 -]
-
[$ do $]
[- @k = keys %customers; @v = values %customers; -]
- [+ $k[$i] +] [- $i++ -] [$ until $i == $total $]
Code to alternate background colors in table rows.
<style type="text/css">
.odd {
background: #ddd;
}
</style>
<table>
[* foreach $num (1 .. 10){ *]
[$ if ($num % 2) $]
<tr><td class="odd">[+ $num +] is odd</td></tr>
[$ else $]
<tr><td class="even">[+ $num +] is even</td></tr>
[$ endif $]
[* } *][# endforeach #]
</table>Code to list files in a directory.
[-
$dir = opendir(DIR, '[YOUR DIRECTORY PATH HERE]');
@tmplist = readdir(DIR);
@list = grep (!/^\./, @tmplist);
-]
<ul>
[$ foreach $file (sort @list) $]
<li><a href="/drupal-4-7-2/[+ $file +]">[+ $file +]</a></li>
[$ endforeach $]
</ul>Code to redirect a page to another URL.
[-
# mod_perl redirect
use Apache;
use Apache::Constants qw(REDIRECT);
# url goes here
$req_rec->header_out("Location" => "[PUT YOUR URL HERE]");
$req_rec->status(REDIRECT);
-]Simple subroutine for checking browser using HTML::Embperl. The version below detects if a modern browser is being used and assigns the $browser variable a value of "DOM" or "CRAP".
[# browser detection for search modules #]
[$ sub browserDetection $]
[-
$browser = $ENV{HTTP_USER_AGENT};
if ($browser =~ /MSIE/) { $browser_vers = 'IE' };
if ($browser =~ /Gecko/) { $browser_vers = 'GECKO' };
if (($browser_vers eq 'IE') ||
($browser_vers eq 'GECKO')) {
$browser = 'DOM';
} else {
$browser = 'CRAP';
}
-]
[$ endsub $]