[FoLUG] Script cgi in perl che funziona su Mozilla Firefox e non su Internet Explorer

[chris osu]

Aggiungi questa riga dopo $name = $q -> param('mirna_band');

$name=~ s/\t//g;

Non so perche' ma alle volte IE nei menu mette i tab, mentre mozilla no.
Ciao


----- Original Message ----
From: simona bazzocchi <simona_bazzocchi@yahoo.it>
To: folug@lists.linux.it
Sent: Tuesday, January 22, 2008 10:12:07 PM
Subject: [FoLUG] Script cgi in perl che funziona su Mozilla Firefox e non su Internet Explorer



#!/usr/bin/perl

use Mysql;
use CGI;
$q= new CGI;
$name = $q -> param('mirna_band');
print "Content-type: text/html\n\n";
print "Questo e' il nome $name";

# MYSQL CONFIG VARIABLES

# PERL MYSQL CONNECT()
$connect = Mysql->connect($host, $database, $user, $pw);

# SELECT DB
$connect->selectdb($database);

# DEFINE A MySQL QUERY

$myquery = "select mature1,mature2 from precursor_mature left join
 omim_band on band_prec=loc where precursor_mature.band_prec IN
 (\"$name\")";
# EXECUTE THE QUERY FUNCTION
$execute = $connect->query($myquery);

# HTML TABLE
print "<table border='1'><tr>
<th>mature1</th>
<th>mature2</th>
<th>omim.disorder</th></tr>";

# FETCHROW ARRAY

while (@results = $execute->fetchrow()) {
    print "<tr><td>"
    .$results[0]."</td><td>"
    .$results[1]."</td><td>"
    .$results[2]."</td></tr>";
}

print "</table>";







      ___________________________________ 
L'email della prossima generazione? Puoi averla con la nuova Yahoo!
 Mail: http://it.docs.yahoo.com/nowyoucan.html
_______________________________________________
FoLUG mailing list
FoLUG@lists.linux.it
http://lists.linux.it/listinfo/folug per cancellarsi dalla lista






      ____________________________________________________________________________________
Be a better friend, newshound, and 
know-it-all with Yahoo! Mobile.  Try it now.  http://mobile.yahoo.com/;_ylt=Ahu06i62sR8HDtDypao8Wcj9tAcJ