相关疑难解决方法(0)

在Perl中,如何将整个文件读入字符串?

我正在尝试将.html文件打开为一个很长的字符串.这就是我所拥有的:

open(FILE, 'index.html') or die "Can't read file 'filename' [$!]\n";  
$document = <FILE>; 
close (FILE);  
print $document;
Run Code Online (Sandbox Code Playgroud)

这导致:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN

但是,我希望结果看起来像:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

这样我就可以更轻松地搜索整个文档.

string perl slurp

113
推荐指数
9
解决办法
17万
查看次数

什么是Perl相当于PHP的$ _SERVER [...]?

以下PHP调用的Perl等价物是什么?

$_SERVER["HTTP_HOST"]
$_SERVER["REQUEST_URI"]
Run Code Online (Sandbox Code Playgroud)

任何帮助将非常感激.

perl cgi

6
推荐指数
3
解决办法
1万
查看次数

标签 统计

perl ×2

cgi ×1

slurp ×1

string ×1