Думаю, будет смысл, если добавлю тему и в ней буде размещать коды перла, которые почему-то не работают нормально у меня. Если кто снизойдет и скажет что неправильно, буду премного благодарен.



Смысл в том, чтобы открыть файл на дозапись, после перекрутить все строки.
Проблема в том, что @stuff ничего не получает, но при этом предупреждений и ошибок нет.
Файл с:/forperl текстовый, в нем строки, разделенные символом переноса.

PS Подскажите также, что можно сделать, чтобы нормально отображалась кириллица при запуске?

Это сообщение отредактировал(а) Firer - 14.11.2008, 15:19

Скрипт не запускал, а пробежался только взглядом:
1) путь к файлу c:\\forperl
2) его надо открыть на дозапись, а у вас открыт на чтение;
3) имена переменных вынести из кавычек.

Думаю этого будет достаточно, чтобы скрипт заработал.

PS Если скрипт не работает, имеет смысл писать текст ошибки.

Это сообщение отредактировал(а) demond - 14.11.2008, 15:18

Firer, предлагаю свой вариант

demond, 



без разницы. Windows и MS-DOS позволяют такие пути. Обратная наклонка (/), как и есть альтернатива для (\\) для путей.

С этим стратил, кинул стаурю версию. Уже отредактировал.

где именно? Если там, где print то это позволяет элементы матрицы при выводе разделять пробелами. 

Повторюсь еще раз  выдает 0, то есть пустую матрицу

Добавлено @ 15:27
ginnie, 

спасибо за вариант. Попробую запустить.
Но я только изучаю перл по книге "Perl за 24 часа" и хотел бы понять что именно не так в этой мелкой проге.
Плохо то, что книга отсканированная и ручной коррекции ошибок не было. Поэтому все казусы приходится искать самому

Добавлено @ 15:31


В том то и оно, что все ОК. Ни ошибок, ни придупреждений

Это сообщение отредактировал(а) Firer - 14.11.2008, 15:32

код вида:

считается плохим тоном.

demond, 0 выдается из-за '>>', т.к. это открытие файла только для добавления, чтение из файла не разрешено, но ошибка при чтении не выдается.

Аналог какой? 
даст без пробелов, а еще один цикл добавлять не хочется. Если какой-то красивый аналог

Добавлено через 2 минуты и 34 секунды
ginnie, 
Все понятно. Дурдом. Не ожидал такого подвоха. Понимал, что вся проблема в этой строке, но ошибок не находил. Маленький еще   

ginnie, я знаю. Когда я писал комментарий файл вообще открывался на чтение.

Firer, например, так:

Кстати может у кого-то есть книга Perl за 24 часа в электронном виде и хорошем качестве?

Это сообщение отредактировал(а) Firer - 14.11.2008, 15:38

Firer, аналогов несколько





Добавлено через 59 секунд
demond, извини, про open это я не тебе, а Firer! 

Задание № 2

Написать короткую программу, которая бы:

•  открывала файл
• считывала его строки в массив
• извлекала строки из каждой строки
• находила все слова с количество смежных букв 4 и более, например yardstisck, thoughts;

Мой вариант такой:


Может кто-то подскажет как сделать лучше. Буду очень благодарен

PS Единственное но. Появляется сообщение: Use of unitilizad value within @words in pattern match at script.pl line 10, <MY> line 374

Это сообщение отредактировал(а) Firer - 25.11.2008, 15:37

Это сообщение отредактировал(а) n4n0bit - 25.11.2008, 16:46

n4n0bit, Ваш код будет работать, если в каждой строке только одно слово, а это условием не предполагается

Firer, предупреждение, о котором Вы говорите, появляется из-за превышений границ массива.
Нужно $i<@words; либо $i<=$#words;

Полная аналогия Вашему коду, но покороче

и немного аккуратнее с определением "слово"

amg - я с вами не согласен.

Это сообщение отредактировал(а) n4n0bit - 25.11.2008, 16:58

ginnie как всегда успел вперед. И верно заметил, что достаточно {4}.

 
Всем спасибо, у меня глаза разбегаются.

Только для меня кое-что немного сложновато. Особенно функция в функции

Я по привычке делаю все формально. Мозги вообще пока таким образом не работают.

Добавлено через 9 минут и 31 секунду
Как сделать шаблон для поиска времени по которому будут проходить форматы такого типа как 

• 12:00am
• 5:00pm
• 8:30AM

и чтобі не проходили  3:00, 2:60am, 99:00am, 3:0am


Мой вариант

формат: число от нуля до 12, потом необязательный пробел, потом ":", необязательный пробел, две цифры от 00 до 59, необязательный пробел, am или pm без учета регистра

Проблема в том, что необ. пробел не учитывается.

Может кто, что подскажет. Буду благодарен

Если напишите свой вариант, сделайте для меня формат, как сделал я

Этот пример идет у вас для обучения регулярным выражениям? 

Если нет, то к чему такие сложности? Возмите простое рег выражение, а дальше сделайте проверку по конкретным полям как вам нужно.

Регулярка должна быть немного другой:


Не тестировал....

Не обязательно воспринимать выраженя с map и grep как функция в функции. Мне, например, проще рассматривать их как конвейер: список пропускается через map/grep/sort, результат (тоже список) поступает следующей map/grep/sort и т.д. Такой подход позволяет делать более краткий и лучше читаемый код, чем с использованием циклов.

Здесь я согласен с tolkien: не нужно, хотя, как правило и можно, впихнуть все в регулярное выражение. Гораздо понятнее

amg красиво    

amg, 

 

 Здесь все знакомо, но что можно так не додумался

Хотя мне кажется или нет, что 03:0 AM тоже пройдет. и нужно ли здесь ставить \: вместо :
может тогда лучше




Это сообщение отредактировал(а) Firer - 26.11.2008, 11:02