目前分類:程式-Perl (12)

瀏覽方式: 標題列表 簡短摘要

將smarty寫入目錄所有權改成nginx

chown nginx:nginx /usr/share/nginx/html/web/templates_c

 

 


文章標籤

kinomelma 發表在 痞客邦 留言(0) 人氣()

壓縮

#進入/tmp目錄
cd /tmp 

#把/tmp目錄下面的alldata目錄壓縮為test.zip
zip -r test.zip alldata #壓縮tmp目錄

解壓縮

#進入/tmp目錄
cd /tmp 

#把/tmp目录下面的test.zip直接解压到/tmp目录里面
unzip test.zip

 

kinomelma 發表在 痞客邦 留言(0) 人氣()

當登入openwebmail (http://127.0.0.1/webmail)

出現Couldn't write /var/log/openwebmail.log! (Permission denied)

表示權限被拒絕啦!

 

執行以下:

touch /var/log/openwebmail.log
chcon -u system_u /var/log/openwebmail.log
chcon -t httpd_sys_script_rw_t /var/log/openwebmail.log
chcon -t httpd_unconfined_script_exec_t /var/www/cgi-bin/openwebmail/openwebmail*

說明
touch /var/log/openwebmail.log #產生日誌文件
chcon -u system_u /var/log/openwebmail.log #修改文件權限

kinomelma 發表在 痞客邦 留言(0) 人氣()

關於 memcached,雖然可以找到一些基本
介紹,DK大神也有點到一些進階議題,不過最近看了 Using memcached PDF 之後才真正學到了不少實戰技巧跟如何設計快取的概念。以下是一些零散的筆記:

裝好之後,基本的啟動方式是

* `memcached -l 127.0.0.1 -P 11211 -m 128 -d` for deamon
* `memcached -l 127.0.0.1 -P 11211 -m 128 -vv` for development debug

memcached 是一套 Name-Value Pair(NVP) 分散式記憶體快取系統,Key 的長度被限制在 250 characters,儲存的資料不能超過 1 megabyte。如果資料會超過 1mb,可以考慮使用壓縮工具,例如在 Rails 2.1 裡就內建了 ActiveSupport::Cache::CompressedMemCacheStore。

除了 memcached server,不同程式語言都有自己的 memcache client library 工具提供更方便的介面。一個基本的任務就是使用 Hashing algorithm 根據 Key 來決定該去存取一台 memcached server (如果有超過一台的 memcached server 的話)。Ruby 的 client 目前檯面上有幾套 1. memcache-client 2. fiveruns fork 版 memcache-client,針對 Hasing 的部份用C改寫了 3. 使用 libmemcached 的超快 memcached

有趣的是,不需要 client library,memcached 是可以直接 telnet 127.0.0.1 11211 的。telnet 之後打 stats 可以得到一些統計資料,除了目前共有多少筆資料跟共用多少空間之外,重要的有 cmd_get 跟 cmd_hits,就可以得出 cache hit ratio,這個數字應該努力到九成以上。另外還有你的 cmd_set 應該超過 cmd_get,

其他的 memcached 標準操作有 SET (新增或是更新一個值)、ADD(只有在該key不存在時,才會新增快取資料成功)、REPLACE(只有在該key已經存在時,才會更新資料成功)、GET(拿快取資料)。

在考慮使用 memcached 前,要知道它不是你系統中唯一的 cache,HTML 的整頁快取應該用 Web server、純 SQL query result 可以用 MySQL 內建 Query Cache,設定很簡單,效果很不錯 (Cache Performance Comparison。我自己的心得是很多時候你想要快取的物件其實並不是一個 SQL query 就可以搞定的,而是多個 SQL query 才計算出來,這時候去做純快取 SQL query result 我個人覺得也許不是很有意義,Rails 這部份就有人實做了query_memcached。。

另外要注意的是 memcached 並不是 persistent data store,只要一關掉 memcached server,裡面的資料就會通通不見,如果要拿來儲存 session authentication 資料要特別小心。

寫 memcached 程式的第一個問題是找出什麼資料需要快取? 一個常見的問題是我該快取 HTML fragment 還是純資料結構? 如果你操作介面只有一處用到,我們可以只快取 HTML fragment 即可,不然其實規模稍大的網站其實兩者都可以快取起來。

kinomelma 發表在 痞客邦 留言(0) 人氣()

vb.net or C#

 

//把控制項塞到陣列理
//RadioButton[] radios = new RadioButton[] { this.checkBox_1, this.checkBox_2,
// this.checkBox_3, this.checkBox_4,this.checkBox_5, this.checkBox_6,
//this.checkBox_7, this.checkBox_8,this.checkBox_9};


Control[] lbl = this.Controls.Find("checkBox_" + temp1, true);
Control[] lbl2 = this.Controls.Find("checkBox_" + temp2, true);
(lbl2[0] as CheckBox).Image = radioButton_temp.Image;
(lbl[0] as CheckBox).Image = radioButton_temp2.Image;

 

kinomelma 發表在 痞客邦 留言(1) 人氣()

為了避免跟html頁面中嵌入js腳本文件(常用{}框)編寫代碼段受影響,

故將原先包住變數的{}改成<{ 跟 }>。

例如原先使用{$hello},將變成<{$hello}>,也比較美觀

 

Smarty-3.1.19_20140630\libs\Smarty.class.php

修改成

public $left_delimiter = "<{";

public $right_delimiter = "}>";

 

 

 


文章標籤

kinomelma 發表在 痞客邦 留言(0) 人氣()

 

準備一個圖片控制項pictureBox00,

準備9個radio控制項radioButton1~radioButton9

屬性

appearance: button

autosize: false

size:104, 104


private void Form1_Load(object sender, EventArgs e)
{
var imgarray = new Image[9];
var img = pictureBox00.Image;

文章標籤

kinomelma 發表在 痞客邦 留言(0) 人氣()

Fields from table CD:

ID int (10)
M_id int (10)
cd_name varchar (10)


 

Fields from table MEMBER:

ID int (10)
NAME varchar (5)
PHONE varchar (15)


 

MYSQL:

 

kinomelma 發表在 痞客邦 留言(0) 人氣()

<?
//jwu 2014/8/1 多階選單可用
/*
[PHP+MYSQL] 產生多階樹狀選單 UL,LI包覆 - tree menu, Multi-Level,Recursive,array
產生格式
<ul>
<li id='tree_2'>A
<ul>
<li id='tree_1'>A1
<ul>
<li id='tree_7'>A11</li>
</ul>

kinomelma 發表在 痞客邦 留言(0) 人氣()

Dim OV(500)
Dim OP(500)
Dim Adv(500)
Dim Ops, Ovs, K As Integer
Dim isEmpty As Boolean

Function Process(Formula As String)
    ClearAll

    Formula = Formula & ";"

    Dim P, str, o
    P = 1

    Do While (P < Len(Formula))

        If IsNumeric(Mid$(Formula, P, 1)) Then

kinomelma 發表在 痞客邦 留言(0) 人氣()

<%
ServerURL="http://google.com/"   '要抓的網址
Set Mail1 = Server.CreateObject("CDO.Message")
Mail1.CreateMHTMLBody ServerURL,31
AA=Mail1.HTMLBody
Set Mail1 = Nothing

AA=replace(AA,"<","< ")
Response.Write AA %>

 


kinomelma 發表在 痞客邦 留言(1) 人氣()

好久沒碰Perl了,
都快忘了基本語法,
順便複習Perl給我的震撼囉...

#!/usr/bin/perl -w
use strict;
=head1 [以下註解]
作用:把目錄下符合檔名資料取出前三行作批次替換處理。
程式:kinom (kinomelma@yahoo.com.tw)
日期:2008/01/05
=cut [以上註解]

kinomelma 發表在 痞客邦 留言(0) 人氣()