Help for this page

Select Code to Download


  1. or download this
    use Switch;
    switch ($char)
    ...
      case 1 { print "1" }
      case 2 { print "2" }
    }
    
  2. or download this
    use Switch;
    switch ($char)
    ...
      case 1 { print "1"; }
      case 2 { print "2"; }
    }