testing.txt

✔ ~/devel/test-rakudo-buildpack [master|✔]
00:01 $ heroku addons:create heroku-postgresql
Creating postgresql-adjacent-61232... done, (free)
Adding postgresql-adjacent-61232 to sleepy-reef-21338... done
Setting HEROKU_POSTGRESQL_ONYX_URL and restarting sleepy-reef-21338... done, v14
Database has been created and is available
 ! This database is empty. If upgrading, you can transfer
 ! data from another database with pg:copy
Use `heroku addons:docs heroku-postgresql` to view documentation.
✔ ~/devel/test-rakudo-buildpack [master|✔]
00:01 $ heroku run bash
Running bash on sleepy-reef-21338.... up, run.6185
~ $ perl6 ./app.pl
Entering the development dance floor: http://0.0.0.0:41219
[2016-04-05T21:22:38Z] Started HTTP server.
^C
~ $ echo $DATABASE_URL
postgres://doabggwkfenmjy:dOVN1DKH8ci0OHDMkZmFwjGsQI@ec2-23-21-157-223.compute-1.amazonaws.com:5432/dc4fgnu6usf74f
~ $  perl6 -MDBIish
To exit type 'exit' or '^D'
> my $dbh = DBIish.connect('Pg', :host<ec2-23-21-157-223.compute-1.amazonaws.com>, :database<dc4fgnu6usf74f>, :user<doabggwkfenmjy>, :password<dOVN1DKH8ci0OHDMkZmFwjGsQI>);
(my \DBDish::Pg::Connection_117545360 = DBDish::Pg::Connection.new(AutoCommit => Bool::True, in_transaction => Bool::False, Statements => {}, last-sth-id => Any, last-rows => Any, parent => DBDish::Pg.new(Version => v0.1.1, Connections => {"DBDish::Pg::Connection|117545360" => DBDish::Pg::Connection_117545360}, parent => DBDish::ErrorHandling.new(parent => Any, PrintError => Bool::False, RaiseError => Bool::True), PrintError => Bool::False, RaiseError => Bool::True), PrintError => Bool::False, RaiseError => Bool::True))
>  my $sth = $dbh.prepare('SELECT 1+2');
(my \DBDish::Pg::StatementHandle_118661976 = DBDish::Pg::StatementHandle.new(Executed => 0, Finished => Bool::True, parent => (my \DBDish::Pg::Connection_117545360 = DBDish::Pg::Connection.new(AutoCommit => Bool::True, in_transaction => Bool::False, Statements => {"DBDish::Pg::StatementHandle|118661976" => DBDish::Pg::StatementHandle_118661976}, last-sth-id => Any, last-rows => Any, parent => DBDish::Pg.new(Version => v0.1.1, Connections => {"DBDish::Pg::Connection|117545360" => DBDish::Pg::Connection_117545360}, parent => DBDish::ErrorHandling.new(parent => Any, PrintError => Bool::False, RaiseError => Bool::True), PrintError => Bool::False, RaiseError => Bool::True), PrintError => Bool::False, RaiseError => Bool::True)), PrintError => Bool::False, RaiseError => Bool::True))
> $sth.execute();
1
> $sth.allrows();
([3])