zengargoyle

# 02:36 < nine> zengargoyle: this seems to do the trick:
for $*REPO.repo-chain.grep(CompUnit::Repository::Installable) -> $repo {
  for $repo.installed -> $dist {
    for $dist.meta<provides>.keys -> $module {
      next if $module eq "Zef::CLI"; 
      $repo.need(
        CompUnit::DependencySpecification.new(
          short-name($module),
          :ver($dist.meta<ver>)
        )

zengargoyle

zen@zim:~/p6/p6-Time-Spec-at$ zef install 6pm --deps-only
===> Searching for: 6pm
===> Searching for missing dependencies: JSON::Class, Test::META
===> Searching for missing dependencies: META6
===> Testing: JSON::Class:ver('0.0.8'):auth('github:jonathanstowe')

# Failed test 'Can load "JSON::Class" ok'
# at t/010-use.t line 7
# ===SORRY!===
# Could not find JSON::Marshal:ver<0.0.7..*> at line 77 in:

zengargoyle

===> Searching for: 6pm
[Plugin - cached] Checking: Zef::Repository::LocalCache
[Plugin - cached] 	(OK) Plugin loaded successful
[Plugin - cached] (OK) Plugin is now usable: Zef::Repository::LocalCache
[Plugin - cpan] Checking: Zef::Repository::Ecosystems
[Plugin - cpan] 	(OK) Plugin loaded successful
[Plugin - cpan] (OK) Plugin is now usable: Zef::Repository::Ecosystems
[Plugin - p6c] Checking: Zef::Repository::Ecosystems
[Plugin - p6c] 	(OK) Plugin loaded successful
[Plugin - p6c] (OK) Plugin is now usable: Zef::Repository::Ecosystems

zengargoyle

Too many positionals passed; expected 1 argument but got 2
  in method date at /home/zen/p6/p6-Time-Spec-at/.precomp/70ABE82C4CB781657E9DEB2E5991EFB653A4FEA9.1497783372.81074/C7/C791F3C0160F645D834E1CA2D3FDA6113A61526E line 1
  in regex date at /home/zen/p6/p6-Time-Spec-at/lib/Time/Spec/at/Grammar.pm6 (Time::Spec::at::Grammar) line 82
  in regex spec_base at /home/zen/p6/p6-Time-Spec-at/lib/Time/Spec/at/Grammar.pm6 (Time::Spec::at::Grammar) line 60
  in regex timespec at /home/zen/p6/p6-Time-Spec-at/lib/Time/Spec/at/Grammar.pm6 (Time::Spec::at::Grammar) line 56
  in regex TOP at /home/zen/p6/p6-Time-Spec-at/lib/Time/Spec/at/Grammar.pm6 (Time::Spec::at::Grammar) line 7
  in block <unit> at t/04-action.t line 51

zengargoyle

zen@gaz:~$ ./fc-search-codepoint ｢
/home/zen/.local/share/fonts/NotoSansCJKsc-Thin.otf
/usr/share/fonts/truetype/noto/NotoSansYi-Regular.ttf
/home/zen/.local/share/fonts/FANRGO5.TTF
/home/zen/.local/share/fonts/Dfheic.TTC
/usr/share/fonts/truetype/mplus/mplus-1p-thin.ttf
/usr/share/fonts/opentype/noto/NotoSerifCJK-Bold.ttc
/usr/share/fonts/opentype/noto/NotoSansCJK-Medium.ttc
/usr/share/fonts/truetype/mplus/mplus-2c-light.ttf
/home/zen/.local/share/fonts/NotoSansCJKtc-Bold.otf

zengargoyle

grammar A {
  rule TOP { ^ ';' <angles> <dig> <title> <angles> <url> $ }
  token angles { '<<>>' }
  token dig { 'DiG' }
  token title { \S+ }
  token url { \S+ }
}

A.new.parse('; <<>> DiG 9.10.3-P4-Ubuntu <<>> seed.bitcoin.sipa.be').say;

zengargoyle

my @files = <foo bar baz>;

my @match-eq = <foo bar baz>.map( -> $s { * eq $s } );  # OK
my @match-rx = <foo ^ba>.map( -> $r { * ~~ /<$r>/ } );  # NOT OK
my @match-rx-pointy = <foo ^ba>.map( -> $r { -> $x { $x ~~ /<$r>/ } } );  # OK

sub match-it (@files, @matchers) {
  return gather for @files -> $f {
    take $f if @matchers.grep({ $_($f) });

zengargoyle

javascript:(function(){var%20newSS,%20styles='*%20{%20background:white%20!%20important;%20color:%20black%20!important;%20text-decoration:%20none%20!important%20}%20:link,%20:link%20*%20{%20color:%20#0000EE%20!important%20}%20:visited,%20:visited%20*%20{%20color:%20#551A8B%20!important%20}';%20if(document.createStyleSheet)%20{%20document.createStyleSheet("javascript:'"+styles+"'");%20}%20else%20{%20newSS=document.createElement('link');%20newSS.rel='stylesheet';%20newSS.href='data:text/css,'+escape(styles);%20document.getElementsByTagName("head")[0].appendChild(newSS);%20}%20})();

zengargoyle

zen@zim:~$ rakudobrew build moar-blead
... <snip build> ...
cp -- /opt/rakudobrew/moar-blead-nom/install/bin/perl6-m /opt/rakudobrew/moar-blead-nom/install/bin/perl6
chmod -- 755 /opt/rakudobrew/moar-blead-nom/install/bin/perl6

Rakudo has been built and installed.
Updating zef as well
Your branch is up-to-date with 'origin/master'.
===> Testing: zef:auth('github:ugexe')
t/00-load.t ........... ok

zengargoyle

Metafilter youtube link snarfer

Requires:

Perl - :)

Mojolicious - http://mojolicious.org/ - Your distro probably has a package
for this (in Debian it's libmojolicious-perl), otherwise it's easy to
install.