perl

Версия Perl: perl, v5. 10. 1 ( * ) построен для x86_64-linux-thread-multi Я относительно новичок в perl. Я попытался посмотреть на различные утилиты обработки XML для Perl, XML:: Simple, XML::Parser, XML::LibXML, XML::DOM, XML::XML::Twig, XML:: XPath и т. д. Я пытаюсь обработать некоторый XML, который имее...

Мне нужно добавить три строки на 447 страниц html. В частности, мне нужно добавить строки: <input name="prev" type="button" value="prev" onClick="handlePrev()" id="prevButton"> <input name="next" type="button" value="next" onClick="handleNext()" id="nextButton"> <script src="nav.js"></...

Я использую модуль Perl Chart:: Gnuplot для создания некоторых графиков ASCII с помощью terminal 'dumb'. Вместо того, чтобы функция plot2d непосредственно печатала результаты построения, я хотел бы записать красиво отформатированный участок ASCII во временную переменную, чтобы я мог распечатать его позже. ...

Проблема в том, что у меня есть массив, который содержит пары значений ключей в качестве элементов в массиве, и я должен каким-то образом разделить их на пары значений ключей => в хэше. Моя первая попытка в этом работает, но я думаю, что это довольно грязно - я должен получить каждый другой элемент массив...

Когда я использую этот код print "nEnter !0 numbers nn"; @arr=<STDIN>; chomp @arr; Он продолжает принимать ввод от пользователя, пока я не использую ctrl+z, а затем нажимаю enter. Я хочу ограничить количество вводимых пользователем данных в список. Для этого я старался print "nEnter !0 numbers nn"...

У меня есть файл, содержащий имена файлов (среди прочего). Только некоторые имена файлов находятся в начале строки в файле: ~/remove/me/myexec.pl /some/other/path/exec.pl /yet/another/path/pipeit.pl | ~/remove/me/subdir/tome.pl ~/remove/me/deeply/nested/exec.pl Я хочу удалить путь к файлу любого файла, ко...

Можно ли перегружать константы в Perl 6? Вот пример Perl 5, который я рассматриваю. В частности, я хотел бы получить строку используемого литерального значения, например, если код был my $x = .1e-003 ; Мне нужен ".1e-003" вместо 0.0001....

Похоже, что в main есть символ под названием '_<-' (без кавычек) таким же образом, как и другие вещи, которые выглядят как они могут быть дескрипторами: '_</usr/perl/lib/Carp.pm', например. Есть ли какой-то способ использовать его? Или мне придется использовать фильтр источника, если я надеюсь прочи...

Я использую find_link_dom, и это работает... чтобы найти первую ссылку, которая соответствует. Мне нужно найти вторую. Вот моя строка: my $link = $mech->find_link_dom ( text_regex => 'abc' ); Есть ли способ для этой команды вернуть вторую ссылку, которая соответствует? И прежде чем кто-то прокомме...

У меня есть папка tmp , которая лежит в каталоге инструментов и содержит различные модули, такие как, например, myModul.pm: package myModul; print "path in myModul.pm: $dirNamen"; Те называются в основном, который выглядит следующим образом: #!/usr/bin/perl use strict; use warnings; use File::Basename; ...