string.html
来自「perl教程」· HTML 代码 · 共 183 行
HTML
183 行
<?xml version="1.0" ?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<!-- saved from url=(0017)http://localhost/ -->
<script language="JavaScript" src="../../displayToc.js"></script>
<script language="JavaScript" src="../../tocParas.js"></script>
<script language="JavaScript" src="../../tocTab.js"></script>
<link rel="stylesheet" type="text/css" href="../../scineplex.css">
<title>IO::String - Emulate file interface for in-core strings</title>
<link rel="stylesheet" href="../../Active.css" type="text/css" />
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<link rev="made" href="mailto:" />
</head>
<body>
<script>writelinks('__top__',2);</script>
<h1><a>IO::String - Emulate file interface for in-core strings</a></h1>
<p><a name="__index__"></a></p>
<!-- INDEX BEGIN -->
<ul>
<li><a href="#name">NAME</a></li>
<li><a href="#synopsis">SYNOPSIS</a></li>
<li><a href="#description">DESCRIPTION</a></li>
<li><a href="#bugs">BUGS</a></li>
<li><a href="#see_also">SEE ALSO</a></li>
<li><a href="#copyright">COPYRIGHT</a></li>
</ul>
<!-- INDEX END -->
<hr />
<p>
</p>
<h1><a name="name">NAME</a></h1>
<p>IO::String - Emulate file interface for in-core strings</p>
<p>
</p>
<hr />
<h1><a name="synopsis">SYNOPSIS</a></h1>
<pre>
<span class="keyword">use</span> <span class="variable">IO::String</span><span class="operator">;</span>
<span class="variable">$io</span> <span class="operator">=</span> <span class="variable">IO::String</span><span class="operator">-></span><span class="variable">new</span><span class="operator">;</span>
<span class="variable">$io</span> <span class="operator">=</span> <span class="variable">IO::String</span><span class="operator">-></span><span class="variable">new</span><span class="operator">(</span><span class="variable">$var</span><span class="operator">);</span>
<span class="keyword">tie</span> <span class="variable">*IO</span><span class="operator">,</span> <span class="string">'IO::String'</span><span class="operator">;</span>
</pre>
<pre>
<span class="comment"># read data</span>
<span class="operator"><</span><span class="variable">$io</span><span class="operator">>;</span>
<span class="variable">$io</span><span class="operator">-></span><span class="variable">getline</span><span class="operator">;</span>
<span class="keyword">read</span><span class="operator">(</span><span class="variable">$io</span><span class="operator">,</span> <span class="variable">$buf</span><span class="operator">,</span> <span class="number">100</span><span class="operator">);</span>
</pre>
<pre>
<span class="comment"># write data</span>
<span class="keyword">print</span> <span class="variable">$io</span> <span class="string">"string\n"</span><span class="operator">;</span>
<span class="variable">$io</span><span class="operator">-></span><span class="keyword">print</span><span class="operator">(</span><span class="variable">@data</span><span class="operator">);</span>
<span class="keyword">syswrite</span><span class="operator">(</span><span class="variable">$io</span><span class="operator">,</span> <span class="variable">$buf</span><span class="operator">,</span> <span class="number">100</span><span class="operator">);</span>
</pre>
<pre>
<span class="keyword">select</span> <span class="variable">$io</span><span class="operator">;</span>
<span class="keyword">printf</span> <span class="string">"Some text %s\n"</span><span class="operator">,</span> <span class="variable">$str</span><span class="operator">;</span>
</pre>
<pre>
<span class="comment"># seek</span>
<span class="variable">$pos</span> <span class="operator">=</span> <span class="variable">$io</span><span class="operator">-></span><span class="variable">getpos</span><span class="operator">;</span>
<span class="variable">$io</span><span class="operator">-></span><span class="variable">setpos</span><span class="operator">(</span><span class="number">0</span><span class="operator">);</span> <span class="comment"># rewind</span>
<span class="variable">$io</span><span class="operator">-></span><span class="keyword">seek</span><span class="operator">(-</span><span class="number">30</span><span class="operator">,</span> <span class="operator">-</span><span class="number">1</span><span class="operator">);</span>
<span class="keyword">seek</span><span class="operator">(</span><span class="variable">$io</span><span class="operator">,</span> <span class="number">0</span><span class="operator">,</span> <span class="number">0</span><span class="operator">);</span>
</pre>
<p>
</p>
<hr />
<h1><a name="description">DESCRIPTION</a></h1>
<p>The <code>IO::String</code> module provides the <code>IO::File</code> interface for in-core
strings. An <code>IO::String</code> object can be attached to a string, and
makes it possible to use the normal file operations for reading or
writing data, as well as for seeking to various locations of the string.
This is useful when you want to use a library module that only
provides an interface to file handles on data that you have in a string
variable.</p>
<p>Note that perl-5.8 and better has built-in support for "in memory"
files, which are set up by passing a reference instead of a filename
to the <a href="#item_open"><code>open()</code></a> call. The reason for using this module is that it
makes the code backwards compatible with older versions of Perl.</p>
<p>The <code>IO::String</code> module provides an interface compatible with
<code>IO::File</code> as distributed with <em>IO-1.20</em>, but the following methods
are not available: new_from_fd, fdopen, format_write,
format_page_number, format_lines_per_page, format_lines_left,
format_name, format_top_name.</p>
<p>The following methods are specific to the <code>IO::String</code> class:</p>
<dl>
<dt><strong><a name="item_new">$io = IO::String->new</a></strong>
<dt><strong>$io = IO::String->new( $string )</strong>
<dd>
<p>The constructor returns a newly-created <code>IO::String</code> object. It
takes an optional argument, which is the string to read from or write
into. If no $string argument is given, then an internal buffer
(initially empty) is allocated.</p>
</dd>
<dd>
<p>The <code>IO::String</code> object returned is tied to itself. This means
that you can use most Perl I/O built-ins on it too: readline, <>, getc,
print, printf, syswrite, sysread, close.</p>
</dd>
</li>
<dt><strong><a name="item_open">$io->open</a></strong>
<dt><strong>$io->open( $string )</strong>
<dd>
<p>Attaches an existing IO::String object to some other $string, or
allocates a new internal buffer (if no argument is given). The
position is reset to 0.</p>
</dd>
</li>
<dt><strong><a name="item_string_ref">$io->string_ref</a></strong>
<dd>
<p>Returns a reference to the string that is attached to
the <code>IO::String</code> object. Most useful when you let the <code>IO::String</code>
create an internal buffer to write into.</p>
</dd>
</li>
<dt><strong><a name="item_pad">$io->pad</a></strong>
<dt><strong>$io->pad( $char )</strong>
<dd>
<p>Specifies the padding to use if
the string is extended by either the <a href="../../lib/Pod/perlfunc.html#item_seek"><code>seek()</code></a> or <a href="../../lib/Pod/perlfunc.html#item_truncate"><code>truncate()</code></a> methods. It
is a single character and defaults to "\0".</p>
</dd>
</li>
<dt><strong><a name="item_pos">$io->pos</a></strong>
<dt><strong>$io->pos( $newpos )</strong>
<dd>
<p>Yet another interface for reading and setting the current read/write
position within the string (the normal getpos/setpos/tell/seek
methods are also available). The <a href="#item_pos"><code>pos()</code></a> method always returns the
old position, and if you pass it an argument it sets the new
position.</p>
</dd>
<dd>
<p>There is (deliberately) a difference between the <code>setpos()</code> and <a href="../../lib/Pod/perlfunc.html#item_seek"><code>seek()</code></a>
methods in that <a href="../../lib/Pod/perlfunc.html#item_seek"><code>seek()</code></a> extends the string (with the specified
padding) if you go to a location past the end, whereas <code>setpos()</code>
just snaps back to the end. If <a href="../../lib/Pod/perlfunc.html#item_truncate"><code>truncate()</code></a> is used to extend the string,
then it works as seek().</p>
</dd>
</li>
</dl>
<p>
</p>
<hr />
<h1><a name="bugs">BUGS</a></h1>
<p>In Perl versions < 5.6, the TIEHANDLE interface was incomplete.
If you use such a Perl, then seek(), tell(), eof(), fileno(), <a href="../../lib/Pod/perlfunc.html#item_binmode"><code>binmode()</code></a> will
not do anything on an <code>IO::String</code> handle. See <a href="../../lib/Pod/perltie.html">the perltie manpage</a> for
details.</p>
<p>
</p>
<hr />
<h1><a name="see_also">SEE ALSO</a></h1>
<p><a href="../../lib/IO/File.html">the IO::File manpage</a>, <a href="../../IO/Stringy.html">the IO::Stringy manpage</a>, <a href="../../lib/Pod/perlfunc.html#open">open in the perlfunc manpage</a></p>
<p>
</p>
<hr />
<h1><a name="copyright">COPYRIGHT</a></h1>
<p>Copyright 1998-2005 Gisle Aas.</p>
<p>This library is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.</p>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?