home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / zkuste / Perl / ActivePerl-5.6.0.613.msi / 䆊䌷䈹䈙䏵-䞅䞆䞀㡆䞃䄦䠥 / _26bed51e61f66dd845a2d9d039db6d37 < prev    next >
Encoding:
Text File  |  2000-03-23  |  4.3 KB  |  116 lines
  1.  
  2. <HTML>
  3. <HEAD>
  4. <TITLE>Tie::StdScalar - base class definitions for tied scalars</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::StdScalar - base class definitions for tied scalars</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="#more information">MORE INFORMATION</A></LI>
  26. </UL>
  27. <!-- INDEX END -->
  28.  
  29. <HR>
  30. <P>
  31. <H1><A NAME="name">NAME</A></H1>
  32. <P>Tie::Scalar, Tie::StdScalar - base class definitions for tied scalars</P>
  33. <P>
  34. <HR>
  35. <H1><A NAME="supportedplatforms">SUPPORTED PLATFORMS</A></H1>
  36. <UL>
  37. <LI>Linux</LI>
  38. <LI>Solaris</LI>
  39. <LI>Windows</LI>
  40. </UL>
  41. <HR>
  42. <H1><A NAME="synopsis">SYNOPSIS</A></H1>
  43. <PRE>
  44.     package NewScalar;
  45.     require Tie::Scalar;</PRE>
  46. <PRE>
  47.     @ISA = (Tie::Scalar);</PRE>
  48. <PRE>
  49.     sub FETCH { ... }           # Provide a needed method
  50.     sub TIESCALAR { ... }       # Overrides inherited method</PRE>
  51. <PRE>
  52.     package NewStdScalar;
  53.     require Tie::Scalar;</PRE>
  54. <PRE>
  55.     @ISA = (Tie::StdScalar);</PRE>
  56. <PRE>
  57.     # All methods provided by default, so define only what needs be overridden
  58.     sub FETCH { ... }</PRE>
  59. <PRE>
  60.     package main;</PRE>
  61. <PRE>
  62.     tie $new_scalar, 'NewScalar';
  63.     tie $new_std_scalar, 'NewStdScalar';</PRE>
  64. <P>
  65. <HR>
  66. <H1><A NAME="description">DESCRIPTION</A></H1>
  67. <P>This module provides some skeletal methods for scalar-tying classes. See
  68. <A HREF="../../lib/Pod/perltie.html">the perltie manpage</A> for a list of the functions required in tying a scalar to a
  69. package. The basic <STRONG>Tie::Scalar</STRONG> package provides a <CODE>new</CODE> method, as well
  70. as methods <CODE>TIESCALAR</CODE>, <CODE>FETCH</CODE> and <CODE>STORE</CODE>. The <STRONG>Tie::StdScalar</STRONG>
  71. package provides all the methods specified in  <A HREF="../../lib/Pod/perltie.html">the perltie manpage</A>. It inherits from
  72. <STRONG>Tie::Scalar</STRONG> and causes scalars tied to it to behave exactly like the
  73. built-in scalars, allowing for selective overloading of methods. The <CODE>new</CODE>
  74. method is provided as a means of grandfathering, for classes that forget to
  75. provide their own <CODE>TIESCALAR</CODE> method.</P>
  76. <P>For developers wishing to write their own tied-scalar classes, the methods
  77. are summarized below. The <A HREF="../../lib/Pod/perltie.html">the perltie manpage</A> section not only documents these, but
  78. has sample code as well:</P>
  79. <DL>
  80. <DT><STRONG><A NAME="item_TIESCALAR_classname%2C_LIST">TIESCALAR classname, LIST</A></STRONG><BR>
  81. <DD>
  82. The method invoked by the command <CODE>tie $scalar, classname</CODE>. Associates a new
  83. scalar instance with the specified class. <CODE>LIST</CODE> would represent additional
  84. arguments (along the lines of <A HREF="../../lib/AnyDBM_File.html">the AnyDBM_File manpage</A> and compatriots) needed to
  85. complete the association.
  86. <P></P>
  87. <DT><STRONG><A NAME="item_FETCH_this">FETCH this</A></STRONG><BR>
  88. <DD>
  89. Retrieve the value of the tied scalar referenced by <EM>this</EM>.
  90. <P></P>
  91. <DT><STRONG><A NAME="item_STORE_this%2C_value">STORE this, value</A></STRONG><BR>
  92. <DD>
  93. Store data <EM>value</EM> in the tied scalar referenced by <EM>this</EM>.
  94. <P></P>
  95. <DT><STRONG><A NAME="item_DESTROY_this">DESTROY this</A></STRONG><BR>
  96. <DD>
  97. Free the storage associated with the tied scalar referenced by <EM>this</EM>.
  98. This is rarely needed, as Perl manages its memory quite well. But the
  99. option exists, should a class wish to perform specific actions upon the
  100. destruction of an instance.
  101. <P></P></DL>
  102. <P>
  103. <HR>
  104. <H1><A NAME="more information">MORE INFORMATION</A></H1>
  105. <P>The <A HREF="../../lib/Pod/perltie.html">the perltie manpage</A> section uses a good example of tying scalars by associating
  106. process IDs with priority.</P>
  107. <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100%>
  108. <TR><TD CLASS=block VALIGN=MIDDLE WIDTH=100% BGCOLOR="#cccccc">
  109. <STRONG><P CLASS=block> Tie::StdScalar - base class definitions for tied scalars</P></STRONG>
  110. </TD></TR>
  111. </TABLE>
  112.  
  113. </BODY>
  114.  
  115. </HTML>
  116.