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