Тема: [Perl] Новичкам: задаем вопросы
Показать сообщение отдельно

  #1277  
Старый 03.11.2009, 18:24
Kaimi
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
С нами: 9851426

Репутация: 1676


По умолчанию
Вроде того?
perl -e "for(1..5) {print $/ unless $_ % 1; print 'X ' x 2}"
 
Ответить с цитированием