view.cgi#!/usr/local/bin/perl # # view.cgi - Source Code Viewer CGI # version 0.01 # # Copyright (C) 2006 palmo < palmonger at gmail dot com > # License Terms: http://creativecommons.org/licenses/by-nc/2.1/jp/ # use strict; use CGI::Carp qw(fatalsToBrowser); use HTML::Template; use Text::Highlight; # ---- # 設定 # ---- # 使用するテンプレートファイルのパス my $tmpl_path = "view.tmpl"; # 拡張子からファイルタイプへの関連付け # ファイルタイプは色分けに利用される
