use constant PIE => "Warm Apple";

##</code><code>##

print "The value of PIE is ${ \PIE }.\n";

##</code><code>##

 print "pie: ", PIE, "\n";