Social Bookmark

continue reading this post...

PowerShellスクリプトの基本

ls が使えたりする♪

Windows PowerShell
Copyright (C) 2006 Microsoft Corporation. All rights res [...]

continue reading this post...

《 WSH 版》
■ ファイルの文字コードを変換する（ WSH ）
・・・windows の nkf ？ iconv ？

・@IT
http://www.atmarkit.co.jp/fwin2k/win2ktips [...]

continue reading this post...

Template::Toolkitとutf8

 #!usr/bin/perl
 use strict;
 use warnings;
 use utf8;
 use Template;
 use Encode;
 
 my $tt = Template->new(
                 UNICODE  => 1,      #これでテンプレファイルが
                 ENCODING => ‘utf-8′, #utf-8フラグ付きとなる。
                       );
 my %hash = (
         param => [...]

continue reading this post...

#!/usr/bin/perl

#### Limixdb 使用方法 ####
#### /usr/lib/perl5/site_perl/Limixdb.pm ####

##— Limixdbをuseする —##
use Limixdb;
use DBI;
use CGI::Carp qw(fatalsToBrowser);

print "Content-type: text/html; charaset=UTF-8\n\n";

##########################
#### package Limixdb ####

##— Limixdbオブジェクトを生成 —##
my $ddhh = new Limixdb;

##— setMethod関数で、データベース情報を送信 —##
#### 必須※ 引数(1) ＤＢドライバ[mysql || Pg] ####
#### 必須※ 引数(2) データベース名 ####
#### 省略可※ 引数(3) ユーザ名 ####
#### 省略可※ 引数(4) パスワード ####
#### (3)(4)のデフォルトは、MYSQL→root、Postgres→ootomo ####

# $ddhh->setMethod(’mysql’, ‘DB名’);
$ddhh->setMethod(’Pg’, ‘DB名’);

##— sqlCon関数で、コネクト —##
my $dbh = $ddhh->sqlCon;

my $sth = $dbh->prepare("SELECT * FROM limix");
$sth->execute;
while(@lis = $sth->fetchrow_array){
print $lis[0], "\n";
print $lis[1], "\n\n";
}

#########################
#### [...]

continue reading this post...