Perl: zuviel return?

[Siechfred]

Tag opi.

ich habe hier zwei Subs, bei denen ich mir nicht so sicher bin...
Für welchen würdet Ihr euch entscheiden? Oder gar einen völlig anderen schreiben?

Ich bin im Moment zu müde, um den Code zu durchforsten, aber du solltest dir überlegen, was genau deine Funktion zurückgeben soll, also was im Erfolgsfall und was im Misserfolgsfall. Das Thema scheint mir schon richtig gewählt: es gibt irgendwie zu viele returns in den Funktionen. So ins Unreine getippt:

use CGI qw/:standard/;  
  
function is_cookie {  
  my $cn = shift;  
  my %values = cookie($cn);  
  # teste $values{'id'};  
  return $un;  
}

Siechfred