Perl: cách lấy giá trị từ form html

English | Vietnamese

Rules

Main Forum

Portal

Member Listing

Statistics

Search

Reading Room
[Register]

Login [ | https ]

Forum Index

Thảo luận hệ điều hành *nix

Perl: cách lấy giá trị từ form html

[Programming] Perl: cách lấy giá trị từ form html	08/02/2010 10:30:54 (+0700) \| #1 \| 204730

mR.Bi
Member

Joined: 22/03/2006 13:17:49
Messages: 812
Offline

Mình có viết một đoạn html lấy hiển thị một form cho người dùng nhập vào dữ liệu, sau đó dùng một script perl để lấy giá trị này để xử lí.
Form mình viết như sau:
Code:

<form name="form" action="/cgi-bin/script.pl" method="post"> 
<table align="center" width="450" cellpadding="0" cellspacing="0" >
<tr style="background-color: #EEEEEE;">
    <td width="35%" align="right" style="font-weight: bold; padding: 5px;">User Name:</td>
    <td width="45%" align="left">
        <input onkeydown="validate()" onblur="validate()" onmousemove="validate()" type="text" name="user_name" value="" size="30"/>
    </td>

Để nhập vào username
Script perl mình dùng cgi để lấy giá trị đó

Code:

use CGI;
my $name = new CGI;
my $user_name = $name->param ( 'user_name' );
print "username is $user_name","\n";
.....

Thì khi in ra giá trị của user_name là rỗng, mình không biết lập trình perl, chỉ đọc và làm theo thôi. Xin mọi người cho biết lí do và làm sao để lấy giá trị user_name này dùng được.
Xin cảm ơn.

All of my life I have lived by a code and the code is simple: "honour your parent, love your woman and defend your children"

[Programming] Perl: cách lấy giá trị từ form html	08/02/2010 16:05:34 (+0700) \| #2 \| 204755

WinDak
Researcher

Joined: 27/01/2002 11:15:00
Messages: 223
Offline

bạn thử thêm 2 dòng
Code:

use strict;
use warnings;

xem có báo lỗi gì lúc biên dịch không

có thể post nguyên code của bạn lên để xem không ? vì cái html form của bạn, không có close tag, submit... etc..

-- w~ --

[Programming] Perl: cách lấy giá trị từ form html	08/02/2010 23:56:19 (+0700) \| #3 \| 204772

FaL
Moderator

Joined: 14/04/2006 09:31:18
Messages: 1232
Offline

Bạn Bi thêm dòng:
Code:

print "Content-type: text/html\n\n";

coi sao?

PS: dòng này thêm vào trước mấy cái print khác nha, thêm vào đoạn đầu ấy!

Hãy giữ một trái tim nóng và một cái đầu lạnh

[Programming] Perl: cách lấy giá trị từ form html	09/02/2010 21:29:05 (+0700) \| #4 \| 204852

mR.Bi
Member

Joined: 22/03/2006 13:17:49
Messages: 812
Offline

mình giải quyết được rồi, trên máy mình dùng fastcgi nhưng mình dùng perl cgi nến không lấy được dữ liệu từ form. Mình thay bằng CGI::Fast thì ok, thay đổi một tí thế này là được.
Code:

#!/usr/bin/perl
use Shell;
use CGI::Fast;
$cgi = new CGI::Fast;
print "Content-type: text/html", "\n\n";
$user_name = $cgi->param ( 'user_name' );
print "ping pong ping pong", "\n";
print "==========#####==========", "\n";
print "username is $user_name", "\n";

**sorry, mình nhẫm lẫn gì đó, code trên sai và script mình vẫn không chạy. vẫn cần sự giúp đỡ smilie

All of my life I have lived by a code and the code is simple: "honour your parent, love your woman and defend your children"

Go to:

Users currently in here
1 Anonymous