Seigo Watanabe gb-swatanabe

## fb - 日付・連番つきでファイルをコピーするスクリプトコマンド
#!/bin/sh
# fb - file backup with timestamp and sequensal numbers
# usage : $0 filename [filename [...]]

today=`date '+%Y%m%d'`

for fn in $*
do
  seq=''

## ipsort - 行中のIPアドレスを拾ってソート
#!/usr/bin/env perl

use strict;
use warnings;

my (%s) ;
$s{ "999999999999" } = '';

while (<>){
    if( /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/ ){

## 標準出力にタイムスタンプを付けるワンライナ(Ruby)
$ ping x.x.x.x | ruby -rdate -pe 'BEGIN{$stdout.sync=true; trap(:INT){exit}}; print DateTime.now.strftime("\[%T\] ")'

## 標準出力にタイムスタンプを付けるワンライナ(Perl)
$ ping x.x.x.x | perl -MPOSIX -pe 'BEGIN{ $|=1 } s/^/strftime "\[%T\] ", localtime(time)/e'

## 標準出力にタイムスタンプを付けるワンライナ(sed)
$ ping x.x.x.x | sed -le 's/^/] /' | while read x; do echo "`date '+[%T'`$x"; done

## mysql-runtest.sh
#!/bin/bash

MYSQL_USER=root  	# mysql user
MYSQL_PWD=********	# mysql password
INTERVAL=1		# update interval (sec.)

export MYSQL_PWD

dbname=test_db
table=test_table

## send-mail.py
#!/usr/bin/env python
# -*- coding: utf-8 -*-
# send-mail.py - mail send script with SMTP over SSL and SMTP-AUTH
# usage: $0 [-n <sender name>] [-f <sender address>] <recipient address> <subject>

#----#----#----#----#----#----#----#----#----#----#----#----#----#----#----#
# 送信サーバ設定
mailserver = 'mailserver.example.com:25'
auth_user  = 'username'
auth_pass  = 'password'

## ouisearch.rb
#!/usr/bin/env ruby

require "net/http"

query_url = 'http://standards.ieee.org/cgi-bin/ouisearch'

irregular = {
  "080027" => "VirtualBox Guest",
  "525400" => "QEMU/KVM Guest",
}

## ouisearch2.rb
#!/usr/bin/env ruby
# -*- coding: utf-8 -*-

# oui.txtの入手方法：
# curl -O http://standards.ieee.org/develop/regauth/oui/oui.txt

# OUIデータベースの読み込み
def oui_store filename,o

  # ファイルから読み込む

## pathmunge.sh
    :

pathmunge () {
    case ":${PATH}:" in
        *:"$1":*)
            ;;
        *)
            if [ "$2" = "after" ] ; then
                PATH=$PATH:$1
            else
	#!/bin/sh
	# fb - file backup with timestamp and sequensal numbers
	# usage : $0 filename [filename [...]]

	today=`date '+%Y%m%d'`

	for fn in $*
	do
	seq=''
	#!/usr/bin/env perl

	use strict;
	use warnings;

	my (%s) ;
	$s{ "999999999999" } = '';

	while (<>){
	if( /(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})/ ){
	#!/bin/bash

	MYSQL_USER=root # mysql user
	MYSQL_PWD=******** # mysql password
	INTERVAL=1 # update interval (sec.)

	export MYSQL_PWD

	dbname=test_db
	table=test_table
	#!/usr/bin/env python
	# -- coding: utf-8 --
	# send-mail.py - mail send script with SMTP over SSL and SMTP-AUTH
	# usage: $0 [-n <sender name>] [-f <sender address>] <recipient address> <subject>

	#----#----#----#----#----#----#----#----#----#----#----#----#----#----#----#
	# 送信サーバ設定
	mailserver = 'mailserver.example.com:25'
	auth_user = 'username'
	auth_pass = 'password'
	#!/usr/bin/env ruby

	require "net/http"

	query_url = 'http://standards.ieee.org/cgi-bin/ouisearch'

	irregular = {
	"080027" => "VirtualBox Guest",
	"525400" => "QEMU/KVM Guest",
	}
	#!/usr/bin/env ruby
	# -- coding: utf-8 --

	# oui.txtの入手方法：
	# curl -O http://standards.ieee.org/develop/regauth/oui/oui.txt

	# OUIデータベースの読み込み
	def oui_store filename,o

	# ファイルから読み込む
	:

	pathmunge () {
	case ":${PATH}:" in
	:"$1":)
	;;
	*)
	if [ "$2" = "after" ] ; then
	PATH=$PATH:$1
	else