my $a = "HereIsTheStringAsString"; my $n = 5; while($a =~/.{1,$n}/){print "$&\n"; $a = $'}; __END__ HereI STheS tring AsStr ing
In reply to Re: One liner: split fixed-width field into equal length chunks...
by OM_Zen
in thread One liner: split fixed-width field into equal length chunks...
by mr. jaggers
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |