no strict; my $ref = \&$name;