Try
$line=~ s/(.{60})/$1\n/g;
Agustin Rivera
----- Original Message -----
From: "Pedro A Reche Gallardo" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>; <[EMAIL PROTECTED]>
Sent: Friday, November 09, 2001 11:27 AM
Subject: printing lines chunk
> Hi All, I have a long line with no blank characters and I would like to
> insert a return character every 60 characters. Any idea welcome.
> Regards
>
> Pedro
>
***************************************************************************
> PEDRO a. RECHE gallardo, pHD TL: 617 632 3824
> Scientist, Mol.Immnunol.Foundation, FX: 617 632 3351
> Dana-Farber Cancer Institute, EM:
[EMAIL PROTECTED]
> Harvard Medical School, EM: [EMAIL PROTECTED]
> 44 Binney Street, D610C, URL: http://www.reche.org
> Boston, MA 02115
>
***************************************************************************
>
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]