URL: https://linuxfr.org/forums/programmationweb/posts/perl-php--2
Title: perl & php
Authors: linuxesti
Date: 2006年06月02日T11:20:10+02:00
Tags: 
Score: 0
je suis entrain de develloper une application d'adminstration de systeme de messagerie sous linux 
mon application necessite de developper avec php et perl à la fois 
en effet l'authentification d'administarteur se fait de la première page a l'aide d'un programme cgi 
my $cyrus_user = param('Login');//recuperé a partir d'un formulaire 
my $cyrus_pass = param('Password');//a partir d'un formulaire 
my $mechanism = "plain"; 
my $cyrus = Cyrus::IMAP::Admin->new($cyrus_server); 
if ($cyrus->authenticate($mechanism,'imap','',$cyrus_user,'0','10000',$cyrus_pass)) 
{ 
...... 
} 
.... 
mon pb est ces parametres j'aime bien de les recuperer pour tous les pages de mon application puisque chaque tache necessite ces paramètres 
comment peut -on proceder ?
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="https://linuxfr.org/forums/programmationweb/posts/perl-php--2.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="https://linuxfr.org/forums/programmationweb/posts/perl-php--2.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>