我看過太多人都把四捨五入的問題看成是「字串」來處理，實際上，如果把四捨五入做為「數學」來解的話，程式大概只要幾行即可解決。
以四捨五入取整數的例子來講，其原理就是: 任何數值+0.5 再取整數。
但要注意的是，當四捨五入遇到「負數」時，處理的方式就會變成「五捨六入」，這是因為中間數要往數值大的那邊進位的緣故。所以加上了負數的處理，程式至少又多了一行:
繼續閱讀 »
<head> <meta http-equiv=refresh content="0;url=http://host.domain.tld/path/to/"> </head>
<script language="JavaScript"> <!-- window.location.href = "http://host.domain.tld/path/to/"; //--> </script>
<?php
header("Location: http://host.domain.tld/path/to/");
?>
(轉址前不可有任何資料輸出)
#!/usr/bin/perl -w print "Location: http://host.domain.tld/path/to/ \n\n";
(轉址前不可有任何資料輸出)
#!/usr/bin/perl -w
use CGI qw/:standard/;
my $CGI = CGI->new();
print $CGI->redirect("http://host.domain.tld/path/to/");
(轉址前不可有任何資料輸出)
請參考這一篇…
use File::Copy;
copy('file1.txt','file2.txt') or die "can't copy: $!\n";
sub copy_dir{
my $source = $_[0];
my $target = $_[1];
use File::Copy;
opendir(DIR,$source);
while(my $filename = readdir(DIR)){
if(-f "$source/$filename")){
copy("$source/$filename","$target/$filename") or die "can't copy: $!\n";
}
}
close(DIR);
}
本文件是參考鳥哥寫的 logfile.sh，我把它改成符合我自己系統的 LOG 分析程式，全面以 Perl 重寫。我自己用了一段時間 (其實也半年了)，覺得勉強還可以用，所以公開給大家用看看…
繼續閱讀 »
ImageMagick 是個功能強大的圖片工具，讓你讀取、寫入、操作任何熱門的圖片格式，如 GIF、JPEG、PNG、PDF… 等。使用 ImageMagick 可以即時的建立 GIF 的圖片檔案，讓圖形可以更融入網頁等應用介面。你也可以更改圖片的大小、反轉圖形、增強亮度、減少顏色對比、加入額外特殊的效果。圖片可以儲存不同的格式依你的工作需求。
繼續閱讀 »
