MySQL 的 lock tables 和 unlock tables 的用法

Tommy Wan | MySQL | 2015-3-3
MySQL 的 lock tables 和 unlock tables 的用法
如果 table 只會被查詢,不會被修改,不鎖表也沒有所謂;因為不會發生嚴重錯誤。但如果 table 會被多人修改,問題將會發生,尤其對改動頻繁的 table 。以下先描述一下沒有鎖表而經常發生的情況。張先生與李先生都查詢到貨品存貨有兩件,此時張先生下單訂購一件,結果貨品存貨變成一件。李先生並不知道存貨已變化,未知道存貨變成一件,此時李先生下單訂購兩件。結果存貨變成負... [閱讀全文]
ė159次瀏覽 60條評論 0 MySQL

Perl 使用 MySQL 新增、查詢、修改、刪除

Tommy Wan | Perl | 2015-3-2
Perl 使用 MySQL 新增、查詢、修改、刪除
很多人以為 PHP 可以配合 MySQL 而 Perl 就不可以。事實只是 PHP 內建了 DBI 及 MySQL 的 DBD (Database Driver) ,即是安裝 PHP 就會立即能配合 MySQL 使用。但其實只要 Perl 安裝了 DBI 及 MySQL 的 DBD 就一樣可以配合&... [閱讀全文]
ė112次瀏覽 60條評論 0 MySQL Perl CGI

Perl 簡單的 CGI 留言板

Tommy Wan | Perl | 2015-3-2
Perl 簡單的 CGI 留言板
光是作一些計算或反應,以 JavaScript 在瀏覽器執行就可以。伺服器程式的意義是在伺服器記錄資料,之後又在伺服器取回資料。伺服器程式的核心意義其實就是這樣。現在就來個最簡單的 CGI 留言板吧。guestbook.cgi#!/perl/bin/perl print "Content-type: text/html; charset=utf-8\n\n... [閱讀全文]
ė422次瀏覽 60條評論 0 Perl CGI

Perl 的 CGI 請求與回應

Tommy Wan | Perl | 2015-3-1
Perl 的 CGI 請求與回應
學了 HTML 表格,但只有表格並沒有用,因為表格目的是提交,提交往哪裡,之後又怎樣呢。HTML提交的表格,通常是交給 PHP、CGI、ASP、JSP 等處理,本篇以 Perl/CGI 為例。首先令 web server  可以執行 CGI ;至於怎樣令 web server 能執行 CGI ,請參閱其他文章 。表格 form.html :<form metho... [閱讀全文]
ė130次瀏覽 60條評論 0 Perl CGI

Perl 大量地修改第一行

Tommy Wan | Perl | 2015-3-1
Perl 大量地修改第一行
用 CGI 的人都知道,下載回來的 CGI 路徑通常是 #!usr/bin/perl ,只有 Windows 的 Perl 用戶才會 #!/perl/bin/perl,動輒幾十個 .cgi .pl 修改路徑為 #!/perl/bin/perl ,實在是非常無謂的事。所以寫了個 Script,專用來大量修改路徑,但此 Script... [閱讀全文]
ė109次瀏覽 60條評論 0 Perl

Perl 環境變數

Tommy Wan | Perl | 2015-3-1
Perl 環境變數
Perl環境變數,通常我們經常需要知道用戶 IP、由哪裡連過來等,以下代碼列出所有環境變數:#!/perl/bin/perl print "Content-type: text/html; charset=utf-8\n\n"; print "<title>環境變數</title>\n&... [閱讀全文]
ė110次瀏覽 60條評論 0 Perl CGI

Perl 開啟 Windows 應用

Tommy Wan | Perl | 2015-3-1
Perl 開啟 Windows 應用
可以透過 Win32::Process 開啟 Windows 應用,這意味只要 Windows 安裝了任何能以 command line 操作的應用,都可以配合 CGI 使用。這例子是打開 notepad,建立一個空白的 temp.txt#!/perl/bin/perl use Win32::Process; use Win32; ... [閱讀全文]
ė101次瀏覽 60條評論 0 Perl

Perl Time

Tommy Wan | Perl | 2015-3-1
Perl Time
#!/Perl/bin/Perl print "Content-type: text/html; charset=utf-8\n\n"; ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time+8*3600); ($sec,$min,$hour,$... [閱讀全文]
ė96次瀏覽 60條評論 0 Perl

Perl Numbers

Tommy Wan | Perl | 2015-3-1
Perl Numbers
#!/perl/bin/perl use POSIX; $ceil   = ceil(3.01);                    &n... [閱讀全文]
ė117次瀏覽 60條評論 0 Perl

Perl 速食 正則表達式

Tommy Wan | Perl | 2015-3-1
Perl 速食 正則表達式
# 附有條件句的表達 print "It matches\n" if "Hello World" =~ /World/; # 相反則以 !~ 控制 print "It doesn't matc... [閱讀全文]
ė104次瀏覽 60條評論 0 Perl RegularExpression
Ɣ回頂部
sitemap