=()= / Говнокод #4592 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
sub generate_code {
	my ($arrey_pos,$code);
	my @arrey = ('a'..'q', 'C'..'O', '1'..'9', 'g'..'u', 'l'..'z', '9'..'1', 'H'..'W');

	for (my $i = 0; $i < $_[0]; $i++) {
		$arrey_pos = int(rand($#arrey));
		$code .= $arrey[$arrey_pos];
	}
	$code;
}

Генерация кода.

Запостил: Arigato Arigato, (Updated )

Комментарии (17) RSS

    • Меня тут заинтересовало это:
      my @arrey = ('a'..'q', 'C'..'O', '1'..'9', 'g'..'u', 'l'..'z', '9'..'1', 'H'..'W');
      может кто объяснить смысл?
      Ответить
      • Это вопрос-шутка?
        Я, всё-таки отвечу,
        'a'..'q' - заменяет список символов от 'a' до 'q'
        Ответить
        • > 'a'..'q' - заменяет список символов от 'a' до 'q'

          А может подумать лучше, что же я спросил. То, что оно заменяет, я и так знаю, вопрос в том, к чему такая комбинация...
          Ответить
          • Фиг знает. может хотел автор двойной рандом сделать: rand при обращении, и случайный порядок букв в массиве. )
            Ответить
  • > Генерация кода.
    Ипать Матвеич...
    Генерация "Core2Duo" на бейсике
    Генерация "Windows7" через Word и макросы
    Генерация "iPhone" на smarty...
    Ответить
    • А так: 'C'..'O', 'H'..'W' или 'a'..'q', 'g'..'u', 'l'..'z' выдаст пересекающиеся последовательности. Т.е. вероятность появления некоторых символов выше.
      Ответить

Добавить комментарий

Где здесь C++, guest?!

    А не использовать ли нам bbcode?


    8