Project Note

ベースがShiftJISで書かれているソースコード中にUnicodeを埋め込む場合、

\uXXXX

という表記方法で書くことが出来ます。コンパイラで解釈されるときにUnicodeになります。

---

■Unicode の文字列をソースコードに埋め込む方法 - bkブログ
■Text Escaping and Unescaping in JavaScript

社員の皆様の豊かで健全な生活の実現を目的とし、
健康増進への取組みを支援するサービスを導入いたしました。
心とからだの健康づくりにご利用願います。

---

■クラブオフの日
全国のおすすめ施設を破格の料金にてご提供する、ホームページ限定プランです。
会員1名様につき、1予約のみ。
毎週木曜日のAM11：00より発売開始。利用日は発売週の土曜日～翌週の金曜日です。
⇒「一泊500円の宿」もあります。※VIP会員の特別料金ですけど。

---

■健康応援プログラム
■健康応援プログラム Club Off
[6b6f703231313138][6b656e6b6f323138]
[3733363938393735393132][35343633]

以下のソースをSendToフォルダに保存して、
ファイルやフォルダを選択して「送る」で実行すると、
フォルダやファイル名に日付が付加できます。

■日付付加.bat

@echo off

set time2=%time: =0%
set BACKUP_EXT=%date:~-12,4%%date:~-5,2%%date:~-2,2%_%time2:~0,2%%time2:~3,2%
:BeginLoop
if "%~1" == "" goto EndLoop
	if exist %1 (
		rename %1 "%~n1_%BACKUP_EXT%%~x1"
	)
	shift
	goto BeginLoop
:EndLoop

動作環境：WindowsXP

リンク先のページでPerl5.8以降における標準的なPerlの書き方が解説されています。
Web上で配布されている掲示板はPerl4の頃に作成されたものが多いのですが、そろそろ新しいPerlで実装するべきなのかも。

■現代的なPerlの記述方法一覧 + α - Perl入門～サンプルコードによるPerl入門～
・【必須】strictプラグマとwarningsプラグマを有効にする
・【必須】ファイルハンドルにはレキシカル変数を使う
・【必須】3引数のopen関数を使う
・【必須】ファイルオープン時のエラー処理を行う
・[推奨]レキシカル変数とサブルーチンの名前には小文字とアンダーバーを使用する
・[推奨]パッケージ変数には大文字とアンダーバーを使用する
・【必須】パッケージ変数は使わずにレキシカル変数を使う
・[推奨]標準的なコードのフォーマットで書く
・[推奨]日本語などのマルチバイト文字を適切に扱うためにEncodeモジュールを使用する
・[推奨]デフォルト変数 $_ は使用しない
・[推奨]foreach文ではレキシカル変数を宣言する
・(参考)日付処理の標準モジュールを使用する
・【必須】不必要なモジュールの読み込みは行わない
・[推奨]コメントの#の嵐は避ける
・[推奨]モジュールの関数をインポートするときは明示する
・【必須】gotoは使用しない
・[推奨]do ～ whileは使用しない
・[推奨]redoは使用しない
・[推奨]プロトタイプは使用しない

---

■strictプラグマとwarningsプラグマ
ソースの先頭に「use strict」「use warnings」を書くと、Perlの文法チェックを厳しくするようになります。
※warningsプラグマはPerl5.6から標準モジュールに加わります。

■レキシカル変数
レキシカル変数は「my」を使って宣言した変数です。
レキシカル変数を使うと他のサブルーチンに同じ名前の変数があっても区別されるため、値が操作されて思わぬ結果になることを防ぐことが可能です。さらにブロック内で宣言した場合も、そのブロック内でしか使えないため、ループや作業用の変数として使いやすくなっています。

■gotoは使用しない
gotoを使用しなくても、ループを制御するなら「last」「next」が使えます。
エラー処理はdieを使うことで例外処理が可能です。