NAME

String::DiffLine - find the character,line, and line position of the first difference

SYNOPSIS

use String::DiffLine qw(diffline);
($char,$line,$lpos)=diffline("abc","abx");

DESCRIPTION

diffline($str1,$str2)

Returns a three-item list identifying the location of the first difference between the two strings: the character position (indexed from 0), the line number (indexed from 1), and the position in the line (indexed from 0). $/ is used as the line separator.

If the strings are identical, the first element of the returned list is zero, the second element is the number of line separators plus one, and the last element is the number of characters following the last line separator.

AUTHOR

Andrew Allen <andrew_d_allen@hotmail.com>

SEE ALSO

perl(1).