Perl.sysInit() func run(script:String) { let pl = Perl() let sv = pl.eval(script) println("eval \"\(script)\"") if !pl.evalok { println(" err: \(pl.errstr)") } else { println(" !!: \(sv.asBool)") println(" int: \(sv.asInt)") println(" +0.0: \(sv.asDouble)") println(" q{}.: \(sv.asString)") } } run("reverse q(rekcaH lreP rehtonA tsuJ)") run("atan2(0,-1)") run("q{0 but true}") run("my @a = (0,1,2,3)
{{#tags}}- {{label}}
{{/tags}}