foreach $ai (@ai) { sleep($a1); print @letters }