foreach (@nicks) {
        print "--> \cB$_\cB:\n";
        print "$_\n" for split /\n/, $delaylist{ $_ };
    }