Since you mention it, here's a snippet from my .emacs file.

(add-hook 'cperl-mode-hook
      '(lambda ()
          (define-skeleton perl-start
           "skeleton for a perl program"
           ""
           
           "#!/usr/local/bin/perl\nuse strict;\nuse warnings;"
           )
         
         (local-set-key [(control c) ($)]
                'perl-start)
))
[download]