my $dir = $self->storage_dir;
   ...
   my @files = map {
            scalar( s/\.$extension//, basename $_)
        } glob("$dir/*.$extension");