GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  TEXT::DIFF3::TEXT (3)

.ds Aq ’

NAME

Text::Diff3::Text - line number scheme free text buffer

CONTENTS

VERSION

0.08

SYNOPSIS



    use Text::Diff3;
    my $f = Text::Diff3::Factory->new;
    my $t0 = $f->create_text([ map{chomp;$_} <F0> ]); # do not dup internally.
    my $t1 = $f->create_text($string); # make array references.
    # follows four take same output.
    print $_, "\n" for @{$t0->text};
    print $t0->as_string_at($_) for $t0->range;
    print $t0->as_string_range($t0->ragne);
    print $t0->as_string_at($_) for $t0->first_index .. $t0->last_index;
    print $t0->as_string_range($t0->first_index .. $t0->last_index);
    for ($t0->first_index .. $t0->last_index) {
        my $line = $t0->at($_);
        print $line, "\n" if defined($line);
    }
    # string compare
    if ($t0->eq_at($i, $string)) { .... }
    # get string size
    my $length = $t0->size;



DESCRIPTION

This is a wrapper for a Perl’s array reference, improving line number scheme free and limiting fetching from last element by minus index. Normally line number starts 1 in compatible with diff command tools. But you can change it another value like as 0 override first index methods.
create Author recommends you to create an instance of text by using with a factory as follows.



  use SomeFactory;
  my $f = SomeFactory->new;
  my $t = $f->create_text( string or arrayref );



Text::Diff3::Factory is a class to packaging several classes for the build-in diff processor.

When pass a string, it is split by /\n/ before store the line buffers. When pass an array reference, it simply assigned text properties without duplication. In the later case, the side effects will happen if you use same reference at another place.

$obj->text Returns the line buffer attribute. It is an array reference.
$obj->list Same as the text property, which is an interface property for ListMixin.
$obj->first_index Returns first-index accessible by the ‘at’ method.
$obj->last_index Returns last-index accessible by the ‘at’ method.
$obj->range Returns a range between fist-index and last-index.
$obj->at Returns a line specified by a line number. If line number is out of range, it returns undef.
$obj->as_string_at($x) This is short cut for line accessing through ‘at’. If line number is out of range, it returns ’’, in otherwise returns line.\n.
$obj->as_string_range(@range) Contatinents lines in the given line number array.
$obj->eq_at($x, $other) This is short cut for comparison line and other string.
$obj->initialize Makes initial state.

COMPATIBILITY

Use new function style interfaces introduced from version 0.08. This module remained for backward compatibility before version 0.07. This module is no longer maintenance after version 0.08.

AUTHOR

MIZUTANI Tociyuki <tociyuki@gmail.com>.

LICENSE AND COPYRIGHT

Copyright (C) 2010 MIZUTANI Tociyuki

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, or (at your option) any later version.

Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 TEXT::DIFF3::TEXT (3) 2010-02-19

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.