Skip to content

Instantly share code, notes, and snippets.

🏠
Working from home

Juan Julián Merelo Guervós JJ

🏠
Working from home
Block or report user

Report or block JJ

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@JJ
JJ / txt.p6
Created Dec 2, 2017
Split by `and`
View txt.p6
use JSON::Tiny;
sub MAIN( Str $letter-to-santa = 'letters/dear-santa.txt' ) {
say to-json $letter-to-santa.IO.slurp().split(/\s* «and» \s*/);
}
@JJ
JJ / genera-baraja,py
Created Jul 2, 2017
Generar una baraja de cartas en una lista en Python
View genera-baraja,py
# Tip de https://t.co/tQKo7Err73 para "aplanar" una lista de listas
sum(list(map( lambda n: [str(n)+'♠',str(n)+'♣',str(n)+'♥',str(n)+'♦'], ['A','J','Q','K',2,3,4,5,6,7,8,9,10])),[])
# El map genera una lista de listas, y sum agrega las listas del segundo nivel en una sola, usando la sobrecarga de + para listas
@JJ
JJ / cpu-hog-with-top.sh
Last active Jul 1, 2017
Get the process consuming the most CPU with a trimmed down version of ps, i.e., in busybox
View cpu-hog-with-top.sh
# get the list of PIDs and cpu usage via the batch version of top if ps is not fully functional, take out the headers, sort numerically using the 9th column, which is the CPU usage as key, take the last one, and extract the second column
top -n 1 -b | tail -n +8 | sort -k9 -n | tail -1 | cut -d ' ' -f 2
@JJ
JJ / cpu-hog.sh
Last active Jul 1, 2017
Get the process PID consuming the most CPU
View cpu-hog.sh
# get the list of PIDs and cpu use, sort numerically using the second column or key, take the last one, and extract the second column
ps —no-headers -eo pid,%cpu | sort -k2 -n | tail -1 | cut -d ' ' -f 2
@JJ
JJ / powers-of-two.py
Created Jun 29, 2017
Test for powers of 2 using bitwise operators
View powers-of-two.py
print(list(filter( lambda pow2: pow2^(pow2-1) > pow2, range(1000))))
@JJ
JJ / md-to-html.mk
Created May 28, 2017
Makefile que usa pandoc o markdown-html dependiendo de cuál esté presente
View md-to-html.mk
HTML = $(patsubst %.md,%.html,$(wildcard *.md))
all: $(HTML)
$(HTML): %.html: %.md
ifneq ($(shell command -v pandoc 2> /dev/null),)
pandoc $< -o $@
else
ifneq ($(shell command -v markdown-html 2> /dev/null),)
markdown-html $< -o $@
@JJ
JJ / pandoc.mk
Created May 28, 2017
Convert markdown to HTML with pandoc
View pandoc.mk
HTML = $(patsubst %.md,%.html,$(wildcard *.md))
all: $(HTML)
$(HTML): %.html: %.md
pandoc $< -o $@
@JJ
JJ / substitute-2.mk
Created May 28, 2017
Substitute extensions in Makefiles
View substitute-2.mk
.PHONY = count
HTML = $(patsubst %.md,%.html,$(wildcard *.md))
count: ;@echo $(HTML)
@JJ
JJ / substitute-1.mk
Created May 28, 2017
Substitute extensions in Makefiles
View substitute-1.mk
.PHONY = count
MD = $(wildcard *.md)
HTML = $(MD:.md=.html)
count: ;@echo $(HTML)
@JJ
JJ / wildcard.mk
Created May 28, 2017
Print files with an extension
View wildcard.mk
.PHONY = count
MAKEFILES = $(wildcard *.mk)
count: ;@echo $(MAKEFILES)
You can’t perform that action at this time.