给 perl 增加 trim 函数
Tuesday, 5. February 2008, 08:04:58
#!/usr/bin/perl
sub trim($) {
($string) = $_[0];
$string =~ s/^\s*(.+)\s*$/$1/;
return $string;
}
#测试
print trim(" abcd ");
print "\n";
无不用其“极”
Tuesday, 5. February 2008, 08:04:58
#!/usr/bin/perl
sub trim($) {
($string) = $_[0];
$string =~ s/^\s*(.+)\s*$/$1/;
return $string;
}
#测试
print trim(" abcd ");
print "\n";
Tuesday, 29. January 2008, 01:33:00
Dim WSH, ExecObj
Set WSH = CreateObject("WScript.Shell")
Set ExecObj = WSH.Exec("hostname")
WScript.Echo "pid:" & ExecObj.processID
WScript.Echo "stdout: " & ExecObj.StdOut.ReadAll
WScript.Echo "exit: " & ExecObj.exitCode
WScript.Quit(ExecObj.exitCode)
Set ExecObj = Nothing
Set WSH = Nothing
<?
exec("hostname; echo $$", $output, $return_cd);
$pid = array_pop($output);
echo "pid: $pid\n";
echo "\noutput: ".join("\n", $output)."\n";
echo "\nreturn code: $return_cd\n";
?>
Wednesday, 9. January 2008, 06:29:05
Wednesday, 8. August 2007, 02:25:27
/* Date/Time Format v0.2; MIT-style license By Steven Levithan <http://stevenlevithan.com> */ Date.prototype.format = function(mask) { var d = this; // Needed for the replace() closure // If preferred, zeroise() can be moved out of the format() method for performance and reuse purposes var zeroize = function (value, length) { if (!length) length = 2; value = String(value); for (var i = 0, zeros = ''; i < (length - value.length); i++) { zeros += '0'; } return zeros + value; }; return mask.replace(/"[^"]*"|'[^']*'|\b(?:d{1,4}|m{1,4}|yy(?:yy)?|([hHMs])\1?|TT|tt|[lL])\b/g, function($0) { switch($0) { case 'd': return d.getDate(); case 'dd': return zeroize(d.getDate()); case 'ddd': return ['Sun','Mon','Tue','Wed','Thr','Fri','Sat'][d.getDay()]; case 'dddd': return ['Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday'][d.getDay()]; case 'm': return d.getMonth() + 1; case 'mm': return zeroize(d.getMonth() + 1); case 'mmm': return ['Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec'][d.getMonth()]; case 'mmmm': return ['January','February','March','April','May','June','July','August','September','October','November','December'][d.getMonth()]; case 'yy': return String(d.getFullYear()).substr(2); case 'yyyy': return d.getFullYear(); case 'h': return d.getHours() % 12 || 12; case 'hh': return zeroize(d.getHours() % 12 || 12); case 'H': return d.getHours(); case 'HH': return zeroize(d.getHours()); case 'M': return d.getMinutes(); case 'MM': return zeroize(d.getMinutes()); case 's': return d.getSeconds(); case 'ss': return zeroize(d.getSeconds()); case 'l': return zeroize(d.getMilliseconds(), 3); case 'L': var m = d.getMilliseconds(); if (m > 99) m = Math.round(m / 10); return zeroize(m); case 'tt': return d.getHours() < 12 ? 'am' : 'pm'; case 'TT': return d.getHours() < 12 ? 'AM' : 'PM'; // Return quoted strings with the surrounding quotes removed default: return $0.substr(1, $0.length - 2); } }); };
Tuesday, 12. June 2007, 05:47:35
//*********************************
// 单选钮的取值
//*********************************
function getRadioValue(objRadio)
{
if(!objRadio) {
return "";
}
var radioLength = objRadio.length;
if(radioLength == undefined) {
if(objRadio.checked) {
return objRadio.value;
} else {
return "";
}
}
for(var i = 0; i < radioLength; i++) {
if(objRadio[i].checked) {
return objRadio[i].value;
}
}
return "";
}
//*********************************
// 单选钮的设值
//*********************************
function setRadioValue(objRadio, newValue)
{
if(!objRadio) {
return;
}
var radioLength = objRadio.length;
if(radioLength == undefined) {
objRadio.checked = (objRadio.value == newValue.toString());
return;
}
for(var i = 0; i < radioLength; i++) {
objRadio[i].checked = false;
if(objRadio[i].value == newValue.toString()) {
objRadio[i].checked = true;
}
}
}
| S | M | T | W | T | F | S |
|---|---|---|---|---|---|---|
|
| ||||||
| 1 | 2 | 3 | 4 | 5 | ||
| 6 | 7 | 8 | 9 | 10 | 11 | 12 |
| 13 | 14 | 15 | 16 | 17 | 18 | 19 |
| 20 | 21 | 22 | 23 | 24 | 25 | 26 |
| 27 | 28 | 29 | 30 | 31 | ||
LinuxSir
Linux中坚站
为Linux工程师提供技术动力
打造中国最大的UNIX/LINIX资讯站
My mirror, my window, the bridge connecting you and I.
关注:php,mysql,ajax ,linux, js,开源
有用的Opera菜单
なにもあたらしくない
By Adam Li
By Satoru Watanabe
by singway
by 摸鱼儿
by Somh
by 法师
by yumumao
Maybe I was a Bird in another Life !
投放广告挣美元,可用PayPal接收付款
免费网页模板
数据表格样式收集