No, if only for the fact it doesn't have to have a name:

    my $code_ref = sub {print "Hello, $_[0]\n"};
[download]

Or it might have multiple names. foo_bar might have been imported from another package (or exported to another one).