Image

head

code

root

para

L<Examples| file:../examples/index.podlite>


L<Download |file:../download/index.podlite>


React

=begin React :component<HeaderCol> :id<menu> 
=para L<Documentation|/doc/introduction>
=para L<Modules| /mods>
=para L<Examples| file:../examples/index.podlite>
=para L<Download |file:../download/index.podlite>
=para L<About|file:../about/index.podlite>
=para 🔍 K<⌘K>/K<ctrl-K>
=end React


HEADER

FOOTER

README


my sub stringify(str $_ --> Str:D) {
    .contains(/ \W /) ?? "'$_'" !! $_.Str
}

my sub as-cli-arguments(
  Capture:D  $c,
  Bool:D    :$named-anywhere = %*SUB-MAIN-OPTS<named-anywhere> // False,
--> Str:D) is export {

    my str $positionals = $c.list.map(*.&stringify).join(" ");

    my str $nameds = $c.hash.kv.map(-> $key, $value {
        my str $name = stringify $key;
        $value ~~ Bool
          ?? $value
            ?? "--$name"
            !! "--/$name"
          !! "--$name=&stringify($value)"
    }).join(" ");

    my str $space = $positionals && $nameds ?? " " !! "";
    $named-anywhere
      ?? "$positionals$space$nameds"
      !! "$nameds$space$positionals"
}



as-cli-arguments - stringify a Capture as command-line arguments


=begin code :lang<raku>

use as-cli-arguments;
sub MAIN(|c) { say as-cli-arguments c, :named-anywhere }

=end code


=begin code :lang<raku>

use as-cli-arguments;
my %*SUB-MAIN-OPTS = :named-anywhere;
sub MAIN(|c) { say as-cli-arguments c }

=end code


as-cli-arguments exports a single subroutine C<as-cli-arguments> that takes
a C<Capture> object, and returns a string that represents the contents of
the C<Capture> as command line arguments.


The subroutine also takes an optional named arguments C<:named-anywhere> to
indicate whether or not the "named arguments anywhere" mode should be assumed.
By default, this will use the C<%*SUB-MAIN-OPTS<named-anywhere>> setting,
if available.  Else it will default to C<False>.


This is mainly intended as a helper subroutine for command-line scripts and
modules that want to give feedback about the given (or perceived) arguments.


Source can be located at: https://github.com/lizmat/as-cli-arguments .
Comments and Pull Requests are welcome.


This library is free software; you can redistribute it and/or modify it under the Artistic License 2.0.


as-cli-arguments

my sub finder(\keys, \key) { keys.first(* eq key, :k) }

class Array::Unsorted::Map:ver<0.0.1>:auth<zef:lizmat> does Associative {
    has $.keys   is built(:bind) is required;
    has $.values is built(:bind) is required;
    has &.finder is built(:bind) = &finder;

    method AT-KEY(\key) {
        (my $pos := &!finder($!keys, key)).defined
          ?? $!values[$pos]
          !! Nil
    }

    method EXISTS-KEY(\key) { &!finder($!keys, key).defined }

    method kv() {
        gather for ^$!keys.elems {
            take $!keys[$_];
            take $!values[$_];
        }
    }
    method anti-pairs() {
        (^$!keys.elems).map: -> int $i { $!values[$i] => $!keys[$i] }
    }
    method pairs() {
        (^$!keys.elems).map: -> int $i { $!keys[$i] => $!values[$i] }
    }
    method iterator() {
        self.pairs.iterator
    }
}



Array::Unsorted::Map - Provide a Map interface for 2 unsorted lists


=begin code :lang<raku>

use Array::Unsorted::Util;
use Array::Unsorted::Map;

my @keys   = <b a>;
my @values = 666, 42;

my %map := Array::Unsorted::Map.new(:@keys, :@values);

say %map<a>;  # 42;
say %map<b>;  # 666;
say %map<c>;  # Nil

say %map.keys;    # (b a)
say %map.values;  # (666 42)

my @object-keys = @keys.map: *.WHICH;
my %object-map := Array::Unsorted::Map.new(
  :keys(@object-keys), :@values), :finder( -> \keys, \key {
      my $which := key.WHICH;
      keys.first(* eq $which, :k)
  })
);

=end code


C<Array::Unsorted::Map> is a class that can be used to provide a C<Map>
interface to two unsorted lists: one for keys, and one for values, where the
key in the first list, is associated with the value in the second list at the
same position.


By default, keys are found by doing a string comparison with the elements in
the list of keys.  This can be overriden by specifying a C<finder> named
parameter containing code that will take the list and the key as parameters.
This is then expected to either return an index position or Nil.


Source can be located at: https://github.com/lizmat/Array-Unsorted-Map .
Comments and Pull Requests are welcome.


The Raku Knowledge Base


=begin React :component<HeaderCol> :id<footer>  
=begin nested :!nested
=item1 B<Language>
    =item2 L<Get started|file:../getting-started/getting-started.podlite>
    =item2 L<Why Raku?|/doc/language/faq#Why-should-I-learn-Raku-What's-so-great-about-it>
    =item2 L<Try Raku|https://glot.io/new/raku>
    =item2 L<Raku cheat sheet|https://github.com/Raku/mu/blob/master/docs/Perl6/Cheatsheet/cheatsheet.txt>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<Raku on Exercism|https://exercism.org/tracks/raku>
    =item2 L<Wikipedia|https://en.wikipedia.org/wiki/Raku_(programming_language)>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=end nested
=begin nested :!nested

=item1 B<L<Documentation|/doc>>
    =item2 L<Getting started, Migration guides from other languages, & Tutorials | file:../doc/introduction.podlite>
    =item2 L<Language References|file:../doc/reference.podlite>
    =item2 L<Type Reference| file:../doc/types.podlite>
    =item2 L<Miscellaneous| file:../doc/miscellaneous.podlite>
    =item2 L<FAQs (Frequently Asked Questions)|/doc/language/faq>
    =item2 L<Community|/doc/language/community>
    =item2 L<The list of all documents|file:../doc/index.podlite>

=item1 B<Resources>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>

=end nested
=begin nested :!nested

=item1 B<Resoures>
    =item2 L<Download | file:../download/index.podlite>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=item1 B<Learning>
    =item2 L<The Raku Guide|https://raku.guide/>
    =item2 L<Wikibook |https://en.wikibooks.org/wiki/Raku_Programming>
    =item2 L<Books |https://perl6book.com/>
    =item2 L<Rosetta Code | https://www.raku.org/community/rosettacode>
    =item2 L<Learn Raku in Y minutes|https://learnxinyminutes.com/docs/raku/>
    =item2 L<Golfing |https://github.com/AlexDaniel/raku-golf-cheatsheet>
=end nested
=begin nested :!nested

=item1 B<Explore>
    =item2 L<Raku Blog Aggregator|https://planet.raku.org/>
    =item2 L<Rakudo Weekly|https://rakudoweekly.blog/>
    =item2 L<The Weekly Challenge |https://perlweeklychallenge.org/>
    =item2 L<Raku Advent Calendar|https://raku-advent.blog/>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>
    =item2 L<empty|#>

=end nested
=end React


=begin React :component<CookieConsent> :id<CookieConsent> :buttonCaption("Got it!")
=para
This website uses cookies for analytics.
=end React


README

NAME

SYNOPSIS

DESCRIPTION

AUTHOR

COPYRIGHT AND LICENSE

Array::Unsorted::Map v0.0.1

Authors

License

Dependencies

Test Dependencies

Provides

Documentation