Как заставить Perl останавливаться и выдавать трассировку стека, когда вы ссылаетесь на значение undef, а не просто предупреждать? Кажется, что use strict; недостаточно для этой цели.

Я работаю на С++, и мне нужно знать, является ли скалярное значение (например, double ) "определенным" или нет. Мне также нужно иметь возможность «очистить» его, если это необходимо: class Foo { public: double get_bar(); private: double...

Мне нужно скрыть предупреждения внутри eval, но остальной код должен продолжать выдавать предупреждающие сообщения. Вот что у меня есть - eval "\$value = $hash->{key}"; теперь значение $ hash -> {key} может быть вызовом функции, например:...

Я ищу способ очистить все мои массивы в программе Perl. В настоящее время я вызываю подпрограмму, которая явно «сбрасывает» все массивы: sub clear_arrays{(@array1,@array2,@array3)=((),(),());} Это заставляет меня находить все массивы в...

Задача: построить хэш с помощью карты, где ключи — это элементы заданного массива @a, а значения — это первые элементы списка, возвращаемого некоторой функцией f($element_of_a): my @a = (1, 2, 3); my %h = map {$_ => (f($_))[0]} @a; Все в...

Во многих файлах C и C++ я видел такие макросы: #ifdef X #undef X // no statements in between #endif Я чувствую, что достаточно просто написать: #undef X Если макрос X не был определен, то #undef не должен иметь никакого...

В этом фрагменте кода сдвиг используется дважды, несмотря на то, что метод принимает только один параметр: sub regexVerify ($) { my $re = shift; return sub { local $_ = shift; m/$re/ ? $_ : undef; }; } Что это делает...

Я впервые использую Perl. В потоках Perl возвращаемое значение подпрограммы threads->exit() равно значению undef , если контекст является скалярным. #!/usr/bin/perl use threads; $t=threads->create({"context"=>"scalar"},...

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

Этот код умирает, как я ожидаю: use strict; use warnings; open my $fh, "<", "" or die $!; Но это не так: use strict; use warnings; open my $fh, "<", undef or die $!; Что здесь происходит?