| 1 |
#!/usr/bin/perl -d:DProf |
#!/usr/bin/perl |
| 2 |
|
# -d:DProf |
| 3 |
use strict; |
use strict; |
| 4 |
|
|
| 5 |
use lib qw[/home/httpd/html/www/markup/html/whatpm |
use lib qw[/home/httpd/html/www/markup/html/whatpm |
| 6 |
/home/wakaba/work/manakai2/lib]; |
/home/wakaba/work/manakai2/lib |
| 7 |
|
/home/httpd/html/regexp/lib |
| 8 |
|
]; |
| 9 |
use CGI::Carp qw[fatalsToBrowser]; |
use CGI::Carp qw[fatalsToBrowser]; |
| 10 |
|
|
| 11 |
require WebHACC::Input; |
require WebHACC::Input; |
| 80 |
my $checker_class = { |
my $checker_class = { |
| 81 |
'text/cache-manifest' => 'WebHACC::Language::CacheManifest', |
'text/cache-manifest' => 'WebHACC::Language::CacheManifest', |
| 82 |
'text/css' => 'WebHACC::Language::CSS', |
'text/css' => 'WebHACC::Language::CSS', |
| 83 |
|
'text/x-css-inline' => 'WebHACC::Language::CSSInline', |
| 84 |
'text/html' => 'WebHACC::Language::HTML', |
'text/html' => 'WebHACC::Language::HTML', |
| 85 |
'text/x-h2h' => 'WebHACC::Language::H2H', |
'text/x-h2h' => 'WebHACC::Language::H2H', |
| 86 |
|
'text/x-regexp-js' => 'WebHACC::Language::RegExpJS', |
| 87 |
'text/x-webidl' => 'WebHACC::Language::WebIDL', |
'text/x-webidl' => 'WebHACC::Language::WebIDL', |
| 88 |
|
|
| 89 |
'text/xml' => 'WebHACC::Language::XML', |
'text/xml' => 'WebHACC::Language::XML', |