Hi there,

I have a file containg this:

aabbccddeeffgg

And i want the following output:

aa
ab
bb
bc
cc
cd
dd
de
..
..

I have tried with the following:

..
while (($n = read(F_IN, $data, 2, $offset)) != 0) {
print "$data\n";
$offset += 1;
}
..

But the output looks all wrong:

aa
abb
abcc
abcdd
abcdee
abcdeff
abcdefgh
abcdefghi
abcdefghij
abcdefghijk
abcdefghijk

Can anyone come with some insight? I'd really appreciate it.

Thanks in advance!

saridski.

If your file was called data.txt...here's one way to do it.

my $file = "data.txt";
my $str;

open FILE, "$file";

while (<FILE>) {
$str = $_;
$str =~ s/(..)/$1\n/g;
print $str;
}

I have some more script examples at www.scripthat.com.