Skip to content

Instantly share code, notes, and snippets.

View eggplants's full-sized avatar
🏠
Working from home

haruna eggplants

🏠
Working from home
View GitHub Profile
require 'time'
o = Time.now
begin
loop do
dt = Time.at((n=Time.now)-o.to_i)
print (n-o).to_i%1800==0? 7.chr
: Time.at(Time.at(61200)-dt).strftime("LEFT TIME::{%Hh:%Mm:%Ss}")
print "\r"
sleep(1)
end
require "time";o=Time.now;loop do;print (dt=Time.now-o).to_i%1800==0? 7.chr:Time.at(dt.to_i-32400).strftime("SPENT TIME::%Hh:%Mm:%Ss");p(\r);sleep(1);end
cat exist.csv |grep "status=>\"200\""|grep -oP "url=>\".*?\""|sed -e "s/\"//g" -e "s/url=>//g"
url
http://www.u.tsukuba.ac.jp/~s1130533
http://www.u.tsukuba.ac.jp/~s1212055
http://www.u.tsukuba.ac.jp/~s1218008
http://www.u.tsukuba.ac.jp/~s1218012
http://www.u.tsukuba.ac.jp/~s1230501
http://www.u.tsukuba.ac.jp/~s1310012
http://www.u.tsukuba.ac.jp/~s1310057
http://www.u.tsukuba.ac.jp/~s1310074
http://www.u.tsukuba.ac.jp/~s1310124
require "open-uri"
out=[]
file_ext="html"
[*400..550].each{|id|
print uid="s1811#{id.to_s}"
[*1..9].each{|i|[*1..10].each{|j|["","s"].each{|prot|
begin
url=%Q!http#{prot}://cgi.u.tsukuba.ac.jp/~#{uid}/cje/e#{i.to_s}-#{j.to_s}.#{file_ext}!
data=open(url)
out<<[uid,url] if data.status[0]=="200"
id url
s1811449 http://cgi.u.tsukuba.ac.jp/~s1811449/cje/e4-3.cgi
s1811449 http://cgi.u.tsukuba.ac.jp/~s1811449/cje/e4-5.cgi
s1811449 http://cgi.u.tsukuba.ac.jp/~s1811449/cje/e4-6.cgi
s1811449 http://cgi.u.tsukuba.ac.jp/~s1811449/cje/e4-7.cgi
s1811450 http://cgi.u.tsukuba.ac.jp/~s1811450/cje/e4-3.cgi
s1811450 http://cgi.u.tsukuba.ac.jp/~s1811450/cje/e4-5.cgi
s1811450 http://cgi.u.tsukuba.ac.jp/~s1811450/cje/e4-6.cgi
s1811453 http://cgi.u.tsukuba.ac.jp/~s1811453/cje/e4-3.cgi
s1811453 http://cgi.u.tsukuba.ac.jp/~s1811453/cje/e4-5.cgi
4文字大学
愛知大学
会津大学
藍野大学
青森大学
秋田大学
朝日大学
旭川大学
麻布大学
足利大学
@eggplants
eggplants / shellgei-bot_bin.csv
Last active July 17, 2019 18:21
2019-09-18 03h
commandname
HsColour
R
Rscript
X11
[
ab
abc2abc
abc2midi
abcmatch
This file has been truncated, but you can view the full file.
.
├── NamesList.txt
├── NormalizationTest.txt
├── ShellGeiData
│   ├── LICENSE
│   ├── README.en.md
│   ├── README.md
│   ├── sd201606
│   │   ├── cccvd
│   │   ├── data
spd-say-rand(){
voice=(male1 male2 male3 female1 female2 female3 child_male child_female)
pm(){ shuf -n1 -e \- \+;}
rn(){ echo $(($RANDOM%101));}
vo_t(){ shuf -n1 -e ${voice[@]};}
spd-say -r $(pm)$(rn) -p $(pm)$(rn) -i $(pm)$(rn) -t $(vo_t) $1;}