This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
# + | |
# + + | |
# ++ ++ | |
# ++ ++++ | |
#++++++++ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
grammar SimpleCalc { | |
token TOP { | |
^^ <expr> $$ | |
} | |
token expr { | |
<number> | <tree-op> | |
} | |
token tree-op { |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# perl6 -MNativeCall -e 'constant LIB = ( "mysqlclient" ); sub mysql_get_client_version(--> int32) is native(LIB) { * }; say mysql_get_client_version' | |
60111 | |
# perl6 -MNativeCall -e 'constant LIB = sub { "mysqlclient" }; sub mysql_get_client_version(--> int32) is native(LIB) { * }; say mysql_get_client_version' | |
Cannot locate native library 'mysqlclient': mysqlclient: cannot open shared object file: No such file or directory |