my $foo = \&sin;
print $foo->(0.5), "\n";