perl

0зной

1ответ

Список массивов внутри массива, которые имеют общие элементы

#!/usr/bin/perl use strict; use warnings; my @array = (['John', 'Apple', 6], ['Adam', 'Banana', 7], ['Cass', 'Orange', 7], ['Brad', 'Lemon', 6], ['Lisa', 'Grape',

3зной

2ответ

Perl правильный путь для написания макросов

Чтобы упростить мою программу, я хотел бы написать некоторые макросы, которые я могу использовать в разных подпрограммах. Вот что я написал: my @m =(); sub winit { @m =(); } sub w { push @m, shift;

0зной

2ответ

Как использовать новую строку в подстановке s /// в RE с помощью Perl?

Входной файл содержит более 1 новой строки, пустые теги следующим образом: <html> <body> <title>XXX</title> <p>text...</p> <collaboration seq=""> <ce:text></ce:text> </collaboration> ... <p>

0зной

1ответ

Как написать имя переменной в файл, а не его значение

Я новичок в Perl, и у меня есть основной вопрос. Мне нужно написать текстовый файл, содержащий символ «$». Пример: unless(open FILE, '>'.$file){ die "Unable to create $file"; } print FILE "$tmp\n"; Я

1зной

1ответ

perl XML :: Ошибка чтения чтения содержимого html внутри rss-канала

Я пытаюсь разобрать и прочитать содержимое RSS-ленты и получить сообщение об ошибке. это мой фид RSS (для испытания заманчивой) <?xml version="1.0" encoding="UTF-8"?> <rss version="2.0" xmlns:Test="h