Adding debian version 2.4.38-3+deb10u8.debian/2.4.38-3+deb10u8debian

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 42 insertions, 0 deletions

diff --git a/debian/perl-framework/t/htdocs/php/switch2.php b/debian/perl-framework/t/htdocs/php/switch2.php
new file mode 100644
index 0000000..2cf3288
--- /dev/null
+++ b/debian/perl-framework/t/htdocs/php/switch2.php
@@ -0,0 +1,42 @@
+<?php
+
+$i="abc";
+
+for ($j=0; $j<10; $j++) {
+switch (1) {
+  case 1:
+        echo "In branch 1\n";
+        switch ($i) {
+                case "ab":
+                        echo "This doesn't work... :(\n";
+                        break;
+                case "abcd":
+                        echo "This works!\n";
+                        break;
+                case "blah":
+                        echo "Hmmm, no worki\n";
+                        break;
+                default:
+                        echo "Inner default...\n";
+        }
+        for ($blah=0; $blah<200; $blah++) {
+          if ($blah==100) {
+            echo "blah=$blah\n";
+          }
+        }
+        break;
+  case 2:
+        echo "In branch 2\n";
+        break;
+  case $i:
+        echo "In branch \$i\n";
+        break;
+  case 4:
+        echo "In branch 4\n";
+        break;
+  default:
+        echo "Hi, I'm default\n";
+        break;
+ }
+}
+?>