Select Code to Download

sub get_name
{
  my $name = dblookup() || undef;
  $name;
}

sub get_name
{
  my $name = dblookup();
  $name;
}

sub get_name
{
  dblookup();
}

*get_name = \&dblookup;

if ( my $name = get_name() )