たまにド忘れするので、書くうちに覚えるだろうと。
my $num = 123456;
my $digit1 = $num – int( $num / 10 ) *10
重複のみを抽出するSQL文
いい加減覚えられないので書いておく。
SELECT `mail` FROM `address` GROUP BY `mail` HAVING COUNT( `mail` ) >1 LIMIT 0 , 30
MySQL文のエスケープ
基本的に使うのはMySQLなので。
mysql_escape_string()は非推奨で、
mysql_real_escape_string()がお勧めだったのか。
バイナリ使わないから、あんまり関係ないみたいだけど、
非推奨だと無くなるかもしれないし、切り替えますか。
それはバックスラッシュ(\)か円記号(¥)か
Windowsで作業するには問題はおきませんが、
別のOSやUTF-8コードのアプリケーションで使用すると、
とたんに牙をむくのがバックスラッシュ。このCMSでもそうですね。
コードで書くとバックスラッシュは\x5c
円マークは\xc2\xa5
ファイルやDBへの保存はそのままでもいいですが、
表示させるときに絶対に¥でなければ困る場合は置換するのを忘れないように。
s/\x5c/\xc2\xa5/g;
ちなみに、JavaScriptで表示を切り替えたりする場合、
codeタグで囲んでいると、\x5cのままでも円記号になることがある不思議。
このWordPressの編集において「ビジュアル」では円記号だけど、
保存して表示するとバックスラッシュに戻る。
PHP:日付から曜日を求める
いい加減覚えないと。
PHPなら一発で出来る関数ありそうだけど。
$date = ‘2008-09-01’;
$wday = strftime( ‘%a’, strtotime( $date ) );
echo $wday;
> Mon
Perl:PerlMagickのannotateでrotateを指定する場合
図形をrotate する場合は普通に左下が始点だけど、
annotateのパラメータとしてrotateを使う場合は、
左のベースラインが基準になるので、微妙な位置に描かれてしまう。
ベースラインは文字の高さの12.5%の位置。つまり72ptなら
72 * 0.125 = 9
左下から9ptの位置になる。
しかしここを基準に回転させるので実際には、
72 – 9 = 63
63pt分、上にシフトさせてやれば希望の位置に収まる。
QRコードにアドレス帳登録用の情報を埋め込む方法
au用
http://www.au.kddi.com/ezfactory/tec/two_dimensions/address.html
Webサイト上で公開されている
docomo
http://www.nttdocomo.co.jp/service/imode/make/content/barcode/function/application/common/index.html
Webサイト上で公開されている
vodafone
http://developers.softbankmobile.co.jp/dp/tool_dl/qrcode/tool.php
「コード読み取り 開発ツール」をダウンロード、書庫に格納されているPDFにフォーマットが記載されている
auとvodafoneは共通
ビジネス用途ではdocomoがまだまだ強いので、それが足かせになっている。
しかし、タグの特性を生かして、3キャリア共通のQRコードを作る方法があった。
参考にしたページ:携帯3キャリア対応 電話帳登録QRコード作成 <改訂版>
MEMORY:MECARD:N:石川,悟史;SOUND:イシカワ,サトシ;TEL:08012345678;EMAIL:info@penlabo.net;;
NAME1:石川 悟史
NAME2:イシカワ サトシ
MAIL1:info@penlabo.net
TEL1:08012345678
これでいいらしい。
MEMORYは一行で書くこと。
2行目=NAME1
3行目=NAME2
4行目=MAIL1
5行目=TEL1
近いうちに自分とこのツールページに対応させますか。
ひとまず区切りが付いた
なんとか使い来なせてきたようだし、
旧ページのコンテンツを貼り付け終わったような気がするので、
今日というか、ひとまず良しとしますか。
CMS導入
いままで、あーでもないこーでもないといろいろ弄ってきましたが、CMSを導入することにしました。
今、設定と格闘しています。
もともとページ数はあまり無いので、そのうち移行が完了すると思います。
XML::Simpleのインストール
新しい環境を用意してます。
XML::Simpleはいつも怒られますね。
cpan> install XML::Simple
Running install for module XML::Simple
Running make for G/GR/GRANTM/XML-Simple-2.18.tar.gz
Is already unwrapped into directory /root/.cpan/build/XML-Simple-2.18
Makefile.PL returned status 65280
Running make test
Make had some problems, maybe interrupted? Won't test
Running make install
Make had some problems, maybe interrupted? Won't install
まぁ、よくわかんないので、yumのおまじないを唱えることにします。
perlのモジュール系でエラーが出たら、perl-[モジュール名]でインスコできることを最近知りました。
# yum install perl-XML-Simple
Loading "fastestmirror" plugin
Loading mirror speeds from cached hostfile
* base: ftp.nara.wide.ad.jp
* updates: ftp.nara.wide.ad.jp
* addons: ftp.nara.wide.ad.jp
* extras: ftp.nara.wide.ad.jp
base 100% |=========================| 1.1 kB 00:00
updates 100% |=========================| 951 B 00:00
addons 100% |=========================| 951 B 00:00
extras 100% |=========================| 1.1 kB 00:00
Setting up Install Process
Parsing package install arguments
Resolving Dependencies
--> Running transaction check
---> Package perl-XML-Simple.noarch 0:2.14-4.fc6 set to be updated
--> Processing Dependency: perl(XML::Parser) for package: perl-XML-Simple
--> Running transaction check
---> Package perl-XML-Parser.i386 0:2.34-6.1.2.2.1 set to be updated
--> Finished Dependency Resolution
Dependencies Resolved
=============================================================================
Package Arch Version Repository Size
=============================================================================
Installing:
perl-XML-Simple noarch 2.14-4.fc6 base 68 k
Installing for dependencies:
perl-XML-Parser i386 2.34-6.1.2.2.1 base 210 k
Transaction Summary
=============================================================================
Install 2 Package(s)
Update 0 Package(s)
Remove 0 Package(s)
Total download size: 278 k
Is this ok [y/N]: y
Downloading Packages:
(1/2): perl-XML-Simple-2. 100% |=========================| 68 kB 00:00
(2/2): perl-XML-Parser-2. 100% |=========================| 210 kB 00:00
Running rpm_check_debug
Running Transaction Test
Finished Transaction Test
Transaction Test Succeeded
Running Transaction
Installing: perl-XML-Parser ######################### [1/2]
Installing: perl-XML-Simple ######################### [2/2]
Installed: perl-XML-Simple.noarch 0:2.14-4.fc6
Dependency Installed: perl-XML-Parser.i386 0:2.34-6.1.2.2.1
Complete!
わーい、わーい