#ex_02-1
#Learning Perl Appendix A, Exercise 2.1
$pi = 3.141592654;
$result = 2 * $pi * 12.5;
print "radius 12.5 is circumference $result\n";