home *** CD-ROM | disk | FTP | other *** search
Wrap
<HTML> <HEAD> <TITLE>Tie::RefHash - use references as hash keys</TITLE> <LINK REL="stylesheet" HREF="../../Active.css" TYPE="text/css"> <LINK REV="made" HREF="mailto:"> </HEAD> <BODY> <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%> <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc"> <STRONG><P CLASS=block> Tie::RefHash - use references as hash keys</P></STRONG> </TD></TR> </TABLE> <A NAME="__index__"></A> <!-- INDEX BEGIN --> <UL> <LI><A HREF="#name">NAME</A></LI><LI><A HREF="#supportedplatforms">SUPPORTED PLATFORMS</A></LI> <LI><A HREF="#synopsis">SYNOPSIS</A></LI> <LI><A HREF="#description">DESCRIPTION</A></LI> <LI><A HREF="#example">EXAMPLE</A></LI> <LI><A HREF="#author">AUTHOR</A></LI> <LI><A HREF="#version">VERSION</A></LI> <LI><A HREF="#see also">SEE ALSO</A></LI> </UL> <!-- INDEX END --> <HR> <P> <H1><A NAME="name">NAME</A></H1> <P>Tie::RefHash - use references as hash keys</P> <P> <HR> <H1><A NAME="supportedplatforms">SUPPORTED PLATFORMS</A></H1> <UL> <LI>Linux</LI> <LI>Solaris</LI> <LI>Windows</LI> </UL> <HR> <H1><A NAME="synopsis">SYNOPSIS</A></H1> <PRE> require 5.004; use Tie::RefHash; tie HASHVARIABLE, 'Tie::RefHash', LIST;</PRE> <PRE> untie HASHVARIABLE;</PRE> <P> <HR> <H1><A NAME="description">DESCRIPTION</A></H1> <P>This module provides the ability to use references as hash keys if you first <A HREF="../../lib/Pod/perlfunc.html#item_tie"><CODE>tie</CODE></A> the hash variable to this module.</P> <P>It is implemented using the standard perl TIEHASH interface. Please see the <A HREF="../../lib/Pod/perlfunc.html#item_tie"><CODE>tie</CODE></A> entry in <CODE>perlfunc(1)</CODE> and <CODE>perltie(1)</CODE> for more information.</P> <P> <HR> <H1><A NAME="example">EXAMPLE</A></H1> <PRE> use Tie::RefHash; tie %h, 'Tie::RefHash'; $a = []; $b = {}; $c = \*main; $d = \"gunk"; $e = sub { 'foo' }; %h = ($a => 1, $b => 2, $c => 3, $d => 4, $e => 5); $a->[0] = 'foo'; $b->{foo} = 'bar'; for (keys %h) { print ref($_), "\n"; }</PRE> <P> <HR> <H1><A NAME="author">AUTHOR</A></H1> <P>Gurusamy Sarathy <A HREF="mailto:gsar@activestate.com">gsar@activestate.com</A></P> <P> <HR> <H1><A NAME="version">VERSION</A></H1> <P>Version 1.21 22 Jun 1999</P> <P> <HR> <H1><A NAME="see also">SEE ALSO</A></H1> <P>perl(1), perlfunc(1), <CODE>perltie(1)</CODE></P> <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%> <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc"> <STRONG><P CLASS=block> Tie::RefHash - use references as hash keys</P></STRONG> </TD></TR> </TABLE> </BODY> </HTML>