Select Code to Download

sub pi {
     'apple 3.1415936535897532';
...
my $str = "I like breadnbutter. I like toasted ham. I like @{[pi]}";

print $str, $/;

I like bread and butter. I like toast and jam. I like pi