Skip to content

Instantly share code, notes, and snippets.

View ingydotnet's full-sized avatar

Ingy döt Net ingydotnet

View GitHub Profile
package AuApp;
use Meta::Module -compile;
package AuApp::boom;
sub execute { ... }
package AuApp::bam;
sub execute { ... }
hello:
goodbye:
main train station: Hauptbahnhof
airport: Flughafen
thank you: danke
please:
excuse me (I'm sorry for spilling your beer):
excuse me (get out of my way):
excuse me (give me your attention):
one:
yes:
no:
hello:
goodbye:
good morning:
good evening:
thank you: danke
please:
excuse me (I'm sorry for spilling your beer):
excuse me (get out of my way):
ingy@thinkingy:~/Work/stackato-samples/python/bottle-currency$ ping api.stackato.local
PING api.stackato.local (192.168.4.155) 56(84) bytes of data.
64 bytes from stackato.local (192.168.4.155): icmp_req=1 ttl=64 time=1.88 ms
64 bytes from stackato.local (192.168.4.155): icmp_req=2 ttl=64 time=0.525 ms
^C64 bytes from stackato.local (192.168.4.155): icmp_req=3 ttl=64 time=0.405 ms
--- api.stackato.local ping statistics ---
3 packets transmitted, 3 received, 0% packet loss, time 2000ms
rtt min/avg/max/mdev = 0.405/0.939/1.888/0.673 ms
ingy@thinkingy:~/Work/stackato-samples/python/bottle-currency$ # ../../../vmc-tcl/bin/stackato target api.stackato.local
ingy@thinkingy:~/Work/stackato-samples/python/bottle-currency$ ../../../vmc-tcl/bin/stackato target
[http://api.stackato.local]
ingy@thinkingy:~/Work/stackato-samples/python/bottle-currency$ wget http://api.stackato.local
--2011-08-15 23:07:01-- http://api.stackato.local/
Resolving api.stackato.local... 192.168.4.155
Connecting to api.stackato.local|192.168.4.155|:80... connected.
HTTP request sent, awaiting response... 200 OK
Length: 6669 (6.5K) [text/html]
Saving to: `index.html'
ingy@thinkingy:~/Work/stackato-samples/python/bottle-currency$ ../../../vmc-tcl/bin/stackato target http://api.stackato.local
Host is not valid: 'http://api.stackato.local'
Would you like see the response ? [yN]: y
<<<
Error (JSON 404): <html>
<head><title>404 Not Found</title></head>
<body bgcolor="white">
<center><h1>404 Not Found</h1></center>
<hr><center>nginx/0.7.65</center>
package Foo;
use Moo;
has x => (is => 'rw');
has y => (is => 'rw');
package main;
use XXX;
XXX 'Foo'->new;
ingy@thinkingy:~$ perl -MXXX -MPegex -e 'XXX pegex("src/testml-pgx/testml.pgx")->parse("A = 1;\nB = 2;\n")'
---
testml_document:
- code_section:
- assignment_statement:
- variable_name:
1: A
- code_expression:
- code_object:
number_object:
ingy@thinkingy:~$ perl -MXXX -MPegex -e 'XXX pegex("src/testml-pgx/testml.pgx")->parse("A = 1\nB = 2;\n")'
Error parsing Pegex document:
msg: You seem to be missing a semicolon
line: 1
context: "\nB = 2;\n"
position: 5
at /usr/local/share/perl/5.10.1/Pegex/Grammar.pm line 47
ingy@thinkingy:~$ perl -MXXX -MPegex -e 'XXX pegex("src/testml-pgx/testml.pgx")->parse("A = 1;\n&^%B = 2;\n")'
Error parsing Pegex document:
msg: Parse document failed for some reason
line: 2
context: "&^%B = 2;\n"
position: 7
at /usr/local/share/perl/5.10.1/Pegex/Grammar.pm line 47