snapshot before legacy cleanup

This commit is contained in:
Naeel
2026-04-27 07:36:06 +03:00
parent 9461026546
commit 7cfe20bf76
25 changed files with 1430 additions and 261 deletions
-25
View File
@@ -256,31 +256,6 @@ check H03 "нет функции handler в PHP" php fail \
function process(array $data): array {
return ["status" => 200];
}'
echo ""
echo "--- PERL ---"
# CORRECT
check L01 "правильный Perl handler" perl ok \
'sub handler {
my ($env) = @_;
return [200, ["Content-Type" => "text/plain"], ["Hello World"]];
}'
# SYNTAX ERROR
check L02 "синтаксическая ошибка Perl" perl fail \
'sub handler {
my $env = @_
return [200, [], ["ok"]];
}'
# NO ENTRYPOINT
check L03 "нет sub handler в Perl" perl fail \
'sub process {
my ($env) = @_;
return [200, [], ["ok"]];
}'
echo ""
echo "--- ГРАНИЧНЫЕ СЛУЧАИ ---"