Created
August 20, 2009 02:54
-
-
Save yaotti/170784 to your computer and use it in GitHub Desktop.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;;; perlのskelton用設定 | |
;; templateを利用する | |
;; cf. http://www.bookshelf.jp/soft/meadow_37.html | |
;; 利用するかどうかは言語ごとに設定 | |
(require 'autoinsert) | |
(setq auto-insert-directory "~/.emacs.d/skelton/") ;; ~/.emacs.d/skelton/にskeltonファイルを置く | |
(auto-insert-mode 1) | |
(setq auto-insert-query nil) | |
;; 拡張子が.tのファイルを開いたときにskel.test.plの内容を挿入 | |
(add-to-list 'auto-insert-alist '("\\.t$" . "skel.test.pl" )) | |
(add-to-list 'auto-insert-alist '("\\.pm$" . "skel.pm")) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package ; | |
use strict; | |
use warnings; | |
1; |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
package Test; | |
use strict; | |
use warnings; | |
use Test::More qw(no_plan); | |
use Test::Exception; | |
use base qw(Test::Class); | |
sub startup : Tests(startup) { | |
} | |
sub setup : Tests(setup) { | |
} | |
sub teardown : Tests(teardown) { | |
} | |
sub shutdown : Tests(shutdown) { | |
} | |
__PACKAGE__->runtests; | |
1; |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment