2015年6月3日 星期三

PERL CGI 色碼表

PERL CGI 色碼表

1。以[ 記事本 ]編輯檔案, 存檔名為:color.cgi

2。將編輯好的 PerlCGI 存放於 [ X:\sambar70\cgi-bin ]路徑中

3。開起瀏覽器, 於網址列輸入連結網址即可.

4。連結網址::http://localhost/cgi-bin/color.cgi

代碼:


#!/sambar70/perl/perl.exe
#
# FileName : color.cgi
# By.Jhengkaiwun
#

@rbg = ('00', '33', '66', '99', 'CC', 'FF');

print "Content-type:text/html\n\n";
print '<html>';
print '<h1>色碼表</h1>';
print '<pre>';
foreach $rr (@rbg) {
    foreach $gg (@rbg) {
        foreach $bb (@rbg) {
            print qq(<font color="#$rr$gg$bb">●</font><tt>#$rr$gg$bb</tt>);
        }
        print "\n";
    }
}
print '</pre>';
print '</html>';


執行環境:Sambar Server 7.0

下載頁面:http://www.sambarserver.info/
下載:http://www.sambarserver.info/download/Sambar70.zip


執行結果:





沒有留言:

張貼留言