Je suis actuellement en train de créer des scripts en PERL dans un site
conçus en ASP, et l'ASP c'est pas ma tasse de thé !!!
Voici ce que je voudrais réaliser en PERL :
connexion.asp: (qui créer une variable de session)
....
....
Session("toto")= "ok"
....
menu.asp ( qui lit la variable de session)
...
...
if Session("toto")<>"ok" then
response.redirect "index.html"
end if
....
Comment puis je récupéré la variable toto pour savoir si je suis bien
connecté en PERL ??
if Session("toto")<>"ok" then response.redirect "index.html" end if
Bonjour,
Je pense que le code suivant devrait fonctionner :
<% use strict; use vars qw($Request $Response $Server $Session); if($Session->{'wsp_connexion'} ne 'ok') { $Response->Redirect('index.html'); } %>
Cordialement, -- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
ReM
Merci mais j'ai le message d'erreur suivant : Can't call method "Redirect" on an undefined value at D:serverssitesdevs.cif42.orgitaliquessiteadminquestionnaire.pl line 29.
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au préalable dans un script ASP.
"Bruno Ethvignot" a écrit dans le message de news:bkq0qd$hnv$
ReM wrote:
if Session("toto")<>"ok" then response.redirect "index.html" end if
Bonjour,
Je pense que le code suivant devrait fonctionner :
<% use strict; use vars qw($Request $Response $Server $Session); if($Session->{'wsp_connexion'} ne 'ok') { $Response->Redirect('index.html'); } %>
Cordialement, -- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
Merci mais j'ai le message d'erreur suivant :
Can't call method "Redirect" on an undefined value at
D:serverssitesdevs.cif42.orgitaliquessiteadminquestionnaire.pl line
29.
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que
je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au
préalable dans un script ASP.
"Bruno Ethvignot" <bruno.ethvignot@voila.fr> a écrit dans le message de
news:bkq0qd$hnv$1@news-reader4.wanadoo.fr...
ReM wrote:
if Session("toto")<>"ok" then
response.redirect "index.html"
end if
Bonjour,
Je pense que le code suivant devrait fonctionner :
<%
use strict;
use vars qw($Request $Response $Server $Session);
if($Session->{'wsp_connexion'} ne 'ok') {
$Response->Redirect('index.html');
}
%>
Cordialement,
--
Bruno Ethvignot - *bruno* arrobe *tlk* point *fr*
http://mozilla.tlk.fr/contact.php
http://linux.tlk.fr/contact.php
Merci mais j'ai le message d'erreur suivant : Can't call method "Redirect" on an undefined value at D:serverssitesdevs.cif42.orgitaliquessiteadminquestionnaire.pl line 29.
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au préalable dans un script ASP.
"Bruno Ethvignot" a écrit dans le message de news:bkq0qd$hnv$
ReM wrote:
if Session("toto")<>"ok" then response.redirect "index.html" end if
Bonjour,
Je pense que le code suivant devrait fonctionner :
<% use strict; use vars qw($Request $Response $Server $Session); if($Session->{'wsp_connexion'} ne 'ok') { $Response->Redirect('index.html'); } %>
Cordialement, -- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
Bruno Ethvignot
ReM wrote:
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure du code Perl dans des ASP, après l'installation de la distribution d'ActivePerl d'ActiveState : http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne sais pas comment récupérer une variable de session créée par une ASP.
Les variables de sessions sont identifiées généralement par un cookies sur le poste client et conservées côté serveur (un fichier temporaire par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne pense pas qu'il soit possible de récupérer les variables sessions ASP depuis un CGI en Perl.
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl (cela ne doit pas être très long), ou de passer tes variables par la "Query String".
Sinon pour faire une refirection tu peux sois faire : print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI : use strict; use CGI; my $o_query = new CGI; print $o_query->redirect('/index.html');
A+ -- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
ReM wrote:
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que
je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au
préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure
du code Perl dans des ASP, après l'installation de la distribution
d'ActivePerl d'ActiveState :
http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne
sais pas comment récupérer une variable de session créée par une ASP.
Les variables de sessions sont identifiées généralement par un cookies
sur le poste client et conservées côté serveur (un fichier temporaire
par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne
pense pas qu'il soit possible de récupérer les variables sessions ASP
depuis un CGI en Perl.
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl
(cela ne doit pas être très long), ou de passer tes variables par
la "Query String".
Sinon pour faire une refirection tu peux sois faire :
print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI :
use strict;
use CGI;
my $o_query = new CGI;
print $o_query->redirect('/index.html');
A+
--
Bruno Ethvignot - *bruno* arrobe *tlk* point *fr*
http://mozilla.tlk.fr/contact.php
http://linux.tlk.fr/contact.php
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure du code Perl dans des ASP, après l'installation de la distribution d'ActivePerl d'ActiveState : http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne sais pas comment récupérer une variable de session créée par une ASP.
Les variables de sessions sont identifiées généralement par un cookies sur le poste client et conservées côté serveur (un fichier temporaire par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne pense pas qu'il soit possible de récupérer les variables sessions ASP depuis un CGI en Perl.
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl (cela ne doit pas être très long), ou de passer tes variables par la "Query String".
Sinon pour faire une refirection tu peux sois faire : print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI : use strict; use CGI; my $o_query = new CGI; print $o_query->redirect('/index.html');
A+ -- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
ReM
"Bruno Ethvignot" a écrit dans le message de news:bksoj4$9vg$
ReM wrote:
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que
je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au
préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure du code Perl dans des ASP, après l'installation de la distribution d'ActivePerl d'ActiveState : http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne sais pas comment récupérer une variable de session créée par une ASP.
Dans la doc de Session il est dis que les variables sont mises dans un
cookie mais j'ai fouyé tout on PC et j'ai rien trouvé !!!
Les variables de sessions sont identifiées généralement par un cookies sur le poste client et conservées côté serveur (un fichier temporaire par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne pense pas qu'il soit possible de récupérer les variables sessions ASP depuis un CGI en Perl.
J'en ai bien peur !!!!
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl (cela ne doit pas être très long), ou de passer tes variables par la "Query String".
Je peux pas passer en parametre le fait que l'identification est ok sinon ce
serait trop facile à récupérer
Sinon pour faire une refirection tu peux sois faire : print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI : use strict; use CGI; my $o_query = new CGI; print $o_query->redirect('/index.html');
A+
Merci de ton aide
-- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
"Bruno Ethvignot" <bruno.ethvignot@voila.fr> a écrit dans le message de
news:bksoj4$9vg$1@news-reader2.wanadoo.fr...
ReM wrote:
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script
que
je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer
au
préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure
du code Perl dans des ASP, après l'installation de la distribution
d'ActivePerl d'ActiveState :
http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne
sais pas comment récupérer une variable de session créée par une ASP.
Dans la doc de Session il est dis que les variables sont mises dans un
cookie mais j'ai fouyé tout on PC et j'ai rien trouvé !!!
Les variables de sessions sont identifiées généralement par un cookies
sur le poste client et conservées côté serveur (un fichier temporaire
par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne
pense pas qu'il soit possible de récupérer les variables sessions ASP
depuis un CGI en Perl.
J'en ai bien peur !!!!
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl
(cela ne doit pas être très long), ou de passer tes variables par
la "Query String".
Je peux pas passer en parametre le fait que l'identification est ok sinon ce
serait trop facile à récupérer
Sinon pour faire une refirection tu peux sois faire :
print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI :
use strict;
use CGI;
my $o_query = new CGI;
print $o_query->redirect('/index.html');
A+
Merci de ton aide
--
Bruno Ethvignot - *bruno* arrobe *tlk* point *fr*
http://mozilla.tlk.fr/contact.php
http://linux.tlk.fr/contact.php
"Bruno Ethvignot" a écrit dans le message de news:bksoj4$9vg$
ReM wrote:
précision : j'utilise un script PERL ( toto.pl ) et c'est dans ce script que
je veux savoir si la valeur "toto" eq "ok", sachant que toto est créer au
préalable dans un script ASP.
Mon exemple était valable dans une ASP. Il est possible d'inclure du code Perl dans des ASP, après l'installation de la distribution d'ActivePerl d'ActiveState : http://www.activestate.com/Products/ActivePerl/
Si tu utilises un script Perl, dans un contexte CGI je suppose, je ne sais pas comment récupérer une variable de session créée par une ASP.
Dans la doc de Session il est dis que les variables sont mises dans un
cookie mais j'ai fouyé tout on PC et j'ai rien trouvé !!!
Les variables de sessions sont identifiées généralement par un cookies sur le poste client et conservées côté serveur (un fichier temporaire par exemple). Je ne connais pas le mécanisme des sessions ASP et je ne pense pas qu'il soit possible de récupérer les variables sessions ASP depuis un CGI en Perl.
J'en ai bien peur !!!!
Le plus simple est bien sûr de convertir ton script Perl en ASP-Perl (cela ne doit pas être très long), ou de passer tes variables par la "Query String".
Je peux pas passer en parametre le fait que l'identification est ok sinon ce
serait trop facile à récupérer
Sinon pour faire une refirection tu peux sois faire : print "Status: 302 Movednlocation: /index.htmlnn";
Ou soit utiliser le module CGI : use strict; use CGI; my $o_query = new CGI; print $o_query->redirect('/index.html');
A+
Merci de ton aide
-- Bruno Ethvignot - *bruno* arrobe *tlk* point *fr* http://mozilla.tlk.fr/contact.php http://linux.tlk.fr/contact.php
