subroutines.lib

来自「This temp directory is used by the JVM f」· LIB 代码 · 共 34 行

LIB
34 行
字号 
#!/usr/local/bin/perl;

sub cap {
	$captext = $_[0];
	$captext =~ tr/a-z/A-Z/;
	return $captext;
}

sub which {
	$browser = $ENV{'HTTP_USER_AGENT'};
	if ($browser =~ /MSIE/) {
		$browser = "Explorer";
	} elsif ($browser =~/Mozilla/) {
		$browser = "Netscape";
	} else {
		$browser = "something besides Netscape and Explorer";
	}
}

sub header {
	print "<HTML><HEAD><TITLE>";
	print "$_[0]";
	print "<TITLE><HEAD><BODY>"
}

sub footer {
	print "<BODY><HTML>";
}

sub mime {
	print "Content-type: text/html\n\n";
}

1;

subroutines.lib - 源码说明

本页面展示了「This temp directory is used by the JVM for temporary file storage. The JVM is configured to use thi」中的 subroutines.lib 源码文件，采用 LIB 编程语言编写，共 34 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与configured相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?