NAME

Meta::Utils::Text::Lines - library to do operations on sets of lines.

COPYRIGHT

Copyright (C) 2001 Mark Veltzer; All rights reserved.

LICENSE

This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA.

DETAILS

MANIFEST: Lines.pm PROJECT: meta

SYNOPSIS

package foo; use Meta::Utils::Text::Lines qw(); my($obje)=Meta::Utils::Text::Lines-new();> $obje-set_text("mark\ndoron\n","\n");> $obje-remove_line("doron");> my($new_text)=$obje-get_text();>

DESCRIPTION

This is a library to help you do things with lines of text coming from a file. Currently it supports splitting the text and removing lines and returning the text that results.

EXPORTS

new($) set_text($$$) remove_line($$) remove_line_re($$) remove_line_nre($$) get_text($) get_text_fixed($)

FUNCTION DOCUMENTATION

new($)

Gives you a new Lines object.

set_text($$$)

This will set the text that the object will work on.

remove_line($$)

This will remove a line that you know the text of.

remove_line_re($$)

This will remove all lines matching a certain regexp.

remove_line_nre($$)

This will remove all lines not matching a certain regexp.

get_text($)

This will retrieve the text currently stored in the object.

get_text_fixed($)

This method is the same as get_text except it adds the delimiter at the end if it is not there.

BUGS

None.

AUTHOR

Mark Veltzer <mark2776@yahoo.com>

HISTORY

start of revision info 1 Tue Jan 9 17:00:22 2001 MV fix up perl checks 2 Tue Jan 9 18:15:19 2001 MV check that all uses have qw 2 Tue Jan 9 19:29:31 2001 MV fix todo items look in pod documentation 3 Wed Jan 10 12:05:55 2001 MV more on tests/more checks to perl 4 Fri Jan 12 15:53:19 2001 MV change new methods to have prototypes 5 Sun Jan 28 02:34:56 2001 MV perl code quality 6 Sun Jan 28 13:51:26 2001 MV more perl quality 7 Tue Jan 30 03:03:17 2001 MV more perl quality 8 Wed Jan 31 19:51:08 2001 MV get papers in good condition 9 Sat Feb 3 23:41:08 2001 MV perl documentation 10 Mon Feb 5 03:21:02 2001 MV more perl quality 11 Tue Feb 6 01:04:52 2001 MV perl qulity code 12 Tue Feb 6 07:02:13 2001 MV more perl code quality 13 Tue Feb 6 22:19:51 2001 MV revision change end of revision info

SEE ALSO

Nothing.

TODO

Nothing.