#!/usr/bin/perl -w
require "cgi-lib.pl";
use GD;
&ReadParse(*value);
($name,$word)=($value{"username"},$value{"password"});
print "Content-type: text/html\n\n";
print "<html><h1>Hello!</h1>";
print "<br><p>your account is succeed.</p>";
open( FILE,">>$account.txt");
print FILE "$name::$word::\n";
close(FILE);
print "</html>";
-----------------------
不知為何
就是寫不入account.txt
請大大幫個忙看一下吧....
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.62.121.66