lang.cgi

来自「Unix下基于Web的管理工具」· CGI 代码 · 共 11 行

#!/usr/local/bin/perl
# lang.cgi
# Return language translation values

require './file-lib.pl';
print "Content-type: text/plain\n\n";
foreach $k (keys %text) {
	print $k,"=",$text{$k},"\n";
	}