diff -Nur CGI-Persistent-1.11.old/lib/CGI/Persistent.pm CGI-Persistent-1.11/lib/CGI/Persistent.pm
--- CGI-Persistent-1.11.old/lib/CGI/Persistent.pm	2008-07-05 15:21:00.000000000 -0400
+++ CGI-Persistent-1.11/lib/CGI/Persistent.pm	2025-01-15 22:47:47.621534307 -0500
@@ -64,7 +64,7 @@
 sub delete { 
   
     my ( $self, $param ) = @_; 
-    my $fn = join "/", ($self->{sessiondir},$self->param( '.id' )); 
+    my $fn = join "/", ($self->{sessiondir},scalar $self->param( '.id' )); 
     my $po = new Persistence::Object::Simple __Fn => $fn; 
     delete $po->{ $param }; $po->commit ();  
     $self->SUPER::delete ( $param ); # delete, is like, overloaded. 
@@ -74,7 +74,7 @@
 sub delete_all { 
 
     my ( $self ) = shift; 
-    $fn = join "/", ($self->{sessiondir},$self->param( '.id' )); 
+    $fn = join "/", ($self->{sessiondir},scalar $self->param( '.id' )); 
     my $po = new Persistence::Object::Simple __Fn => $fn; 
     $po->expire; 
     $self->SUPER::delete_all ();