Calls to subs are not interpolated. cephas' solution is correct, or else either

print "The color of \$circle is: @{[$circle->getName()]}\n";
[download]

or

print "The color of \$circle is: ${\$circle->getName()}\n";
[download]

depending on whether you want list or scalar context.

After Compline,
Zaxo