IB
почему -E 'say 123' в командной строке запускать — это безопасно, а то же самое в файле — не безопасно
Size: a a a
2020 November 30
SZ
почему -E 'say 123' в командной строке запускать — это безопасно, а то же самое в файле — не безопасно
Потому что
SZ
Перл когда парсит шебанг, он должен выпарсить оттуда указанные опции (и включить их).
В интерпретаторе реализован строковый парсер для этого (там же не getopt или типа того). Этот строковый парсер используется в нескольких местах, в т.ч. при парсинге окружения, в котором эти опции небезопасны
В интерпретаторе реализован строковый парсер для этого (там же не getopt или типа того). Этот строковый парсер используется в нескольких местах, в т.ч. при парсинге окружения, в котором эти опции небезопасны
SZ
Понятно, что в шебанге могли бы это дело разрешить, но они просто не стали делать отдельный костыль для этого :)
AK
а не оболочка ли выполняет строку указанную в шебанг?
SZ
а не оболочка ли выполняет строку указанную в шебанг?
Не всё так тривиально
SZ
И именно поэтому шебанг вида '#!perl' это провал
MD
package Merge;
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
SZ
package Merge;
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
Merge30:main() оригинально
SZ
package Merge;
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
use Merge30;
my $new_filename = Merge30:main();
package Merge30;
sub main {
my $var1 = 1;
my fh_out = open();
my $t = XML::Twig->new(twig_handlers => { section => sub{ $var1++; print $fh_out "text"; ... } } );
}
package Merge30;
sub main {
my $var1 = 1;
my $t = XML::Twig->new(twig_handlers => { section => \§ion} );
sub section { ... };
}
Приложение на Dancer2. Создаю другой xml-файл и делаю вычисления. Поместил функции и переменные внутрь main().Будут ли утечки памяти в таком варианте? Как лучше сделать?
А ещё у тебя будет multiple redefinition для main в пакете Merge30
SZ
Утечки памяти в перл будут только если ты будешь забывать где-то ссылки
MD
Задача вызвать модуль, он создаст новый файл, закроет его и вернет новое имя файла. Тут есть ссылки на функции.
SZ
Задача вызвать модуль, он создаст новый файл, закроет его и вернет новое имя файла. Тут есть ссылки на функции.
Если нужно вернуть имя файла, то верни его как строку
SZ
Если нужен объект, то локально созданные функции (sub section) будут для каждого объекта новые
SZ
И не будут удалены пока живёт объект
SZ
Отдельный пакет -- это вообще не важно
SZ
Пакеты это просто способ разделения областей видимости
MD
Сейчас возвращается строка с новым именем файла. Для каждого типа файла создан пакет, чтобы отделить логику. Сейчас правильно такое содержание или нужно через классы делать вместо пакетов?
SZ
Сейчас возвращается строка с новым именем файла. Для каждого типа файла создан пакет, чтобы отделить логику. Сейчас правильно такое содержание или нужно через классы делать вместо пакетов?
Я честно не понимаю твой вопрос.
Если бы бы показал код, было бы понятнее.
Код выше -- некорректный
Если бы бы показал код, было бы понятнее.
Код выше -- некорректный
MD
Пакет Merge принимает имя файла и по его типу запускает разные обработчики (пакеты).