my $foo = sub { sin($_[0]) };