一个perl连数据库的小问题[已解决]

xiaoshengcaicai

寒。我不是很明白楼主想说什么，且让我细细看来。。。

xiaoshengcaicai

告诉我，你是怎么访问那个cgi的？ url写来看看


还有 你的代码里面

    #my $username = "aaaaaa\@gmail.com"; #<- 可以查询出数据
    my $username = $FORM{'username'};   #<- 查询不出数据
   
    print $username;

试试改成下面的代码，可以看一下究竟是不是一样的：

    my $username_t = "aaaaaa\@gmail.com"; #<- 可以查询出数据
    my $username = $FORM{'username'};   #<- 查询不出数据
   
    if ( $username_t eq  $username ) {
        print "user name is the same!!\n":
    } else {
        print "user name is not the same!!\n";
    }

xiaoshengcaicai

flw兄太有个性了，呵呵

xiaoshengcaicai

楼主原来是在windows下？

可以试试调试一下

装一个ActiveState PDK, 一步一步执行代码，看看问题究竟是在哪里

linux上可以试试

env QUERY_STRING=username=1 REQUEST_METHOD=GET perl -wd msgauth.cgi

调试看看

xiaoshengcaicai

啊。。。。是这个原因？？！！！！！


小生受教了。

污染一节一直没怎么接触过。