sub name {
   my $arg = ref $_[0] ? $_[0] : \do{my $anon = $_[0]};

   # Do stuff.
   $$arg =~ s/^un//;

   return $$arg;
}