in reply to substr Rampage
substr($record, $FifthCollumEnds, $SixthCollumEnds-1);
Without reading your code, it looks like you are misunderstanding the substr syntax. The third argument is supposed to be length, but what you are passing looks like an end offset.
If I read that right, you might try:
substr($record, $FifthCollumEnds, $SixthCollumEnds-$FifthCollumEnds);
Still looks like an off-by-one error waiting to happen though.
print "Just another Perl ${\(trickster and hacker)},"
The Sidhekin proves Sidhe did it!
In Section
Seekers of Perl Wisdom