#!/usr/bin/perl -w


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

arrow
arrow
    文章標籤
    奇科電腦 geego
    全站熱搜

    台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄