gudn tach!
Das hier ist gültiges Perl 6:
multi sub infix:«<*)))><»(Int $x, Int $y) {
return $x * $y;
}
say 10 <*)))>< 10;
boah, perl 6 wird so geil! :-)
als mini-ergaenzung: es gibt in perl sogar einen goatse-operator, siehe z.b.
http://www.catonmat.net/blog/secret-perl-operators/ (ist keine shock-seite).
prost
seth