added perl.snippets