I/o on in-core objects like strings and arrays
IO::
::AtomicFile adpO Write a file which is updated atomically ERYQ
::Lines bdpO I/O handle to read/write to array of lines ERYQ
::Scalar RdpO I/O handle to read/write to a string ERYQ
::ScalarArray RdpO I/O handle to read/write to array of scalars ERYQ
::Wrap RdpO Wrap old-style FHs in standard OO interface ERYQ
::WrapTie adpO Tie your handles & retain full OO interface ERYQ
This toolkit primarily provides modules for performing both traditional and object-oriented i/o) on things other than normal filehandles; in particular, IO::Scalar, IO::ScalarArray, and IO::Lines.
In the more-traditional IO::Handle front, we have IO::AtomicFile which may be used to painlessly create files which are updated atomically.
And in the \*(L"this-may-prove-useful\*(R" corner, we have IO::Wrap, whose exported wraphandle() function will clothe anything that's not a blessed object in an IO::Handle-like wrapper... so you can just use \s-1OO\s0 syntax and stop worrying about whether your function's caller handed you a string, a globref, or a FileHandle.
Perl's \s-1TIEHANDLE\s0 spec was incomplete prior to 5.005_57; it was missing support for \*(C`seek()\*(C', \*(C`tell()\*(C', and \*(C`eof()\*(C'. Attempting to use these functions with an IO::Scalar, IO::ScalarArray, IO::Lines, etc. will not work prior to 5.005_57. None of the relevant methods will be invoked by Perl; and even worse, this kind of bug can lie dormant for a while. If you turn warnings on (via $^W or \*(C`perl -w\*(C'), and you see something like this...
seek() on unopened file
...then you are probably trying to use one of these functions on one of our \s-1IO::\s0 classes with an old Perl. The remedy is to simply use the \s-1OO\s0 version; e.g.:
$SH->seek(0,0); ### GOOD: will work on any 5.005 seek($SH,0,0); ### WARNING: will only work on 5.005_57 and beyond
As of version 2.x, this toolkit requires Perl 5.005 for the IO::Handle subclasses, and 5.005_57 or better is strongly recommended. See \*(L"\s-1WARNINGS\s0\*(R" for details.
Most of you already know the drill...
perl Makefile.PL make make test make install
For everyone else out there... if you've never installed Perl code before, or you're trying to use this in an environment where your sysadmin or \s-1ISP\s0 won't let you do interesting things, relax: since this module contains no binary extensions, you can cheat. That means copying the directory tree under my \*(L"./lib\*(R" directory into someplace where your script can \*(L"see\*(R" it. For example, under Linux:
cp -r IO-stringy-1.234/lib/* /path/to/my/perl/
Now, in your Perl code, do this:
use lib "/path/to/my/perl"; use IO::Scalar; ### or whatever
Ok, now you've been told. At this point, anyone who whines about not being given enough information gets an unflattering haiku written about them in the next change log. I'll do it. Don't think I won't.
$Id: Stringy.pm,v 1.3 2005/02/10 21:24:05 dfs Exp $
Graham Barr submitted this patch half a year ago; Like a moron, I lost his message under a ton of others, and only now have the experimental implementation done. Will the sudden sensitivity to $/ hose anyone out there? I'm worried, so you have to enable it explicitly in 1.x. It will be on by default in 2.x, though only IO::Scalar has been implemented.
It's not needed. Backwards compatibility could be maintained by having new_tie() be identical to new(). Heck, I'll bet that IO::WrapTie should be reimplemented so the returned object is just like an IO::Scalar in its use of globrefs.
Maintainership taken over by \s-1DSKOLL\s0 <[email protected]> Closed the following bugs at https://rt.cpan.org/NoAuth/Bugs.html?Dist=IO-stringy:
2208 IO::ScalarArray->getline does not return undef for \s-1EOF\s0 if undef($/)
7132 IO-stringy/Makefile.PL bug - name should be module name
11249 IO::Scalar flush shouldn't return undef
2172 $\ (output record separator) not respected
8605 IO::InnerFile::seek() should return 1 on success
4798 *.html in lib/
4369 Improvement: handling of fixed-size reads in IO::Scalar (Actually, bug 4369 was closed in Version 2.109)
IO::Scalar::getline now works with ref to int. Thanks to Dominique Quatravaux for this patch.
The terms-of-use have been placed in the distribution file \*(L"\s-1COPYING\s0\*(R". Also, small documentation tweaks were made.
Added support for various seek() whences to IO::ScalarArray. Added support for consulting $/ in IO::Scalar and IO::ScalarArray. The old \*(C`use_RS()\*(C' is not even an option. Unsupported record separators will cause a croak(). Added a lot of regression tests to supoprt the above. Better on-line docs (hyperlinks to individual functions).
After sober consideration I have reimplemented IO::Scalar::print() so that it once again always seeks to the end of the string. Benchmarks show the new implementation to be just as fast as Juergen's contributed patch; until someone can convince me otherwise, the current, safer implementation stays. I thought more about giving IO::Scalar two separate handles, one for reading and one for writing, as suggested by Binkley. His points about what tell() and eof() return are, I think, show-stoppers for this feature. Even the manpages for stdio's fseek() seem to imply a single file position indicator, not two. So I think I will take this off the \s-1TO\s0 \s-1DO\s0 list. Remedy: you can always have two handles open on the same scalar, one which you only write to, and one which you only read from. That should give the same effect.
Alpha release. This is the initial release of the \*(L"IO::Scalar and friends are now subclasses of IO::Handle\*(R". I'm flinging it against the wall. Please tell me if the banana sticks. When it does, the banana will be called 2.2x. First off, many many thanks to Doug Wilson, who has provided an invaluable service by patching IO::Scalar and friends so that they (1) inherit from IO::Handle, (2) automatically tie themselves so that the \*(C`new()\*(C' objects can be used in native i/o constructs, and (3) doing it so that the whole damn thing passes its regression tests. As Doug knows, my globref Kung-Fu was not up to the task; he graciously provided the patches. This has earned him a seat at the Co-Authors table, and the right to have me address him as sensei. Performance of IO::Scalar::print() has been improved by as much as 2x for lots of little prints, with the cost of forcing those who print-then-seek-then-print to explicitly seek to end-of-string before printing again. Thanks to Juergen Zeller for this patch. Added the \s-1COPYING\s0 file, which had been missing from prior versions. Thanks to Albert Chin-A-Young for pointing this out. IO::Scalar consults $/ by default (1.x ignored it by default). Yes, I still need to support IO::ScalarArray.
I threatened in \*(L"\s-1INSTALLATION\s0\*(R" to write an unflattering haiku about anyone who whined that I gave them insufficient information... but it turns out that I left out a crucial direction. D'\s-1OH\s0! Thanks to David Beroff for the \*(L"patch\*(R" and the haiku... Enough info there? Here's unflattering haiku: Forgot the line, "make"! ;-)
Added untested \s-1SEEK\s0, \s-1TELL\s0, and \s-1EOF\s0 methods to IO::Scalar and IO::ScalarArray to support corresponding functions for tied filehandles: untested, because I'm still running 5.00556 and Perl is complaining about \*(L"tell() on unopened file\*(R". Thanks to Graham Barr for the suggestion. Removed not-fully-blank lines from modules; these were causing lots of POD-related warnings. Thanks to Nicolas Joly for the suggestion.
IO::Scalar objects can now be made sensitive to $/ . Pains were taken to keep the fast code fast while adding this feature. Cheers to Graham Barr for submitting his patch; jeers to me for losing his email for 6 months.
IO::Scalar has a new sysseek() method. Thanks again to Richard Jones. New \*(L"\s-1TO\s0 \s-1DO\s0\*(R" section, because people who submit patches/ideas should at least know that they're in the system... and that I won't lose their stuff. Please read it. New entries in \*(L"\s-1AUTHOR\s0\*(R". Please read those too.
IO::Scalar and IO::ScalarArray now inherit from IO::Handle. I thought I'd remembered a problem with this ages ago, related to the fact that these \s-1IO::\s0 modules don't have \*(L"real\*(R" filehandles, but the problem apparently isn't surfacing now. If you suddenly encounter Perl warnings during global destruction (especially if you're using tied filehandles), then please let me know! Thanks to B. K. Oxley (binkley) for this. Nasty bug fixed in IO::Scalar::write(). Apparently, the offset and the number-of-bytes arguments were, for all practical purposes, reversed. You were okay if you did all your writing with print(), but boy was this a stupid bug! Thanks to Richard Jones for finding this one. For you, Rich, a double-length haiku: Newspaper headline typeset by dyslexic man loses urgency
BABY EATS FISH is simply not equivalent to FISH EATS BABY New sysread and syswrite methods for IO::Scalar. Thanks again to Richard Jones for this.
Added 'bool' overload to '""' overload, so object always evaluates to true. (Whew. Glad I caught this before it went to \s-1CPAN\s0.)
Evaluating an IO::Scalar in a string context now yields the underlying string. Thanks to B. K. Oxley (binkley) for this.
Minor documentation fixes.
Fixed IO::InnerFile incompatibility with Perl5.004. Thanks to many folks for reporting this.
Added flush() and other no-op methods. Thanks to Doru Petrescu for suggesting this.
Small bug fixes.
Incorporated a number of contributed patches and extensions, mostly related to speed hacks, support for \*(L"offset\*(R", and \s-1WRITE/CLOSE\s0 methods. Thanks to Richard Jones, Doru Petrescu, and many others.
Added creation of ./testout when Makefile.PL is run.
Verified for Perl5.005.
New IO::WrapTie and IO::AtomicFile added.
Added IO::WrapTie.
Added IO::Lines, and made some bug fixes to IO::ScalarArray. Also, added getc().
No real changes; just upgraded IO::Wrap to have a $VERSION string.
David F. Skoll ([email protected]).
Eryq ([email protected]). President, ZeeGee Software Inc (http://www.zeegee.com).
For all their bug reports and patch submissions, the following are officially recognized: Richard Jones B. K. Oxley (binkley) Doru Petrescu Doug Wilson (for picking up the ball I dropped, and doing tie() right)
Go to http://www.zeegee.com for the latest downloads and on-line documentation for this module.
Enjoy. Yell if it breaks.