NAME<\/a> IO::Scalar \u2212 IO:: interface for reading\/writing a scalar<\/p>\n Perform I\/O on strings, using the basic OO<\/small> interface…<\/p>\n use 5.005; Don\u2019t like OO<\/small> for your I\/O? No problem. Thanks to the magic of an invisible tie()<\/b>, the following now works out of the box, just as it does with IO::Handle:<\/p>\n use 5.005; And for you folks with 1.x code out there: the old tie()<\/b> style still works, though this is unnecessary and deprecated<\/i>:<\/p>\n use IO::Scalar; Stringification works, too!<\/p>\n my $SH = new IO::Scalar $data; This class is part of the IO::Stringy distribution; see IO::Stringy for change log and general information.<\/p>\n The IO::Scalar class implements objects which behave just like IO::Handle (or FileHandle) objects, except that you may use them to write to (or read from) scalars. These handles are automatically “tiehandle”d (though please see ” WARNINGS”<\/small> for information relevant to your Perl version).<\/p>\n Basically, this:<\/p>\n my $s; Or this:<\/p>\n my $s; Causes $s to be set to:<\/p>\n “Hello, world!n”<\/p>\n Construction<\/b> Class method.<\/i> Return a new, unattached scalar handle. If any arguments are given, they\u2019re sent to open()<\/b>.<\/p>\n open [ SCALARREF<\/small> ]<\/p>\n Instance method.<\/i> Open the scalar handle on a new scalar, pointed to by SCALARREF.<\/small> If no SCALARREF<\/small> is given, a “private” scalar is created to hold the file data.<\/p>\n Returns the self object on success, undefined on error.<\/p>\n opened<\/p>\n Instance method.<\/i> Is the scalar handle opened on something?<\/p>\n close<\/p>\n Instance method.<\/i> Disassociate the scalar handle from its underlying scalar. Done automatically on destroy.<\/p>\n Input and output<\/b> Instance method.<\/i> No-op, provided for OO<\/small> compatibility.<\/p>\n fileno<\/p>\n Instance method.<\/i> No-op, returns undef<\/p>\n getc<\/p>\n Instance method.<\/i> Return the next character, or undef if none remain.<\/p>\n getline<\/p>\n Instance method.<\/i> Return the next line, or undef on end of string. Can safely be called in an array context. Currently, lines are delimited by “n”.<\/p>\n getlines<\/p>\n Instance method.<\/i> Get all remaining lines. It will croak()<\/b> if accidentally called in a scalar context.<\/p>\n print ARGS…<\/small><\/p>\n Instance method.<\/i> Print ARGS<\/small> to the underlying scalar.<\/p>\n Warning:<\/b> this continues to always cause a seek to the end of the string, but if you perform seek()<\/b>s and tell()<\/b>s, it is still safer to explicitly seek-to-end before subsequent print()<\/b>s.<\/p>\n read BUF, NBYTES,<\/small> [ OFFSET<\/small> ]<\/p>\n Instance method.<\/i> Read some bytes from the scalar. Returns the number of bytes actually read, 0 on end-of-file, undef on error.<\/p>\n write BUF, NBYTES,<\/small> [ OFFSET<\/small> ]<\/p>\n Instance method.<\/i> Write some bytes to the scalar.<\/p>\n sysread BUF, LEN,<\/small> [ OFFSET<\/small> ]<\/p>\n Instance method.<\/i> Read some bytes from the scalar. Returns the number of bytes actually read, 0 on end-of-file, undef on error.<\/p>\n syswrite BUF, NBYTES,<\/small> [ OFFSET<\/small> ]<\/p>\n Instance method.<\/i> Write some bytes to the scalar.<\/p>\n Seeking\/telling and other attributes<\/b> Instance method.<\/i> No-op, provided for OO<\/small> compatibility.<\/p>\n binmode<\/p>\n Instance method.<\/i> No-op, provided for OO<\/small> compatibility.<\/p>\n clearerr<\/p>\n Instance method.<\/i> Clear the error and EOF<\/small> flags. A no-op.<\/p>\n eof<\/p>\n<\/td>\n Instance method.<\/i> Are we at end of file?<\/p>\n<\/td>\n seek OFFSET, WHENCE<\/small><\/p>\n Instance method.<\/i> Seek to a given position in the stream.<\/p>\n sysseek OFFSET, WHENCE<\/small><\/p>\n Instance method.<\/i> Identical to “seek OFFSET, WHENCE”, q.v.<\/i><\/p>\n tell<\/p>\n Instance method.<\/i> Return the current position in the stream, as a numeric offset.<\/p>\n setpos POS<\/small><\/p>\n Instance method.<\/i> Set the current position, using the opaque value returned by “getpos()”.<\/p>\n getpos<\/p>\n Instance method.<\/i> Return the current position in the string, as an opaque object.<\/p>\n sref<\/p>\n Instance method.<\/i> Return a reference to the underlying scalar.<\/p>\n Eryq (eryq@zeegee.com<\/i>). President, ZeeGee Software Inc (http:\/\/www.zeegee.com<\/i>).<\/p>\n
SYNOPSIS<\/a>
DESCRIPTION<\/a>
PUBLIC INTERFACE<\/a>
AUTHOR<\/a>
CONTRIBUTORS<\/a>
COPYRIGHT & LICENSE<\/a> <\/p>\n
\nNAME <\/a> <\/h2>\n
SYNOPSIS <\/a> <\/h2>\n
use IO::Scalar;
$data = “My message:n”;
### Open a handle on a string, and append to it:
$SH = new IO::Scalar $data;
$SH\u2212>print(“Hello”);
$SH\u2212>print(“, world!nBye now!n”);
print “The string is now: “, $data, “n”;
### Open a handle on a string, read it line\u2212by\u2212line, then close it:
$SH = new IO::Scalar $data;
while (defined($_ = $SH\u2212>getline)) {
print “Got line: $_”;
}
$SH\u2212>close;
### Open a handle on a string, and slurp in all the lines:
$SH = new IO::Scalar $data;
print “All lines:n”, $SH\u2212>getlines;
### Get the current position (either of two ways):
$pos = $SH\u2212>getpos;
$offset = $SH\u2212>tell;
### Set the current position (either of two ways):
$SH\u2212>setpos($pos);
$SH\u2212>seek($offset, 0);
### Open an anonymous temporary scalar:
$SH = new IO::Scalar;
$SH\u2212>print(“Hi there!”);
print “I printed: “, ${$SH\u2212>sref}, “n”; ### get at value<\/p>\n
use IO::Scalar;
$data = “My message:n”;
### Open a handle on a string, and append to it:
$SH = new IO::Scalar $data;
print $SH “Hello”;
print $SH “, world!nBye now!n”;
print “The string is now: “, $data, “n”;
### Open a handle on a string, read it line\u2212by\u2212line, then close it:
$SH = new IO::Scalar $data;
while (<$SH>) {
print “Got line: $_”;
}
close $SH;
### Open a handle on a string, and slurp in all the lines:
$SH = new IO::Scalar $data;
print “All lines:n”, <$SH>;
### Get the current position (WARNING: requires 5.6):
$offset = tell $SH;
### Set the current position (WARNING: requires 5.6):
seek $SH, $offset, 0;
### Open an anonymous temporary scalar:
$SH = new IO::Scalar;
print $SH “Hi there!”;
print “I printed: “, ${$SH\u2212>sref}, “n”; ### get at value<\/p>\n
### Writing to a scalar…
my $s;
tie *OUT, ‘IO::Scalar’, $s;
print OUT “line 1nline 2n”, “line 3n”;
print “String is now: $sn”
### Reading and writing an anonymous scalar…
tie *OUT, ‘IO::Scalar’;
print OUT “line 1nline 2n”, “line 3n”;
tied(OUT)\u2212>seek(0,0);
while (
print “Got line: “, $_;
}<\/p>\n
print $SH “Hello, “;
print $SH “world!”;
print “I printed: $SHn”;<\/p>\nDESCRIPTION <\/a> <\/h2>\n
$SH = new IO::Scalar $s;
$SH\u2212>print(“Hel”, “lo, “); ### OO style
$SH\u2212>print(“world!n”); ### ditto<\/p>\n
$SH = tie *OUT, ‘IO::Scalar’, $s;
print OUT “Hel”, “lo, “; ### non\u2212OO style
print OUT “world!n”; ### ditto<\/p>\nPUBLIC INTERFACE <\/a> <\/h2>\n
new [ ARGS…<\/small> ]<\/p>\n
flush<\/p>\n
autoflush<\/p>\n\n
\n <\/td>\n \n <\/td>\n \n <\/td>\n<\/tr>\n<\/table>\n AUTHOR <\/a> <\/h2>\n
CONTRIBUTORS <\/a> <\/h2>\n