sub name {
   our $arg;
   local *arg = defined wantarray ? \do{my $anon = $_[0]} : \$_[0];

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

   return $arg;
}