use warnings; use strict; my $str = 'abcdefghijklmnopqrstuvwxyz'; my $size = 10; my @subs = map substr($str, $_*$size, $size), 0..(length($str)-1)/$siz +e; print join("\n", @subs), "\n";
In reply to Re^2: Eliminating substr warnings
by Roy Johnson
in thread Eliminating substr warnings
by ezekiel
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |