perl - 如何确定是从命令行中调用脚本还是将其作为cgi脚本调用？

Question

我有一个编写的脚本，可以在命令行上使用，也可以用作CGI脚本，并且需要确定脚本的调用方式，以便为Web请求输出内容类型的 header (也许还有一些反缓存的内容) header )。我的第一个想法是检查http环境变量是否存在:

my $js = build_javascript();

if ( exists $ENV{HTTP_HOST} ) {
   print "Content-type: text/javascript\n\n";
}
print $js;

有没有更好的办法？

Answer 1

根据RFC3875中的CGI规范(第4.1.4节)，GATEWAY_INTERFACE环境变量将是检查您是否在CGI上下文中运行的权威性事物:

4.1.4. GATEWAY_INTERFACE

The GATEWAY_INTERFACE variable MUST be set to the dialect of CGI being used by the server to communicate with the script.