diff options
| author | fukachan <fukachan> | 2002-02-17 03:13:47 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-02-17 03:13:47 +0000 |
| commit | 9413c6ebe8380f0deece09baaf3b742b8e5bc49b (patch) | |
| tree | b473560c1cdf845b806c2c0260a26d028328dfac /fml/lib/IO | |
| parent | ab2ef9ed7dcb834731c6a853c246fe5de6f8cc72 (diff) | |
| download | fml8-9413c6ebe8380f0deece09baaf3b742b8e5bc49b.tar.gz fml8-9413c6ebe8380f0deece09baaf3b742b8e5bc49b.tar.bz2 fml8-9413c6ebe8380f0deece09baaf3b742b8e5bc49b.zip | |
remove \s*$
Diffstat (limited to 'fml/lib/IO')
| -rw-r--r-- | fml/lib/IO/Adapter.pm | 12 | ||||
| -rw-r--r-- | fml/lib/IO/Adapter/Array.pm | 4 |
2 files changed, 8 insertions, 8 deletions
diff --git a/fml/lib/IO/Adapter.pm b/fml/lib/IO/Adapter.pm index 03b03444..92602c5e 100644 --- a/fml/lib/IO/Adapter.pm +++ b/fml/lib/IO/Adapter.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Adapter.pm,v 1.14 2002/01/27 13:11:57 fukachan Exp $ +# $FML: Adapter.pm,v 1.15 2002/02/01 12:03:58 fukachan Exp $ # package IO::Adapter; @@ -72,7 +72,7 @@ is described like this: file content = { key1 => undef, key2 => [ value2 ], - key3 => [ value3a, value3b ], + key3 => [ value3a, value3b ], }; IO::Adapter converts data in arbitrary map e.g. file, /etc/group, @@ -82,7 +82,7 @@ IO::Adapter provides unified access methods to this structure. Instead of unification, IO::Adapter may provide amibugous IO. -For example, IO into array is not described as above. +For example, IO into array is not described as above. /etc/group must be described as wheel group = { @@ -277,11 +277,11 @@ sub touch getXXX() should be classified into: getline() raw data - which may consist of "key" and "value" pair. + which may consist of "key" and "value" pair. get_next_key() next primary key get_next_value() next value for (the next) key -For a file map, following usage is intuitive such that +For a file map, following usage is intuitive such that getline() returns "key value1 value2 ...", get_next_key() returns "key" and get_next_value() returns "value1 value2 ...", isn't it ? @@ -399,7 +399,7 @@ find() returns the result as STRING or ARRAY REFERENCE. You get only the first entry as string by default. If you specify C<all>, you get the result(s) as ARRAY REFERENCE. -For example, to search mail addresses in recipient list, +For example, to search mail addresses in recipient list, my $a = $self->find($regexp, { want => 'key', all => 1}); for my $addr (@$a) { diff --git a/fml/lib/IO/Adapter/Array.pm b/fml/lib/IO/Adapter/Array.pm index 52718957..52df80d9 100644 --- a/fml/lib/IO/Adapter/Array.pm +++ b/fml/lib/IO/Adapter/Array.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Array.pm,v 1.21 2001/12/24 07:40:56 fukachan Exp $ +# $FML: Array.pm,v 1.22 2002/01/27 13:11:58 fukachan Exp $ # package IO::Adapter::Array; @@ -123,7 +123,7 @@ undef. ambigous in array case. # Descriptions: forwarded to get_next_key() # XXX getline() == get_next_key() is valid in this case. -# XXX since this map has only key and no value. +# XXX since this map has only key and no value. # Arguments: OBJ($self) HASH_REF($args) # Side Effects: increment the counter in the object # Return Value: STR(the next element) |