Shelfguides is a project mainly written in Perl, it's free.
perl generates postscript shelf guides
Perl scripts generate postscript to print 3x5" call number and journal guides, 3 per 8x11.5" page.