Enhance

.cro.yml

@@ -0,0 +1,15 @@
+---
+env:  []
+endpoints:
+  -
+    protocol: http
+    id: http
+    host-env: EXAMPLES_HOST
+    name: HTTP
+    port-env: EXAMPLES_PORT
+id: test
+name: test
+links:  []
+cro: 1
+entrypoint: service.p6
+...

.travis.yml

@@ -4,7 +4,7 @@ language: perl6
 
 perl6:
     - latest
-    - '2018.06'
+    - '2019.11'
 
 install:
     - rakudobrew build zef

META6.json

@@ -1,25 +1,40 @@
 {
-    "perl"         : "6.*",
-    "name"         : "perl6-examples",
-    "version"      : "0.0.1",
-    "auth"         : "github:perl6",
-    "license"      : "Artistic-2.0",
-    "description"  : "Many examples of Perl 6 code",
-    "depends"      : [ "URI", "Pod::To::HTML", "LWP::Simple", "Algorithm::Soundex",
-                       "DBIish", "File::Find", "File::Temp", "Text::VimColour",
-                       "HTTP::Easy", "Terminal::ANSIColor", "Web::Request", "HTML::Escape",
-                       "Term::termios" ],
-    "test-depends" : [ "Test", "Test::META" ],
-    "source-url"   : "git://github.com/perl6/perl6-examples.git",
-    "provides"     : {
-        "Examples" : "lib/Examples.pm",
-        "Examples::Categories" : "lib/Examples/Categories.pm",
-        "Examples::Example" : "lib/Examples.pm",
-        "Text::Levenshtein" : "lib/Text/Levenshtein.pm",
-        "Pod6" : "lib/Pod/Parser.pm",
-        "Pod6Block" : "lib/Pod/Parser.pm",
-        "Context" : "lib/Pod/Parser.pm",
-        "Pod::Parser" : "lib/Pod/Parser.pm",
-        "Pod::To::Perl" : "lib/Pod/To/Perl.pm"
-     }
-}
+  "name": "perl6-examples",
+  "description": "Many examples of Raku code",
+  "version": "0.0.1",
+  "perl": "6.*",
+  "auth": "github:Raku",
+  "depends": [
+    "URI",
+    "Pod::To::HTML",
+    "LWP::Simple",
+    "Algorithm::Soundex",
+    "DBIish",
+    "File::Find",
+    "File::Temp",
+    "HTTP::Easy",
+    "Terminal::ANSIColor",
+    "Web::Request",
+    "HTML::Escape",
+    "Term::termios",
+    "Cro::HTTP",
+    "Cro::WebApp",
+    "Terminal::Spinners"
+  ],
+  "test-depends": [
+    "Test",
+    "Test::META"
+  ],
+  "provides": {
+    "Context": "lib/Pod/Parser.pm",
+    "Examples": "lib/Examples.pm",
+    "Examples::Categories": "lib/Examples/Categories.pm",
+    "Examples::Example": "lib/Examples.pm",
+    "Pod6": "lib/Pod/Parser.pm",
+    "Pod6Block": "lib/Pod/Parser.pm",
+    "Pod::Parser": "lib/Pod/Parser.pm",
+    "Pod::To::Perl": "lib/Pod/To/Perl.pm"
+  },
+  "license": "Artistic-2.0",
+  "source-url": "git://github.com/perl6/perl6-examples.git"
+}

Makefile

@@ -13,20 +13,20 @@ help:
 
 html: install-deps
 	@echo "*** Generating HTML pages ***"
-	perl6 htmlify.pl
+	raku -Ilib htmlify.p6
 
-html-nohighlight: install-deps
+html-nohighlight:
 	@echo "*** Generating HTML pages (without syntax highlighting) ***"
-	perl6 htmlify.pl --no-highlight
+	raku -Ilib htmlify.p6 --no-highlight
 
-run-all: install-deps
-	perl6 bin/run-examples.pl
+run-all:
+	raku bin/run-examples.raku
 
 web-server:
-	perl app.pl daemon
+	cro run .
 
-test: install-deps
-	prove --exec perl6 -r t
+test:
+	prove --exec raku -r t
 
 install-deps:
 	@echo "*** Installing dependencies ***"

README.md

@@ -1,6 +1,6 @@
 # Raku Examples
 
-[![Build Status](https://travis-ci.org/perl6/perl6-examples.svg?branch=master)](https://travis-ci.org/perl6/perl6-examples)
+[![Build Status](https://travis-ci.org/Raku/examples.svg?branch=master)](https://travis-ci.org/Raku/examples)
 
 This is intended to be a repository for all kinds of Raku examples.
 
@@ -11,11 +11,11 @@ If an example needs an implementation specific version then it should end in
 on Rakudo, it should end in .rakudo.
 
 If you want to contribute, just ask! The quicker choice is to use IRC:
-[join `#raku` on `irc.freenode.net`](https://webchat.freenode.net/?channels=#raku-dev>)
+[join `#raku` on `irc.freenode.net`](https://webchat.freenode.net/?channels=#raku>)
 and you'll be welcome.
 
 Please use POD6 (mostly this template
-https://github.com/perl6/perl6-examples/blob/master/doc/example-template.pl) when
+https://github.com/Raku/examples/blob/master/doc/example-template.pl) when
 adding a new example.
 
 ## Goals
@@ -52,7 +52,7 @@ adding a new example.
 |tutorial            | Tutorial examples |
 |wsg                 | Answers for Winter Scripting Games |
 
-Since you have a commit-bit (if not then talk to the folks at #perl6 on
+Since you have a commit-bit (if not then talk to the folks at #raku on
 irc.freenode.net) feel free to commit your changes to the main repository.
 No need to submit a pull request!
 
@@ -62,7 +62,7 @@ To run all examples and tests, a number of modules need to be installed.
 
 These are listed in `META6.json`.
 
-They can be installed via [`zef`](https://modules.perl6.org/dist/zef):
+They can be installed via [`zef`](https://modules.raku.org/dist/zef):
 
     $ zef --depsonly install .
 
@@ -72,7 +72,7 @@ To run most examples (all examples excluding those which take a very long
 time or are memory hogs) one can use the `run-examples.pl` script in the
 `bin` directory:
 
-    $ perl6 bin/run-examples.pl
+    $ raku bin/run-examples.pl
 
 or simply via the `run-all` target of the Makefle:
 
@@ -83,7 +83,7 @@ use the `--category=<category-dir>` option specifying the desired category's
 directory name.  For example, to run the examples for the `cookbook`
 category, use the following:
 
-    $ perl6 bin/run-examples.pl --category=cookbook
+    $ raku bin/run-examples.pl --category=cookbook
 
 ## Building the examples documentation
 
@@ -93,15 +93,15 @@ To build the examples documentation web pages, simply run
 
 or you can run the `htmlify.p6` script in the base directory:
 
-    $ perl6 htmlify.p6
+    $ raku -Ilib htmlify.p6
 
 After the pages have been generated, you can view them on your local
-computer by starting the included `app.pl` program:
+computer by starting the included `service.p6` program:
 
-    $ perl app.pl daemon
+    $ raku service.p6
 
 You can then view the examples documentation by pointing your web browser at
-http://localhost:3000.
+http://localhost:20000.
 
 ## License Information
 

TODO.md

@@ -0,0 +1,3 @@
+- [x] Ensure run-examples runs without errors
+- [ ] Update extensions
+- [ ] Revise website generation

bin/rpn3

@@ -1,4 +1,5 @@
-#!/usr/local/bin/perl6
+#!/usr/bin/env perl6
+
 use v6;
 
 # FROM: http://daniel.ruoso.com/categoria/perl/rpn-calculator-perl6 by [email protected]

bin/run-examples.pl → bin/run-examples.raku

@@ -4,48 +4,37 @@
 
 =head1 NAME
 
-run-all-examples.pl - run all current Perl 6 examples
+run-all-examples.pl - run all current Raku examples
 
 =head1 SYNOPSIS
 
-    $ perl6 run-all-examples.pl [--category=<category-name>]
+    $ raku run-all-examples.pl [--category=<category-name>]
 
 =head1 DESCRIPTION
 
-A script to run all current Perl 6 examples in the C<perl6-examples>
+A script to run all current Raku examples in the C<examples>
 repository and print their output.  This is useful to check if the examples
 compile and/or work as expected.
 
 =end pod
 
 use File::Find;
 
-my @categories = qw{
-    99-problems
-    best-of-rosettacode
-    cookbook
-    euler
-    interpreters
-    module-management
-    parsers
-    perlmonks
-    rosalind
-    shootout
-    tutorial
-    wsg
-};
-
 # skip interactive examples; need to work out how to pass input data to
 # interactive examples
 my @interactive-examples = qw{
     01-read-from-terminal.pl
+    15-05-get-char.p6
     24-game.pl
     balanced-brackets.pl
     create-a-two-dimensional-array-at-runtime.pl
     event10-dwhipp.p6
     event005-eric256.pl
     event008-eric256.pl
     event008-j1n3l0.pl
+    16-18-catch-control-c.p6
+    19-01cgi-script.p6
+    calc.p6
 };
 
 # skip memory hogs
@@ -59,10 +48,13 @@ =head1 DESCRIPTION
 # skip long-running examples
 my @long-runners = qw{
     prob010-polettix.pl
+    prob060-andreoss.pl
     prob092-moritz.pl
     prob104-moritz.pl
     prob149-shlomif.pl
     prob189-shlomif.pl
+    prob039-quinny.pl
+    prob284-shlomif.p6
 };
 
 # skip examples requiring internet access
@@ -76,28 +68,24 @@ =head1 DESCRIPTION
     lcsq-grondilu.pl
 };
 
-my @examples-to-skip = @interactive-examples,
-                        @memory-hogs,
-                        @long-runners,
-                        @internet-required,
-                        @shared-lib-required,
-                        ;
+my @examples-to-skip = flat |@interactive-examples,
+                       |@memory-hogs,
+                       |@long-runners,
+                       |@internet-required,
+                       |@shared-lib-required;
 
 sub MAIN (:$category) {
-    @categories = [$category] if $category;
-    my $base-dir = $*CWD;
+    my @categories = $category ?? ["categories/$category"] !! 'categories'.IO.dir.grep({ $_.basename !~~ 'games' });
     for @categories -> $dir {
-        my @example-files = find(dir => "categories/" ~ $dir).grep(/<?!after 'p5'>.p(l|6)$/).sort;
+        my @example-files = find(:$dir, name => / <?!after 'p5'> .p(l|6) $ /).sort;
         for @example-files -> $example {
             my $example-dir = $example.dirname;
             my $example-name = $example.basename;
             next if grep $example-name, @examples-to-skip;
             say $example-dir ~ "/" ~ $example-name;
-            chdir $example-dir;
-            qqx{perl6 $example-name}.say;
-            chdir $base-dir;
+            indir($example-dir, {
+                shell "$*EXECUTABLE.absolute() $example-name";
+            });
         }
     }
 }
-
-# vim: expandtab shiftwidth=4 ft=perl6

categories/99-problems/99-problems.pod

@@ -1,6 +1,6 @@
 =encoding utf8
 
-=head1 99 Perl 6 Problems
+=head1 99 Raku Problems
 
 Based on an original Prolog problem list by Werner Hett
 L<http://sites.google.com/site/prologsite/prolog-problems>.

categories/99-problems/P01-scottp.pl → categories/99-problems/P01-scottp.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P01-topo.pl → categories/99-problems/P01-topo.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P02-scottp.pl → categories/99-problems/P02-scottp.raku

@@ -1,3 +1,5 @@
+#!/usr/bin/env perl6
+
 use v6;
 
 =begin pod

categories/99-problems/P02-topo.pl → categories/99-problems/P02-topo.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P03-scottp.pl → categories/99-problems/P03-scottp.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P03-topo.pl → categories/99-problems/P03-topo.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P04-scottp.pl → categories/99-problems/P04-scottp.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod

categories/99-problems/P04-topo.pl → categories/99-problems/P04-topo.raku

@@ -1,3 +1,4 @@
+#!/usr/bin/env perl6
 use v6;
 
 =begin pod