Amazon S3へのバックアップ用スクリプトです。ディレクトリおよびMySQLデータベースのバックアップができます。
以前に作ったもので、やっつけ仕事で汚すぎるコードですが、一応動きますので公開しますw サーバのcrontabにでも登録してご自由にご利用ください。
ファイルシステムはSquashFSを用いてアーカイブされます (MySQLデータベースは、tar.gz)。
- CentOS/Fedora:
| 北海道 | ほっかいどう | hokkaido | |
|---|---|---|---|
| 青森県 | あおもり | aomori | |
| 岩手県 | いわて | iwate | |
| 宮城県 | みやぎ | miyagi | |
| 秋田県 | あきた | akita | |
| 山形県 | やまがた | yamagata | |
| 福島県 | ふくしま | fukushima | |
| 茨城県 | いばらき | ibaraki | |
| 栃木県 | とちぎ | tochigi | |
| 群馬県 | ぐんま | gumma |
| #!/usr/bin/env perl | |
| # Arch Linux - Linux kernel rebuild script for Let's note CF-S10 series | |
| # https://gist.github.com/mugifly/9582654/ | |
| # Required: perl 5.x | |
| use strict; | |
| use warnings; | |
| use utf8; | |
| use Cwd; | |
| use File::Path; |
| /** | |
| ArduinoProMini_FelicaPlug_Type3_RW.ino | |
| Felica PlugのArduino向けライブラリに付属されているサンプルを基に改変 | |
| (ライブラリ: http://blog.felicalauncher.com/sdk_for_air/?page_id=2419) | |
| **/ | |
| #define CONFIG_FELICA_PLUG_EEPROM | |
| #include <EEPROM.h> | |
| #include <FeliCaPlug.h> | |
| #include <inttypes.h> |
| #! /usr/bin/env perl | |
| # Gist ssh-clone script | |
| # Help: $ perl git-clone-ssh.pl --help | |
| # (c) Masanori Ohgita (http://ohgita.info/) - 2013, MIT License. | |
| use warnings; | |
| use strict; | |
| use utf8; | |
| use File::Basename qw//; |
| #! /usr/bin/env perl | |
| # Git branch cleaner ( Delete a branches that not exist on remote repository) | |
| # If you have not ran the 'git fetch --plune' command, please try it before this script. | |
| # Useful case (maybe): If can't delete a branches using 'git fetch --plune' command. | |
| # | |
| # Usage: $ perl git-branch-clean.pl --help | |
| use warnings; | |
| use strict; | |
| use utf8; |
| #include <SoftwareSerial.h> | |
| #define LED_PORT 13 | |
| #define BT_RX 11 | |
| #define BT_TX 10 | |
| // TX(RBT-001) <-> 11(Arduino) | |
| #define PWM_WIDTH 500 | |
| // roop = 2ms |
| #!/usr/bin/env perl | |
| # Bayon Simple WebAPI (with Mojolicious::Lite) | |
| # https://gist.github.com/mugifly/5222608 | |
| use Mojolicious::Lite; | |
| use utf8; | |
| use Mojo::JSON; | |
| use Mojo::ByteStream; | |
| use Mojo::Asset::File; | |
| use Text::Bayon; | |
| use Encode; |
| /* Blink for Webkit and others | |
| (Chrome, Safari, Firefox, IE, ...) | |
| */ | |
| @-webkit-keyframes blinker { | |
| from {opacity: 1.0;} | |
| to {opacity: 0.0;} | |
| } | |
| .blink{ | |
| text-decoration: blink; |
| #!/usr/bin/env perl | |
| # GitHub Webhook receiver & updater cgi (for Hosting-web-server) | |
| # https://gist.github.com/mugifly/5087897/ | |
| use strict; | |
| use warnings; | |
| use utf8; | |
| use lib 'lib'; # for local lib directory | |
| use CGI; |