Server : Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips PHP/7.4.20 System : Linux st2.domain.com 3.10.0-1127.10.1.el7.x86_64 #1 SMP Wed Jun 3 14:28:03 UTC 2020 x86_64 User : apache ( 48) PHP Version : 7.4.20 Disable Function : NONE Directory : /usr/lib/cyrus-imapd/ |
#!/usr/bin/perl
$prefix = "test.mupdate-load.";
$lups = 150;
$lookups = 10;
srand(time());
@thelist = ();
for($i=0; $i<=$lups; $i++) {
push @thelist, $prefix . $$ . ".$i";
}
$tag = 0;
foreach $item (@thelist) {
print $tag++ . " RESERVE \"" . $item . "\" \"borked.andrew.cmu.edu\"\r\n";
$todo = int(rand $lookups) + 1;
for($i=1; $i<$todo; $i++) {
print $tag++ . " FIND \"" . $thelist[int(rand scalar @thelist)] . "\"\r\n";
}
}
foreach $item (@thelist) {
print $tag++ . " DELETE \"" . $item . "\"\r\n";
}