奇科電腦 輸入一個數字，算出圓周並輸出

#!/usr/bin/perl -w

print $_ = ($ARGV[0] && $ARGV[0] =~ /\d+/) ? 2 * 3.141592654 * $ARGV[0] : 'please give me a number.', "\n";

更多技術小秘訣請參考以下網頁
http://www.geego.com.tw/tech_support/new-tips