Be concise.
Be useful.
All contributions dictatorially edited by webmasters to match personal tastes.
Please do not paste any copyright violating material.
Please try to avoid dependencies to third-party libraries and frameworks.
- Clojure
- Clojure
- Cobol
- C#
- Dart
- Fortran
- Go
- Haskell
- JS
- Java
- Java
- Lua
- PHP
- Pascal
- Perl
- Python
- Python
- Ruby
- Rust
- VB
- VB
(some-> str {"foo" foo "bar" bar "baz" baz "barfl" barfl} (.call))
map is a function of a key, which return value for that key, if any.
There is case, but unlike map {} it is opaque, and you can't see which functions are whitelisted in runtime.
.call is a java.util.concurrent.Callable/call
There is case, but unlike map {} it is opaque, and you can't see which functions are whitelisted in runtime.
.call is a java.util.concurrent.Callable/call
(def whitelist #{#'foo #'bar #'baz #'barfl})
(some-> str symbol resolve whitelist (.call))str can contain fully qualified function name, like "clojure.string/upper-case".
set #{} is a function of an item: returns it back, if contains it, or nil otherwise.
#' is a literal for var.
some-> takes care of nil checks after each step.
This will throw, if whitelisted var contains not callable (e.g. number) or expects arguments.
set #{} is a function of an item: returns it back, if contains it, or nil otherwise.
#' is a literal for var.
some-> takes care of nil checks after each step.
This will throw, if whitelisted var contains not callable (e.g. number) or expects arguments.
IDENTIFICATION DIVISION.
PROGRAM-ID. reverse string.
PROCEDURE DIVISION.
EVALUATE str
WHEN foo
PERFORM foo
WHEN bar
PERFORM bar
WHEN baz
PERFORM baz
WHEN barfl
PERFORM barfl
WHEN OTHER
CONTINUE
END-EVALUATE.
STOP RUN.var myProc = {"foo": foo,
"bar": bar,
"baz": baz,
"barfl": barfl};
myProc[str]?.call(); select case (str)
case ("foo")
call foo
case ("bar")
call bar
case ("baz")
call baz
case ("barfl")
call barfl
end selectcase str of
"foo" -> foo
"bar" -> bar
"baz" -> baz
"barfl" -> barflswitch (str) {
case "foo":
foo();
break;
case "bar":
bar();
break;
case "baz":
baz();
break;
case "barfl":
barfl();
break;
}switch (str){
case "bar":
bar();
break;
case "baz":
baz();
break;
case "foo":
foo();
break;
case "barfl":
barfl();
break;
default:
somethingElse();
}A break is required at the end of every case
local procedures={
foo=function() end,
bar=function() end,
baz=function() end,
barfl=function() end,
}
local function process(str)
local procedure=procedures[str]
if procedure~=nil then
procedure()
end
end
process(str)case str of
'foo': foo;
'bar': bar;
'baz': baz;
'barfl': barfl;
end;Case of string is supported by FreePascal, probably not by other Pascal "dialects".
my %proc = map { $_ => \&$_ } qw(foo bar baz barfl);
$proc{$str}->() if exists $proc{$str};Hash _%proc is assigned pairs of values by iterating over the word list created by qw() using map.
Within the block { }, the pairs are created by using the fat-comma operator (=>) to form keyword/value pairs using the loop element ($_) as the keyword value on the left and to form a subroutine reference (\&$_) on the right.
%proc becomes a dispatch table with entries like 'foo' => \&foo. sub foo must exist.
Note that names are specified without repetition.
Within the block { }, the pairs are created by using the fat-comma operator (=>) to form keyword/value pairs using the loop element ($_) as the keyword value on the left and to form a subroutine reference (\&$_) on the right.
%proc becomes a dispatch table with entries like 'foo' => \&foo. sub foo must exist.
Note that names are specified without repetition.
switch = {'foo': foo,
'bar': bar,
'baz': baz,
'barfl': barfl
}
switch_funct = switch.get(string)
if switch_funct : switch_funct()Python does not natively support switch statements, but we can use a dictionary to replicate one.
The get() method will return the value of the given key if it exists and None otherwise where foo, bar, baz, and barf1 are all declared functions.
We then can check if the get method returned a value, and if it did, execute the returned function.
The get() method will return the value of the given key if it exists and None otherwise where foo, bar, baz, and barf1 are all declared functions.
We then can check if the get method returned a value, and if it did, execute the returned function.
match str:
case 'foo': foo()
case 'bar': bar()
case 'baz': baz()
case 'barfl': barfl()Python 3
method(str).call if ["foo", "bar", "baz", "barfl"].include?(str)Select Case str
Case NameOf(Foo)
Foo()
Case NameOf(Bar)
Bar()
Case NameOf(Baz)
Baz()
Case NameOf(Barfl)
Barfl()
End SelectThe NameOf() operator evaluates at compile-time to the name of an identifier and helps ensure correctness when refactoring.
VB identifiers are case-insensitive, but the Select Case statement is case-sensitive by default.
The
Option Compare Text statement makes Select Case compare strings case-insensitively.
VB identifiers are case-insensitive, but the Select Case statement is case-sensitive by default.
The
Option Compare Text statement makes Select Case compare strings case-insensitively.