diff options
Diffstat (limited to 'Spline/Srs.pm')
-rw-r--r-- | Spline/Srs.pm | 22 |
1 files changed, 7 insertions, 15 deletions
diff --git a/Spline/Srs.pm b/Spline/Srs.pm index 597e3ed..ed83bac 100644 --- a/Spline/Srs.pm +++ b/Spline/Srs.pm @@ -99,15 +99,12 @@ sub reverse($) { my $err = $@; if ($err) { - if ($err =~ m/Invalid hash/) { - my $fallback = replace_srsalt_chars($addr); - return $self->{srs}->reverse($fallback); - } - - die $err; + die $err unless $err =~ m/Invalid hash/; + $addr = replace_srsalt_chars($addr); + } + else { + return $result; } - - return $result; } return $self->{srs}->reverse($addr); @@ -125,15 +122,10 @@ sub handle($$) { $result = $self->reverse($key); } else { - return "PERM Invalid request"; + die 'Invalid request'; } - if (!defined($result)) { - return 'NOTFOUND '; - } - else { - return 'OK ' . $result; - } + return $result; } 1; |