Skip to content

Instantly share code, notes, and snippets.

View sasasin's full-sized avatar

Shinnosuke Suzuki sasasin

16 followers · 13 following
View GitHub Profile
@sasasin
sasasin / block.txt
Created September 21, 2011 08:42 — forked from taichi/block.txt
Personal BlockList用のブロックドメインリスト
http://q.hatena.ne.jp/1316511935
https://chrome.google.com/webstore/detail/nolijncfnkgaikbjbdaogikpmpbdcdef
2chfinder.com
a.hatena.ne.jp
anond.hatelabo.jp
ceron.jp
clip.livedoor.com
friendfeed.com
@sasasin
sasasin / ads2500w_rename.sh
Created October 7, 2012 07:51
JUSTIO ADS2500Wで作成したファイル名を、lsしたときページ順に並ぶよう、リネームするコマンドです。
#!/bin/sh
ls "$@" | while read f; do
BEFORE_NAME=$f
AFTER_NAME=$(ls $f | awk 'BEGIN{FS="_"}{print "$0" $1 "." $2 "." $3}' | awk 'BEGIN{FS="."}{printf("HOGE.%s.%05d.jpg\n",$2,$3)}')
mv $BEFORE_NAME $AFTER_NAME
done
@sasasin
sasasin / urauturi_hosei.sh
Created October 7, 2012 07:53
Imagemagickを使用し、ドキュメントスキャナで取り込んだ画像の裏写り補正を行うコマンドです。
#!/bin/sh
mogrify -channel Red -separate -modulate 110 +contrast "$@"
@sasasin
sasasin / dir2pdf.sh
Created October 7, 2012 07:56
ディレクトリに集めた画像ファイルを、PDFファイルに固めるスクリプトです。コミックや小説のため「右から左へ」のフラグをPDFに埋め込んでいます。
#!/bin/sh
export MAGICK_TEMPORARY_PATH=$HOME
find "$@" -type d | while read f; do
OUTDIR=$f
rm -f "$(pwd)"/"${OUTDIR}".pdf
echo "converting $f "
(jpg2pdf.pl \
@sasasin
sasasin / jpg2pdf.pl
Created October 9, 2012 14:19
複数のjpeg ファイルをpdfに変換するPerlスクリプトです。オリジナルに対し、コマンドラインオプションを受けとるよう改修しています。
#!/usr/bin/perl
# ******************************************************
# Software name :convert jpeg to pdf (複数のjpeg ファイルをpdfに変換)
# jpg2pdf.pl
# version 0.1 (2010/December/07)
# version 0.2 (2012/March/10)
# version 0.3 (2012/October/09)
#
# Copyright (C) 2010-2012, INOUE Hirokazu
@sasasin
sasasin / rename_hoge.sh
Created October 18, 2012 10:23
なんだかよくわからない、リネームコマンドです。
#!/bin/sh
ls *.pdf \
| grep -v '^zip2pdf\.' \
| sort \
| perl -wnl -aF'\.' -e 'print(pop(@F) . "|" . join(".", @F) . "|" . "19990104." . sprintf("%06d", $.) )' \
| awk 'BEGIN{FS="|"}{print "mv \"" $2 "." $1 "\" zip2pdf." $3 "." $1}' \
> hoge.txt
@sasasin
sasasin / zip2pdf.sh
Created October 18, 2012 10:32
ZIP書庫をPDFに変換するスクリプトです。dir2pdf.sh,jpg2pdf.pl,pdfdirectionを併せてセットアップする必要があります。
#!/bin/sh
ls "$@" | while read f; do
echo "converting $f "
sleep 1
OUTDIR=zip2pdf.$(date +%Y%m%d.%H%M%S)
mkdir "${OUTDIR}"
unzip -q -o -j "$f" -d "${OUTDIR}"
rm -f "${OUTDIR}".pdf
dir2pdf.sh "${OUTDIR}"
@sasasin
sasasin / rename_piyo.sh
Created October 19, 2012 01:35
もっと単純な、リネームコマンドです。
ls \
| awk '{printf("mv \"%s\" 20121018.%06d\n", $0 , NR + 1000)}' \
| sh
@sasasin
sasasin / vboxcontorl.sh
Last active October 12, 2015 15:47
VirtualBoxのVM起動停止スクリプト。自宅の運用方針に合うように、かつ、Ubuntu用に、改変を行ったもの。ベースは→ http://www.pclinuxos.com/forum/index.php?topic=103651.0
#! /bin/sh
# vboxcontrol Startup script for VirtualBox Virtual Machines
#
# chkconfig: 345 99 01
# description: Manages VirtualBox VMs
# processname: vboxcontrol
#
# pidfile: /var/run/vboxcontrol/vboxcontrol.pid
#
### BEGIN INIT INFO
@sasasin
sasasin / pdf2jpg.sh
Created November 27, 2012 15:27
JPEGを集約して作成したPDFから、JPEG画像を抽出するシェルスクリプト。
#!/bin/sh
ls "$@" | while read f; do
DIRNAME=$(basename "$f" ".pdf")
echo "converting $f to $DIRNAME"
rm -rf "$DIRNAME"
mkdir "$DIRNAME"
pdfimages -j "$f" "$DIRNAME"/"DIRNAME"
done