my $foo = bar(4711, sub { shift + 23 });