in reply to Re^3: Split a string at a given line number
in thread Split a string at a given line number
For my above code spliced the 20 lines and stored in a array format. Now that's changed to add a newline character in every 20th line and stored in a scalar variable.
$new_string.="$&\n" while ($string=~ m/([^\n]+.*?\n){1,20}/gs); print "\n$new_string";
|
|---|