#!/bin/sh
etags -l perl -r '/[ \t]*package[ \t]*\([A-Z:a-z]+\)/\1/' `find . -name '*.pm' -or -name '*.pl'`
