Quel est l'équivalent Perl pour les appels PHP suivants? Toute aide serait très appréciée.
4 Réponses :
Quel est l'environnement dans lequel vous travaillez? Si c'est le script CGI, essayez:
use Data::Dumper; print Dumper \%ENV;
Cela a fonctionné génial, merci. Vous connaissez-vous l'équivalent Perl de la fonction PHP File_Get_Contents () également? Je joue avec Open, mais je ne peux pas l'obtenir pour accéder à une page sur un serveur différent de la manière que File_Get_Contents ().
@Dandemeyere: ce que je faisais habituellement était: Ouvrir le fichier, $ data = joint '',
La réponse de Hlynul concernant File_Get_Contents est erronée. Dandemeyere a demandé (et avait une réponse à cette question) à Stackoverflow.com/questions/3413151
Variables d'environnement sont une série de valeurs cachées que le serveur Web envoie à chaque CGI que vous exécutiez. Votre CGI peut les analyser et utiliser les données qu'ils envoient. Les variables d'environnement sont stockées dans un hachage appelé par exemple, Pour plus de détails, voir CGI Variables environnementales $ env ('http_ost'} donnera le nom d'hôte de votre serveur.
Autre moyen, que l'environnement variable, est d'utiliser CGI:
use strict; use warnings; use CGI ; print CGI->new->url();
ou vous pouvez le faire et utiliser la variable $ page_url.
my $page_url = 'http';
$page_url.='s' if $ENV{HTTPS};
$page_url.='://';
if($ENV{SERVER_PORT}!=80)
{
$page_url.="$ENV{SERVER_NAME}:$ENV{SERVER_PORT}$ENV{REQUEST_URI}";
}
else
{
$page_url.=$ENV{SERVER_NAME}.$ENV{REQUEST_URI};
}
Perfection :) fonctionne bien