From 1b631c75a166e0258aad972d74af929b7968ea66 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Mon, 8 Apr 2024 21:09:23 +0200
Subject: Adding debian version 2.4.58-1.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 debian/perl-framework/t/htdocs/php/switch4.php | 29 ++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 debian/perl-framework/t/htdocs/php/switch4.php

(limited to 'debian/perl-framework/t/htdocs/php/switch4.php')

diff --git a/debian/perl-framework/t/htdocs/php/switch4.php b/debian/perl-framework/t/htdocs/php/switch4.php
new file mode 100644
index 0000000..24fb51f
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/php/switch4.php
@@ -0,0 +1,29 @@
+<?php
+
+function switchtest ($i, $j)
+{
+        switch ($i):
+                case 0:
+                                switch($j) {
+                                        case 0:
+                                                echo "zero";
+                                                break;
+                                        case 1:
+                                                echo "one";
+                                                break;
+                                        default:
+                                                echo $j;
+                                                break;
+                                }
+                                echo "\n";
+                                break;
+                default:
+                                echo "Default taken\n";
+        endswitch;
+}
+for ($i=0; $i<3; $i++) {
+  for ($k=0; $k<10; $k++) {
+    switchtest (0,$k);
+  }
+}
+?>
-- 
cgit v1.2.3