print "Input radius:\t";
$radius = <STDIN>;
$cirum = $radius * 2 * 3.14159;
print "The circumfrence of the circle with the radius of $radius equals $circum\n";