要跟踪每个开源项目是否更新并且每次都手工去做up 是很累的
用prel写了一个简单的自动更新加到cront里面每天定期执行：
在MAC下可以直接调用Growl来做一个友好的提示.简短代码如下。适合懒人使用
use Mac::Growl;
%dir = (
‘/Users/leehao/Sites/jquery/trunk/’ => ‘jquery’,
‘/Users/leehao/Sites/ZendFramework/’ => ‘ZendFramework’,
);
&auto_svnup;
sub auto_svnup {
@key = keys %dir;
foreach $key(@key)
{
chdir $key;
$callback = `svn up`;
Mac::Growl::PostNotification(
‘growlalert’,
‘alert’,
“$dir{$key}”,
“$callback”,
);
}
}
Tags: perl
昨晚对linghttpd 的host进行设置发现了这样一个问
如果设置了用* 去匹配的host后面再设置一个其他域的主机的时候就会不起作用！
原先觉得是顺序的问题！搜索了一下也没有找到解决方法。设置的host详情如下
$HTTP["host"] =~ “*\.debuglee\.com” {
server.name = “lee”
server.document-root = “Users/leehao/Sites/debuglee”
$HTTP["url"] =~ “(\.inc)$” {
url.access-deny = (“”)
}
}
$HTTP["host"] =~ “blog\.debuglee\.com” {
server.name = “lee”
server.document-root = “Users/leehao/Sites/debuglee_blog”
$HTTP["url"] =~ “(\.inc)$” {
url.access-deny = (“”)
}
}
这个问题在apache 和nginx下并没有发现！不知道是bug还是lighttp本身的匹配机制问题！
如果发现这个问题的解决方法的朋友麻烦给我发封email吧！谢谢！ ：）