davidliu007-CSDN博客

原创 Force HTTPS in Apache2

在apache2中，使用url_rewrite模块，可以实现强制把http转成https：RewriteEngine OnRewriteCond %{HTTPS} !=on#RewriteCond %{HTTPS} off#RewriteCond %{SERVER_PORT} 80RewriteRule (.*) https://%{HTTP_HOST}%{REQUEST

2013-06-14 18:17:02 668

原创脚本修改Linux Chrome Local Storage条目

Linux中Chrome浏览器的data存储在用户目录中的位置： ~/.config/google-chrome/Default/目录（其他请参考：http://www.chromium.org/user-experience/user-data-directory）;HTML5本地存储(localstorage)中的条目位于Local\ Storage/的.localstorage文件；

2013-03-05 21:28:15 1223

原创 Perl -- 数组和hash -- 判断元素是否存在数组中

判断元素var是否存在于varlist数组中：#my @varlist = (1,2,3,4);#my $var = 2;my %vars = map { $_ => 1 } @varlist;if(exists($vars{$var})) {...... Logic}往varlist中加入新的非重复元素：$vars($var2)=1;@varlist = k

2013-01-18 09:17:25 7413

原创 Plugin execution not covered by lifecycle configuration: org.codehaus.mojo:aspectj-maven-plugin

解决方案1：加入如下代码：

2012-12-18 14:14:12 2544 1

转载 Perl 记录日志

写程序时,打印日志是非常好的习惯,对我们排错,查问题非常有用.平时我们喜欢自己写个函数来处理日志,要么直接 print .在 Perl 中有个专门处理日志的模块叫 Log::Log4perl 这个是个重量级的家伙,所以不喜欢,配置的可读性也不怎么样.但他和操作系统一样,提供了几个级别的日志 FATAL, ERROR, WARN, INFO,DEBUG, TRACE 几个日志级别给我们使用,

2012-11-22 17:18:38 3050

原创 Perl: 同时在屏幕和文件打印输出

Perl 代码实现：#!/usr/bin/perluse strict;use warnings;use diagnostics;open(LOG, '>', 'LOG_FILE') or die "Can't redirect stdout: $!";open(CMD, 'ls |');open(STDERR, '>&', STDOUT) or die "Can't redi

2012-11-22 00:57:47 8613

原创 Perl 脚本测试网络连接

Perl 脚本测试网络连接。#!/usr/bin/perluse IO::Socket;use POSIX qw(strftime);use vars qw($configfile @listen @filter @unknown @nlisten @pingable);sub testConnect($$) { my ($host, $port) = @_;

2012-11-21 17:14:48 836

org.springframework.roo.annotations

org.springframework.roo.annotations package and pom for maven project

2012-07-24

Spring MVC validation Example

Annotation-Based Validation with the Spring Bean Validation Framework

2009-07-15

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人