Help for this page

Select Code to Download


  1. or download this
    (defun perl-boilerplate () "Basic perl template." (interactive)
      (if (or (not (file-exists-p (buffer-file-name (current-buffer))))
    ...
                (insert
                 (concat "#!/usr/bin/perl\n" strictures)))))))
    (add-hook 'cperl-mode-hook 'perl-boilerplate)
    
  2. or download this
    package My;
    
    ...
    
    
    __PACKAGE__
    
  3. or download this
    #!/usr/bin/perl
    use warnings;
    use strict;
    
    #use Data::Dumper;