SPUG: each function won't recognize hash deref

Dave Campbell campbell at geospiza.com
Thu Jun 1 13:03:26 CDT 2000


Don't you mean:

while (($key, $value) = each(%$data)) { ??



> The retrieve subroutine of Storable.pm returns a hash ref.  But when I deref
> the return value and pass it to the each function, perl doesn't recognize it
> as a hash:
> 
> $data = retrieve("$sambadir/hitcount.dat");
> while (($key, $value) = each($$data)) {

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
 Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
 For Subscriptions, Email to majordomo at pm.org:  ACTION  spug-list  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email address





More information about the spug-list mailing list