foreach (split('',12345)) {
print $_,"\n";
}
Perl. Разбить число
Только что начал изучать Perl. И у меня появился вопрос такого характера... Так как я перл изучаю с помощью книги дейтела, то естессно выполняю уроки. Итак вопрос.
Я получаю пятизначное число 12345, как мне его разделить на составляющие _цифры_? (В самом тривиальном варианте! Самом что ненаесть элементарном!)
Я получаю пятизначное число 12345, как мне его разделить на составляющие _цифры_? (В самом тривиальном варианте! Самом что ненаесть элементарном!)
Хм... Работа со строками у Дейтела в главе 5 где-то начинается )
А в первой (где я нахожусь) только есть простые вычисления и сравнения строк... Я еще покопаю.. завтра о результатах сообщу. Мне кажется все гораздо проще...
А в первой (где я нахожусь) только есть простые вычисления и сравнения строк... Я еще покопаю.. завтра о результатах сообщу. Мне кажется все гораздо проще...
а куда ещё проще-то?
Да даже и не знаю. Я не буду спорить, т.к. новичок.
Пока только изучаю.
$_ - нашел в книге. Разобрался в коде squirL'а досконально.
Пока только изучаю.
$_ - нашел в книге. Разобрался в коде squirL'а досконально.
$a=123456;
do{
print $a % 10, "\n";
$a /= 10;
}while( $a >= 1)
%)
Удач.
do{
print $a % 10, "\n";
$a /= 10;
}while( $a >= 1)
%)
Удач.
korisk, интересная реализация =)
Но _Я_ был неправ, когда говорил, что просто обязано быть больше. Начиная выполнять задания, я понял, что чтобы у Дейтела выполнить все задачи - необходимо забегать вперед. )
Но _Я_ был неправ, когда говорил, что просто обязано быть больше. Начиная выполнять задания, я понял, что чтобы у Дейтела выполнить все задачи - необходимо забегать вперед. )