Win8 Strawberry 5.8.9.5 (32)  Thu 09/22/2022 13:05:47
C:\@Work\Perl\monks
>perl

use strict;
use warnings;

my $ref = sub { return "hiya \n"; };
print $ref->();

my $str = "foo $ref->() bar \n";
print $str;

^Z
hiya
foo CODE(0x9145ec)->() bar