my $xx = &log; print "$xx";