mirror of
https://github.com/imapsync/imapsync.git
synced 2025-06-06 20:55:29 +02:00
12 lines
146 B
Perl
12 lines
146 B
Perl
#!/usr/bin/perl -w
|
|
|
|
|
|
|
|
$rt_big = [1..1000];
|
|
|
|
|
|
while (@t_small = splice(@$rt_big, 0, 33)) {
|
|
$rt_small = \@t_small;
|
|
print "@{$rt_small}", "\n";
|
|
|
|
}
|