¿Cómo puedo determinar si un script fue llamado desde la línea de comandos o como un script cgi?

Tengo un script que escribí que se puede usar en la línea de comandos o como un script CGI, y necesito determinar cómo se llamó el script para poder generar un encabezado de tipo de contenido para las solicitudes web (y tal vez algún anti-caché encabezados también). Mi primer pensamiento es verificar la existencia de las variables de entorno http:

my $js = build_javascript();

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

¿Hay alguna manera mejor?

Respuestas a la pregunta(3)

Su respuesta a la pregunta