当初的server-backup.pl不太完善，因为不会自动删除已经备份的文件，所以日积月累会很多多余的文件。现在改进一下。

#now, we delete the file created at 7 days ago.
($sec,$min,$hour,$mday,$mon,$year,
          $wday,$yday,$isdst) = localtime(time()-7*24*60*60);
$bto = sprintf("/data/backup/%4d%02d%02d.tar.gz", $year+1900, $mon+1, $mday);
system("rm -f ".$bto);
system("echo \"".localtime(time)." delete $bto OK.\" >> /data/log/backup.log");

这样，就会删除7天以前的备份档了。

经常有一些电影，要转换成FLV，以在MP4查看（或者其它原因，如大小），所以，写了个脚本进行转换。

前提有mencoder，这在mplayer的官网有下载。

配置好mencoder，使得在CMD方式下可以转换。

再使用以下BAT处理文件进行批量转换。

SET OPS=-of lavf -oac mp3lame -lameopts abr:br=56 -ovc lavc -lavcopts vcodec=flv:vbitrate=200:mbd=2:mv0:trell:v4mv:cbp:last_pred=3:dia=-1:cmp=6:vb_strategy=1 -vf scale=320:240 -ofps 12 -srate 22050
FOR %%i IN (*.rmvb *.avi) do (mencoder %%i -o %%i.flv %OPS%)

OPS变量是mencoder的转换参数。详情参考mencoder的说明即可

百度MP3够无耻的，泛滥引用MP3，搞得流量大增。所以写了个小脚本，用脚本来生成播放器，好让百度蜘蛛再也找不着我的MP3~~哼哼

用法：

<script type="text/javascript">
<!--//

//第一参数为文件目录，第二参数为文件名，第三参数为文件类型
var p200903250135 = new MultimediaClass("/uploads/music/misc/", "dgdt", 0);

//输出播放器
p200903250135.flushPlayer();
//-->
</script>

点此下载

我的PERL是ActivePerl 5.10的，所以使用ppm就可以安装mysql接口。但是，要加入以下地址的repository

http://cpan.uwinnipeg.ca/PPMPackages/10xx/package.xml

　　从CVS中转过来的时候，Subversion的Id等Tag不能自动加上。有点不太适应，不过，我们可以稍微配置一下，让Subversion自动加上。

　　在CVS，只要文档中存在$Id: filename.c Exp $这样的串，CVS都会改写并加上修改日期和修改人的串：$Id: filename.c, v 1.1 2006/11/09 13:58:50 rory Exp $

　　在Subversion里，也是这样的。不过要配置一下(客户端)。

在你的Subversion配置文件里(~/.subversion/config，WIN下是C:\Documents and Settings\~\Application Data\Subversion\config)，找到[auto-props]，添加*.c= svn:keywords=Id Reversion Date，这样成了：

[auto-props]

#...

#....

*.c= svn:keywords=Id Reversion Date

*.h= svn:keywords=Id Reversion Date

还有，还要启用auto-props：

[miscellany]
enable-auto-props = yes

经过以上配置，以后的文件中，只要存在$Id$这样的字符，都会替换成Subversion的版本串说明了。

另，关于UTF8的文件(如一些XML文件之类的)，不能正确加上，上次在SVN的网站上看到相关说明，不过我一时找不出来，稍后再提这个问题吧。

int

install_service()

{

	SC_HANDLE			sc, sv;

	SERVICE_DESCRIPTION		scsc;

	char				str[MAX_PATH];



	GetModuleFileName(NULL, str, MAX_PATH);



	scsc.lpDescription = "Service test";



	sc = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);

	if (sc == NULL) {

		printf("Install service error.");

		return 0;

	}



	strcat(str, " -runserver");



	sv = CreateService(sc, "TestSrv", "Test service",

			SERVICE_ALL_ACCESS, SERVICE_WIN32_OWN_PROCESS,

			SERVICE_AUTO_START,SERVICE_ERROR_IGNORE,

			str,

			NULL, NULL, NULL, NULL, NULL);



	if (sv != NULL){

		ChangeServiceConfig2(sv, SERVICE_CONFIG_DESCRIPTION, &scsc);

		CloseServiceHandle(sv);

	}else{

		CloseServiceHandle(sc);

	}



	printf("Service Installed");



	return 0;

}

int

delete_service()

{

	SC_HANDLE		sc, sv;

	SERVICE_STATUS		ss;



	sc = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);

	if (sc == NULL) {

		printf("OpenSCManage error.");

		return 0;

	}



	sv = OpenService(sc, "TestSrv", SERVICE_ALL_ACCESS);

	if (sv != NULL) {

		QueryServiceStatus(sv, &ss);

		if(ss.dwCurrentState != SERVICE_STOPPED)

		        ControlService(sv, SERVICE_CONTROL_STOP, &ss);



		DeleteService(sv);

		CloseServiceHandle(sv);

	}



	CloseServiceHandle(sc);



	printf("Service Deleted");



	return 0;

}

void WINAPI TestServiceMain(DWORD dwArgc, LPTSTR *lpszArgv)

{

	SERVICE_STATUS_HANDLE	hStatus;

	SERVICE_STATUS		ServiceStatus;



	hStatus = RegisterServiceCtrlHandler("TestSrv",

				(LPHANDLER_FUNCTION)ControlHandle);



	if (hStatus == (SERVICE_STATUS_HANDLE)0) return;



	ServiceStatus.dwServiceType		= SERVICE_WIN32;

	ServiceStatus.dwCurrentState	= SERVICE_START_PENDING;

	ServiceStatus.dwControlsAccepted= SERVICE_ACCEPT_STOP |

	SERVICE_ACCEPT_SHUTDOWN;

	ServiceStatus.dwWin32ExitCode	= 0;

	ServiceStatus.dwServiceSpecificExitCode	= 0;

	ServiceStatus.dwCheckPoint	= 0;

	ServiceStatus.dwWaitHint	= 0;



	SetServiceStatus(hStatus, &ServiceStatus);



	/**/



	ServiceStatus.dwCurrentState    = SERVICE_RUNNING;

	SetServiceStatus(hStatus, &ServiceStatus);



	/*开始*/

	begin_session();

}



void

ControlHandle(DWORD dwControl)

{

	switch (dwControl) {

	case SERVICE_CONTROL_SHUTDOWN:

	case SERVICE_CONTROL_STOP:

		ServiceStatus.dwWin32ExitCode = 0;

		ServiceStatus.dwCurrentState = SERVICE_STOPPED;

		SetServiceStatus (hStatus, &ServiceStatus);

		break;

	}

}

int

startup_service()

{

	SERVICE_TABLE_ENTRY ServiceTable[2];



	ServiceTable[0].lpServiceName = "TestSrv";

	ServiceTable[0].lpServiceProc =

		(LPSERVICE_MAIN_FUNCTION)TestServiceMain;



	ServiceTable[1].lpServiceName = NULL;

	ServiceTable[1].lpServiceProc = NULL;



	// 启动服务的控制分派机线程

	StartServiceCtrlDispatcher(ServiceTable);



	return 0;

}

int iX, iY;



iX = GetSystemMetrics(SM_CXSCREEN);

iY = GetSystemMetrics(SM_CYSCREEN);

WINDOWPLACEMENT		wpc;



GetWindowPlacement(hWnd, &wpc);

SetWindowLong(hWnd, GWL_STYLE, GetWindowLong(hWnd, GWL_STYLE)

                 & ~(WS_CAPTION|WS_THICKFRAME));

AdjustWindowRectEx(&rc, GetWindowLong(hWnd, GWL_STYLE),

             FALSE, GetWindowLong(hWnd, GWL_EXSTYLE));



wpc.rcNormalPosition = rc;

wpc.showCmd          = SW_SHOWNORMAL;

SetWindowPlacement(hWnd, &wpc);