更新: | 2024-10-08 |
---|---|
作者: | @voluntas |
バージョン: | 2024.1 |
URL: | https://voluntas.github.io/ |
概要
javascript:(function(){ | |
var O = $('<div class="books"/>'); | |
var S; | |
var xs = $("#allHighlightedBooks").children(); | |
for ( var i = 0; i < xs.length; i++ ) { | |
var x = $(xs[i]); | |
var c = x.attr("class"); | |
if ( c.indexOf("bookMain") != -1 ) { | |
t = $('.title',x).text(); | |
a = $('.author',x).text(); |
#!/bin/sh | |
set -e | |
git push --all | |
git push --tags |
diff -r 1b74025a66e7 runtime/doc/eval.txt | |
--- a/runtime/doc/eval.txt Sat Sep 27 11:18:20 2014 +0200 | |
+++ b/runtime/doc/eval.txt Sun Sep 28 23:39:50 2014 +0900 | |
@@ -1869,6 +1869,7 @@ | |
join( {list} [, {sep}]) String join {list} items into one String | |
keys( {dict}) List keys in {dict} | |
len( {expr}) Number the length of {expr} | |
+lambda( {expr}) Create lambda function constructed with {expr} | |
libcall( {lib}, {func}, {arg}) String call {func} in library {lib} with {arg} | |
libcallnr( {lib}, {func}, {arg}) Number idem, but return a Number |
更新: | 2024-10-08 |
---|---|
作者: | @voluntas |
バージョン: | 2024.1 |
URL: | https://voluntas.github.io/ |
概要
#!/usr/bin/ruby | |
require 'rss' | |
require 'open-uri' | |
require 'uri' | |
# 日本人っぽいのだけ欲しい場合' | |
URL = 'http://xpathfeed.com/feed?url=http%3A%2F%2Fjp.xvideos.com%2F&xpath_list=%2F%2F*%5B%40class%3D%22thumbBlock%22%5D%2Fdiv%2Fp%5B1%5D%2Fa' | |
RSS::Parser.parse(open(URL).read).channel.items.each{|x| | |
uri = URI.parse x.link |
function in_place_history_keyword_completion() { | |
pos=CURSOR # 現在のカーソル位置を取得 | |
selected=$(history -10000 | cut -d' ' -f3- | tr '|' ' ' | tr ' ' '\n' | sort -u | peco) # 選択した結果 | |
BUFFER="${BUFFER[1,$pos]}${selected}${BUFFER[$pos,-1]}" | |
CURSOR=$#BUFFER # move cursor | |
zle -R -c # refresh | |
} | |
zle -N in_place_history_keyword_completion | |
bindkey '^R' in_place_history_keyword_completion |
Require Import ssreflect ssrfun ssrbool eqtype ssrnat seq fintype. | |
Require Import tuple finfun finset. | |
Definition answer := 10.-tuple 'I_ 4. | |
Definition compare(a0 a1 : answer) : nat := | |
count (fun x => fst x == snd x) (zip_tuple a0 a1). | |
CoInductive chomado := | |
| decided : answer -> chomado |
#!perl | |
use strict; | |
use warnings; | |
my $pattern = shift or die "usage: $0 [pattern]"; | |
while(my $line = <STDIN>){ | |
chomp $line; | |
print $line, "\n" if $line =~ /$pattern/; | |
} |