summaryrefslogtreecommitdiffstats
path: root/debian/perl-framework/t/htdocs/php/switch2.php
blob: 2cf328842af6479217718df81b20b03e5a09bb74 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
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;
 }
}
?>