Skip to content

Commit 465eba1

Browse files
EryqOuithaqueueschwern
authored andcommitted
import IO-stringy 2.108 from CPAN
git-cpan-module: IO-stringy git-cpan-version: 2.108 git-cpan-authorid: ERYQ git-cpan-file: authors/id/E/ER/ERYQ/IO-stringy-2.108.tar.gz
1 parent 549fc35 commit 465eba1

22 files changed

+665
-30
lines changed

COPYING

+1
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
The "IO-stringy" Perl5 toolkit.
2+
23
Copyright (c) 1996 by Eryq. All rights reserved.
34
Copyright (c) 1999,2001 by ZeeGee Software Inc. All rights reserved.
45

MANIFEST

+8
Original file line numberDiff line numberDiff line change
@@ -3,6 +3,7 @@ MANIFEST
33
Makefile.PL
44
README
55
README.system
6+
contrib/Clever.pm
67
docs/IO/AtomicFile.pm.html
78
docs/IO/InnerFile.pm.html
89
docs/IO/Lines.pm.html
@@ -13,7 +14,13 @@ docs/IO/Wrap.pm.html
1314
docs/IO/WrapTie.pm.html
1415
docs/IO/icons/h1bullet.gif
1516
docs/IO/icons/h2bullet.gif
17+
docs/IO/icons/itembullet.gif
1618
docs/IO/icons/zeegee.gif
19+
docs/IO_Scalar_synopsis.html
20+
docs/icons/h1bullet.gif
21+
docs/icons/h2bullet.gif
22+
docs/icons/itembullet.gif
23+
docs/icons/zeegee.gif
1724
docs/index-menu.html
1825
docs/index.html
1926
docs/index.menu
@@ -22,6 +29,7 @@ lib/IO/AtomicFile.pm
2229
lib/IO/InnerFile.pm
2330
lib/IO/Lines.pm
2431
lib/IO/Scalar.pm
32+
lib/IO/Scalar.pm.html
2533
lib/IO/ScalarArray.pm
2634
lib/IO/Stringy.pm
2735
lib/IO/Wrap.pm

README

+8-1
Original file line numberDiff line numberDiff line change
@@ -77,7 +77,7 @@ INSTALLATION
7777
them in the next change log. I'll do it. Don't think I won't.
7878

7979
VERSION
80-
$Id: Stringy.pm,v 2.106 2001/08/17 01:57:46 eryq Exp $
80+
$Id: Stringy.pm,v 2.108 2001/08/20 20:36:15 eryq Exp $
8181

8282
TO DO
8383
(2000/08/02) Finalize $/ support
@@ -117,6 +117,10 @@ TO DO
117117
like an IO::Scalar in its use of globrefs.
118118

119119
CHANGE LOG
120+
Version 2.108 (2001/08/20)
121+
The terms-of-use have been placed in the distribution file
122+
"COPYING". Also, small documentation tweaks were made.
123+
120124
Version 2.105 (2001/08/09)
121125
Added support for various seek() whences to IO::ScalarArray.
122126

@@ -294,5 +298,8 @@ AUTHOR
294298
Doru Petrescu
295299
Doug Wilson (for picking up the ball I dropped, and doing tie() right)
296300

301+
Go to http://www.zeegee.com for the latest downloads and on-line
302+
documentation for this module.
303+
297304
Enjoy. Yell if it breaks.
298305

README.system

+1-1
Original file line numberDiff line numberDiff line change
@@ -5,4 +5,4 @@ DEVELOPMENT PERL:
55
This is perl, version 5.005_56 built for i586-linux
66

77
DEVELOPMENT DATE:
8-
Fri Aug 17 10:39:43 EDT 2001
8+
Mon Aug 20 16:37:15 EDT 2001

contrib/Clever.pm

+36
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,36 @@
1+
package IO::Clever;
2+
require 5.005_03;
3+
use strict;
4+
use vars qw($VERSION @ISA);
5+
@ISA = qw(IO::String);
6+
$VERSION = "1.01";
7+
8+
# ChangeLog:
9+
# 1999-07-21-02:06:47 Uri Guttman told me a critical fix:
10+
# $fp->input_record_separator is _Global_; local($/) is safer
11+
12+
my(%params);
13+
14+
sub new {
15+
my $class = shift;
16+
return IO::File->new(@_) unless $_[0] =~ /^>/;
17+
my $self = bless IO::String->new(), ref($class) || $class;
18+
$params{$self} = [ @_ ];
19+
$self;
20+
}
21+
22+
sub DESTROY {
23+
my($self) = @_;
24+
my $filename = $params{$self}->[0];
25+
return unless $filename =~ s/^>//;
26+
my($new) = ${$self->string_ref};
27+
if (-f $filename) {
28+
my $fp = IO::File->new("<$filename") || die "$0: $filename: $!\n";
29+
local ($/);
30+
return if $new eq $fp->getline;
31+
}
32+
IO::File->new(@{$params{$self}})->print($new);
33+
delete $params{$self};
34+
}
35+
36+
1;

docs/IO/AtomicFile.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -99,7 +99,7 @@
9999

100100
<P><HR>
101101
<ADDRESS><FONT SIZE=-1>
102-
Generated Fri Aug 17 10:39:08 2001 by cvu_pod2html
102+
Generated Mon Aug 20 16:36:30 2001 by cvu_pod2html
103103
</FONT></ADDRESS>
104104
</FONT></BODY>
105105
</HTML>

docs/IO/InnerFile.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -151,7 +151,7 @@
151151

152152
<P><HR>
153153
<ADDRESS><FONT SIZE=-1>
154-
Generated Fri Aug 17 10:39:13 2001 by cvu_pod2html
154+
Generated Mon Aug 20 16:36:32 2001 by cvu_pod2html
155155
</FONT></ADDRESS>
156156
</FONT></BODY>
157157
</HTML>

docs/IO/Lines.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -103,7 +103,7 @@
103103

104104
<P><HR>
105105
<ADDRESS><FONT SIZE=-1>
106-
Generated Fri Aug 17 10:39:17 2001 by cvu_pod2html
106+
Generated Mon Aug 20 16:36:35 2001 by cvu_pod2html
107107
</FONT></ADDRESS>
108108
</FONT></BODY>
109109
</HTML>

docs/IO/Scalar.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -495,7 +495,7 @@
495495

496496
<P><HR>
497497
<ADDRESS><FONT SIZE=-1>
498-
Generated Fri Aug 17 10:39:20 2001 by cvu_pod2html
498+
Generated Mon Aug 20 16:36:37 2001 by cvu_pod2html
499499
</FONT></ADDRESS>
500500
</FONT></BODY>
501501
</HTML>

docs/IO/ScalarArray.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -449,7 +449,7 @@
449449

450450
<P><HR>
451451
<ADDRESS><FONT SIZE=-1>
452-
Generated Fri Aug 17 10:39:24 2001 by cvu_pod2html
452+
Generated Mon Aug 20 16:36:40 2001 by cvu_pod2html
453453
</FONT></ADDRESS>
454454
</FONT></BODY>
455455
</HTML>

docs/IO/Stringy.pm.html

+14-4
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,10 @@
11
<HTML>
22
<HEAD>
3-
<TITLE>IO-stringy 2.106</TITLE>
3+
<TITLE>IO-stringy 2.108</TITLE>
44
</HEAD>
55
<BODY
66
bgcolor="#FFFFFF" link="#CC3366" vlink="#993366" alink="#FF6666">
7-
<FONT FACE="sans-serif" SIZE=-1><A HREF="http://www.zeegee.com" TARGET="_top"><IMG SRC="icons/zeegee.gif" ALT="ZeeGee Software" ALIGN="RIGHT" BORDER="0"></A><A NAME="__TOP__"><H1>IO-stringy 2.106</H1>
7+
<FONT FACE="sans-serif" SIZE=-1><A HREF="http://www.zeegee.com" TARGET="_top"><IMG SRC="icons/zeegee.gif" ALT="ZeeGee Software" ALIGN="RIGHT" BORDER="0"></A><A NAME="__TOP__"><H1>IO-stringy 2.108</H1>
88
</A>
99
<P><B>This module is <FONT COLOR="#990000">BETA</FONT> code, which means that the interfaces are fairly stable BUT it has not been out in the community long enough to guarantee much testing. Use with caution! Please report any errors back to <A HREF="mailto:[email protected]">[email protected]</A> as soon as you can.</B><UL>
1010
<LI> <A NAME="menu:NAME"><A HREF="#NAME">NAME</A></A>
@@ -20,6 +20,7 @@
2020
<LI> <A NAME="menu:TO_DO"><A HREF="#TO_DO">TO DO</A></A>
2121
<LI> <A NAME="menu:CHANGE_LOG"><A HREF="#CHANGE_LOG">CHANGE LOG</A></A>
2222
<UL>
23+
<LI> <A NAME="menu:item:Version_2_108_2001_08_20"><A HREF="#item:Version_2_108_2001_08_20">Version 2.108 (2001/08/20)</A></A>
2324
<LI> <A NAME="menu:item:Version_2_105_2001_08_09"><A HREF="#item:Version_2_105_2001_08_09">Version 2.105 (2001/08/09)</A></A>
2425
<LI> <A NAME="menu:item:Version_2_103_2001_08_08"><A HREF="#item:Version_2_103_2001_08_08">Version 2.103 (2001/08/08)</A></A>
2526
<LI> <A NAME="menu:item:Version_2_101_2001_08_07"><A HREF="#item:Version_2_101_2001_08_07">Version 2.101 (2001/08/07)</A></A>
@@ -177,7 +178,7 @@
177178
<A NAME="VERSION"><H2><A HREF="#__TOP__"><IMG SRC="icons/h1bullet.gif" ALT="Top" BORDER="0"></A> VERSION</H2></A>
178179

179180

180-
<P>$Id: Stringy.pm,v 2.106 2001/08/17 01:57:46 eryq Exp $
181+
<P>$Id: Stringy.pm,v 2.108 2001/08/20 20:36:15 eryq Exp $
181182

182183

183184

@@ -243,6 +244,11 @@
243244

244245

245246
<DL>
247+
<P><DT><B><A HREF="#__TOP__"><IMG SRC="icons/itembullet.gif" ALT="Top" BORDER="0"></A> <A NAME="item:Version"><A NAME="item:Version_2_108_2001_08_20">Version 2.108 (2001/08/20)</A></A></B></DT>
248+
<DD>
249+
The terms-of-use have been placed in the distribution file &quot;COPYING&quot;.
250+
Also, small documentation tweaks were made.
251+
246252
<P><DT><B><A HREF="#__TOP__"><IMG SRC="icons/itembullet.gif" ALT="Top" BORDER="0"></A> <A NAME="item:Version"><A NAME="item:Version_2_105_2001_08_09">Version 2.105 (2001/08/09)</A></A></B></DT>
247253
<DD>
248254
Added support for various seek() whences to IO::ScalarArray.
@@ -479,11 +485,15 @@
479485
</DL>
480486

481487

488+
<P>Go to <I><FILE><A HREF="http://www.zeegee.com">http://www.zeegee.com</A></FILE></I> for the latest downloads
489+
and on-line documentation for this module.
490+
491+
482492
<P>Enjoy. Yell if it breaks.
483493

484494
<P><HR>
485495
<ADDRESS><FONT SIZE=-1>
486-
Generated Fri Aug 17 10:39:28 2001 by cvu_pod2html
496+
Generated Mon Aug 20 16:36:43 2001 by cvu_pod2html
487497
</FONT></ADDRESS>
488498
</FONT></BODY>
489499
</HTML>

docs/IO/Wrap.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -173,7 +173,7 @@
173173

174174
<P><HR>
175175
<ADDRESS><FONT SIZE=-1>
176-
Generated Fri Aug 17 10:39:34 2001 by cvu_pod2html
176+
Generated Mon Aug 20 16:36:50 2001 by cvu_pod2html
177177
</FONT></ADDRESS>
178178
</FONT></BODY>
179179
</HTML>

docs/IO/WrapTie.pm.html

+1-1
Original file line numberDiff line numberDiff line change
@@ -430,7 +430,7 @@
430430

431431
<P><HR>
432432
<ADDRESS><FONT SIZE=-1>
433-
Generated Fri Aug 17 10:39:37 2001 by cvu_pod2html
433+
Generated Mon Aug 20 16:36:57 2001 by cvu_pod2html
434434
</FONT></ADDRESS>
435435
</FONT></BODY>
436436
</HTML>

docs/IO/icons/itembullet.gif

68 Bytes
Loading

docs/IO_Scalar_synopsis.html

+35
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,35 @@
1+
<HTML>
2+
<HEAD>
3+
<TITLE>IO_Scalar_synopsis</TITLE>
4+
</HEAD>
5+
<BODY
6+
bgcolor="#FFFFFF" link="#CC3366" vlink="#993366" alink="#FF6666">
7+
<FONT FACE="sans-serif" SIZE=-1><A HREF="http://www.zeegee.com" TARGET="_top"><IMG SRC="icons/zeegee.gif" ALT="ZeeGee Software" ALIGN="RIGHT" BORDER="0"></A><A NAME="__TOP__"><H1>IO_Scalar_synopsis</H1>
8+
</A>
9+
<P><B>This module is <FONT COLOR="#990000">BETA</FONT> code, which means that the interfaces are fairly stable BUT it has not been out in the community long enough to guarantee much testing. Use with caution! Please report any errors back to <A HREF="mailto:[email protected]">[email protected]</A> as soon as you can.</B><UL>
10+
<LI> <A NAME="menu:NAME"><A HREF="#NAME">NAME</A></A>
11+
<LI> <A NAME="menu:SYNOPSIS"><A HREF="#SYNOPSIS">SYNOPSIS</A></A>
12+
</UL>
13+
14+
15+
<P><HR>
16+
<A NAME="NAME"><H2><A HREF="#__TOP__"><IMG SRC="icons/h1bullet.gif" ALT="Top" BORDER="0"></A> NAME</H2></A>
17+
18+
19+
<P>IO_Scalar_synopsis - test out IO::Scalar
20+
21+
22+
23+
<P><HR>
24+
<A NAME="SYNOPSIS"><H2><A HREF="#__TOP__"><IMG SRC="icons/h1bullet.gif" ALT="Top" BORDER="0"></A> SYNOPSIS</H2></A>
25+
26+
<FONT SIZE=3 FACE="courier"><PRE>
27+
### From our distribution's top level directory:
28+
perl -I./lib examples/IO_Scalar_synopsis
29+
</PRE></FONT>
30+
<P><HR>
31+
<ADDRESS><FONT SIZE=-1>
32+
Generated Mon Aug 20 16:37:03 2001 by cvu_pod2html
33+
</FONT></ADDRESS>
34+
</FONT></BODY>
35+
</HTML>

docs/icons/h1bullet.gif

421 Bytes
Loading

docs/icons/h2bullet.gif

345 Bytes
Loading

docs/icons/itembullet.gif

68 Bytes
Loading

docs/icons/zeegee.gif

5.15 KB
Loading

0 commit comments

Comments
 (0)