my $idx = $c_count > 1 ? int(rand($c_count - 1)) : 0;
Похожие темы
- Форум perl rand (2009)
- Форум perl+bash (2003)
- Форум Оптимизация циклов с массивами (2014)
- Форум математика (2005)
- Форум Perl tie variables assignment (2015)
- Форум Поиск в файле / FindPattern(); (2002)
- Форум [PERL] От перестановки множителей произведение не меняется? (2010)
- Форум cudaMalloc, unspecified launch failure (2012)
- Форум проверка членов структуры (2019)
- Форум struct ** Основы C работа с указателями (2012)