Результаты поиска по запросу "perl"
Каков рекомендуемый способ шифрования паролей пользователей в базе данных?
В веб-приложении, написанном на Perl и использующем PostgreSQL, пользователи имеют имя пользователя и пароль. Каков будет рекомендуемый способ хранения паролей? Шифрование их с помощьюcrypt() функция Perl и случайная соль? Это ограничило ...
Очевидно, что если мы только что обработали последнюю строку одного файла, вызов eof () (с паренами) открывает следующий файл (если он есть), делает * ARGV допустимым (если он может) и проверяет конец файла на этом следующем файле. Если этот следующий файл присутствует и не находится в конце файла, тогда мы можем безопасно использовать binmode на ARGV.
у прочитать ввод UTF-8 в Perl, независимо от того, поступает ли он из стандартного ввода или из файла, используя оператор diamond:while(<>){...}. Таким образом, мой скрипт должен вызываться двумя способами, как обычно, с одинаковым ...
Проблема с разделителем для новой строки Perl
У меня есть файл, который использует CR / LF для разделения записей, но отдельные записи иногда содержат LF.
переименовывать файлы папки и дочерних папок
Я хотел бы добавить префикс для всех файлов в папке и во всех файлах во всех дочерних папках.Пример: hello\file1 hello2\file2 file3 file4 результат должен...
Как я могу эмулировать функциональность grep -B в Perl?
Я искал решение, которое позволило бы мне искать строки массива, и, если найдено совпадение строк, вставьте эту строку и две предыдущие строки в массив. Кажется, это было бы легко сделать с помощьюgrep команда. Однако я не могу заставить ...
Как избежать апострофа в моем текстовом запросе XPath с помощью Perl и Selenium?
У меня есть запрос XPath, который должен соответствовать некоторый текст в атрибуте span, как показано ниже:
Как использовать переменные оболочки в вызове команды perl в скрипте оболочки bash?
Как использовать переменные оболочки в вызове команды perl в скрипте оболочки bash?У меня есть команда perl в моем сценарии оболочки для оценки даты -1.Как я...
github.com/pfenwick/autodie/pull/12
у я получаю после "autodie" другой вывод? #!/usr/bin/env perl use warnings; use 5.012; use utf8; use open ':encoding(utf-8)'; use open ':std'; open my $fh, '>', 'test.txt' or die $!; say $fh 'käse'; close $fh; open my $fh1, '<', 'test.txt' or ...