ex1-2.1.pl

#! /usr/perl
use utf8;
use warnings;

$pi = 3.141592654;
print "What is the radius?";
chomp($radius = <STDIN>);
$circ = 2 * $pi * $radius;
print "The circumference of a circle of radius $radius is $circ\n";