print 'Radius? ';
$radius = <STDIN>;