X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=lib%2FCWMP%2FStore%2FHASH.pm;fp=lib%2FCWMP%2FStore%2FHASH.pm;h=bcc503d1459e1895c50a42ec86b9922dd668b9dd;hb=d916499e9a4cc6319d40186f41d70fda24898f84;hp=fed449512a1c963703d5abf157e22aebe6c7e232;hpb=46aa4e29fb2081dcf55f6d9df4134c72b13cd6ee;p=perl-cwmp.git diff --git a/lib/CWMP/Store/HASH.pm b/lib/CWMP/Store/HASH.pm index fed4495..bcc503d 100644 --- a/lib/CWMP/Store/HASH.pm +++ b/lib/CWMP/Store/HASH.pm @@ -108,7 +108,7 @@ sub all_uids { my $self = shift; my $ext = $self->extension; - warn "## extension: $ext"; + #warn "## extension: $ext"; opendir(my $d, $path) || die "can't opendir $path: $!"; my @uids = grep { $_ =~ m/\Q$ext\E$/ && -f "$path/$_" } readdir($d);