Language: C C++ D Haskell Lua OCaml PHP Perl Plain Text Python Ruby Scheme Tcl f(10); f("Hello World"); f(); f(0); f(''); sub f { my $x = shift; if (defined $x) { print("Present $x\n"); } else { print("Not Present\n"); } } Private [?] Run code Submit