Update perl.snippets