[Perl] Volumen de una esfera

Un pequeño code para calcular el volumen de una esfera. No es mucho, pero tenía ganas de codear algo...

#!/usr/bin/local/perl

my $pi=3.14;
my $r;
my $volumen;

print "Radio: ";
$r=<STDIN>;
chomp($r);

$volumen=(4*$pi*$r**3) / 3;
print "El volumen es: $volumen\n";