dugword

#!/usr/bin/env perl6

use v6;

say "This is a test script";

my $listen = IO::Socket::INET.new(
    :listen,
    :localhost('localhost'),
    # :localport(80),

dugword

#!/usr/bin/env perl6

say "Testing classes";

my class Foo {
    has $.bar;
    has $.baz;

    multi method new (:$bar!, :$baz!) {
        return self.bless(:$bar, :$baz);

dugword

#!/usr/bin/env perl6

say "Testing classes";

my class Foo {
    has $.bar;
    has $.baz;

    multi method new {
        my $bar = 'foo';