home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _98ac72ac5185eafb016a80aefdbefada < prev    next >
Text File  |  2000-03-23  |  3KB  |  97 lines
  1.  
  2. <HTML>
  3. <HEAD>
  4. <TITLE>Tie::RefHash - use references as hash keys</TITLE>
  5. <LINK REL="stylesheet" HREF="../../Active.css" TYPE="text/css">
  6. <LINK REV="made" HREF="mailto:">
  7. </HEAD>
  8.  
  9. <BODY>
  10. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
  11. <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
  12. <STRONG><P CLASS=block> Tie::RefHash - use references as hash keys</P></STRONG>
  13. </TD></TR>
  14. </TABLE>
  15.  
  16. <A NAME="__index__"></A>
  17. <!-- INDEX BEGIN -->
  18.  
  19. <UL>
  20.  
  21.     <LI><A HREF="#name">NAME</A></LI><LI><A HREF="#supportedplatforms">SUPPORTED PLATFORMS</A></LI>
  22.  
  23.     <LI><A HREF="#synopsis">SYNOPSIS</A></LI>
  24.     <LI><A HREF="#description">DESCRIPTION</A></LI>
  25.     <LI><A HREF="#example">EXAMPLE</A></LI>
  26.     <LI><A HREF="#author">AUTHOR</A></LI>
  27.     <LI><A HREF="#version">VERSION</A></LI>
  28.     <LI><A HREF="#see also">SEE ALSO</A></LI>
  29. </UL>
  30. <!-- INDEX END -->
  31.  
  32. <HR>
  33. <P>
  34. <H1><A NAME="name">NAME</A></H1>
  35. <P>Tie::RefHash - use references as hash keys</P>
  36. <P>
  37. <HR>
  38. <H1><A NAME="supportedplatforms">SUPPORTED PLATFORMS</A></H1>
  39. <UL>
  40. <LI>Linux</LI>
  41. <LI>Solaris</LI>
  42. <LI>Windows</LI>
  43. </UL>
  44. <HR>
  45. <H1><A NAME="synopsis">SYNOPSIS</A></H1>
  46. <PRE>
  47.     require 5.004;
  48.     use Tie::RefHash;
  49.     tie HASHVARIABLE, 'Tie::RefHash', LIST;</PRE>
  50. <PRE>
  51.     untie HASHVARIABLE;</PRE>
  52. <P>
  53. <HR>
  54. <H1><A NAME="description">DESCRIPTION</A></H1>
  55. <P>This module provides the ability to use references as hash keys if
  56. you first <A HREF="../../lib/Pod/perlfunc.html#item_tie"><CODE>tie</CODE></A> the hash variable to this module.</P>
  57. <P>It is implemented using the standard perl TIEHASH interface.  Please
  58. 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>
  59. <P>
  60. <HR>
  61. <H1><A NAME="example">EXAMPLE</A></H1>
  62. <PRE>
  63.     use Tie::RefHash;
  64.     tie %h, 'Tie::RefHash';
  65.     $a = [];
  66.     $b = {};
  67.     $c = \*main;
  68.     $d = \"gunk";
  69.     $e = sub { 'foo' };
  70.     %h = ($a => 1, $b => 2, $c => 3, $d => 4, $e => 5);
  71.     $a->[0] = 'foo';
  72.     $b->{foo} = 'bar';
  73.     for (keys %h) {
  74.        print ref($_), "\n";
  75.     }</PRE>
  76. <P>
  77. <HR>
  78. <H1><A NAME="author">AUTHOR</A></H1>
  79. <P>Gurusamy Sarathy        <A HREF="mailto:gsar@activestate.com">gsar@activestate.com</A></P>
  80. <P>
  81. <HR>
  82. <H1><A NAME="version">VERSION</A></H1>
  83. <P>Version 1.21    22 Jun 1999</P>
  84. <P>
  85. <HR>
  86. <H1><A NAME="see also">SEE ALSO</A></H1>
  87. <P>perl(1), perlfunc(1), <CODE>perltie(1)</CODE></P>
  88. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
  89. <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
  90. <STRONG><P CLASS=block> Tie::RefHash - use references as hash keys</P></STRONG>
  91. </TD></TR>
  92. </TABLE>
  93.  
  94. </BODY>
  95.  
  96. </HTML>
  97.