+ exec 'rustc', qw/-O -o/, $basename, $name when 'RUST';
+ exec 'obc', qw/-x -o/, $basename, $name when 'OBERON';
+ exec 'ocamlc', qw/-o/, $basename, $name when 'OCAML';
+ exec 'dmd', qw/-version=ONLINE_JUDGE -O -release -inline -noboundscheck/, $name when 'D';
+
+ when ('BRAINFUCK') {
+ system 'bfc', $name and die "bfc failed: errno=$! return=$?";
+ rename "a.out", $basename;
+ chmod 0755, $basename;
+ exit
+ }