parsing character by character and printing

[Brian Jackson]

I am completely new to Perl.

I am trying to figure out how I can parse a row, character by character,
that I have retrieved from a database.   I would like to format output
based on characters from the row.  For example I may have retrieved 250
character string from a database and I want to print that character
string, BUT I want to print only 50 characters a line or less.   How
might I do this if I have a variable called @row??