スポンサーサイト
上記の広告は１ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。
新しい記事を書く事で広告が消せます。
DBIx::ClassでORM
perlのORM。DBはOracle。
とりあえず
DBIx::Class
DBIx::Class::Schema::Loader
をインストールする。
以下インストールの経過をそのまま貼り付け
↓
で、静的にSchemaクラスを生成
↓
# perl -MDBIx::Class::Schema::Loader=make_schema_at,dump_to_dir:./ -e 'make_schema_at "HOGE::Schema", {relationships => 1}, ["dbi:Oracle:接続識別子","ユーザ","パスワード"]'
こうするとカレントディレクトリにHOGEディレクトリができて、その中にSchemaクラスが生成される。
主キーがないテーブルに関しては
DBIx::Class::Schema::Loader::make_schema_at(): hogehoge_tbl has no primary key at -e line 1
のようなメッセージが出る。
これで準備完了。
あとは、例えばhogehoge_mstsテーブルでカラムidの値が1であるレコードを抽出してカラムhoge_columnを表示する、なんてのを書く場合は、
とりあえず
DBIx::Class
DBIx::Class::Schema::Loader
をインストールする。
以下インストールの経過をそのまま貼り付け
↓
# yum install perl-DBIx-Class
Loaded plugins: refresh-packagekit
Setting up Install Process
Resolving Dependencies
--> Running transaction check
---> Package perl-DBIx-Class.noarch 0:0.08123-2.el6 will be installed
--> Processing Dependency: perl(Module::Find) >= 0.06 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(SQL::Abstract) >= 1.61 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Context::Preserve) >= 0.01 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Scope::Guard) >= 0.03 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MRO::Compat) >= 0.09 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Data::Dumper::Concise) >= 1.000 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::Inspector) >= 1.24 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::C3::Componentised) >= 1.0005 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Path::Class) >= 0.18 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Data::Page) >= 2.00 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(SQL::Abstract::Limit) >= 0.13 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::Accessor::Grouped) >= 0.09003 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Sub::Name) >= 0.04 for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Module::Find) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::Trigger) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Moose::Role) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Context::Preserve) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Data::Page) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(DBIx::ContextualFetch) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Data::Dumper::Concise) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Hash::Merge) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MooseX::Types) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(JSON::Any) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Path::Class) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Sub::Name) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MRO::Compat) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(namespace::autoclean) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MooseX::Types::Moose) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Clone) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::C3) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(SQL::Translator::Schema::Constants) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MooseX::Types::Path::Class) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Class::Inspector) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(MooseX::Types::JSON) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(SQL::Translator::Utils) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(namespace::clean) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Moose) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Try::Tiny) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Processing Dependency: perl(Scope::Guard) for package: perl-DBIx-Class-0.08123-2.el6.noarch
--> Running transaction check
---> Package perl-Class-Accessor-Grouped.noarch 0:0.09005-1.el6 will be installed
---> Package perl-Class-C3.noarch 0:0.22-4.el6 will be installed
---> Package perl-Class-C3-Componentised.noarch 0:1.0006-1.el6.rf will be installed
--> Processing Dependency: perl(Test::Exception) for package: perl-Class-C3-Componentised-1.0006-1.el6.rf.noarch
---> Package perl-Class-Inspector.noarch 0:1.24-4.el6 will be installed
---> Package perl-Class-Trigger.noarch 0:0.13-2.1.el6 will be installed
--> Processing Dependency: perl(IO::Scalar) for package: perl-Class-Trigger-0.13-2.1.el6.noarch
---> Package perl-Clone.x86_64 0:0.31-3.1.el6 will be installed
---> Package perl-Context-Preserve.noarch 0:0.01-1.el6.rf will be installed
---> Package perl-DBIx-ContextualFetch.noarch 0:1.03-7.el6 will be installed
---> Package perl-Data-Dumper-Concise.noarch 0:1.200-2.el6 will be installed
---> Package perl-Data-Page.noarch 0:2.02-1.el6.rf will be installed
--> Processing Dependency: perl(Class::Accessor::Chained::Fast) for package: perl-Data-Page-2.02-1.el6.rf.noarch
---> Package perl-Hash-Merge.noarch 0:0.12-1.el6.rf will be installed
---> Package perl-JSON-Any.x86_64 0:1.22-1.el6.rf will be installed
--> Processing Dependency: perl-JSON-Any-alternative = 1.22 for package: perl-JSON-Any-1.22-1.el6.rf.x86_64
---> Package perl-MRO-Compat.noarch 0:0.11-2.el6.rf will be installed
---> Package perl-Module-Find.noarch 0:0.08-3.el6 will be installed
---> Package perl-Moose.x86_64 0:1.15-1.el6 will be installed
--> Processing Dependency: perl(Class::MOP) >= 1.09 for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Sub::Exporter) >= 0.980 for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Package::DeprecationManager) >= 0.04 for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Class::MOP) >= 0.60 for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Class::MOP::MiniTrait) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Params::Util) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Sub::Exporter) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Devel::GlobalDestruction) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Task::Weaken) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Package::DeprecationManager) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Data::OptList) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(Class::MOP) for package: perl-Moose-1.15-1.el6.x86_64
--> Processing Dependency: perl(metaclass) for package: perl-Moose-1.15-1.el6.x86_64
---> Package perl-MooseX-Types.noarch 0:0.22-1.el6 will be installed
--> Processing Dependency: perl(Sub::Install) >= 0.924 for package: perl-MooseX-Types-0.22-1.el6.noarch
---> Package perl-MooseX-Types-JSON.noarch 0:0.02-3.el6 will be installed
--> Processing Dependency: perl(JSON::XS) >= 2.00 for package: perl-MooseX-Types-JSON-0.02-3.el6.noarch
--> Processing Dependency: perl(JSON::XS) for package: perl-MooseX-Types-JSON-0.02-3.el6.noarch
---> Package perl-MooseX-Types-Path-Class.noarch 0:0.05-8.el6 will be installed
---> Package perl-Path-Class.noarch 0:0.18-1.el6.rf will be installed
---> Package perl-SQL-Abstract.noarch 0:1.67-1.el6 will be installed
---> Package perl-SQL-Abstract-Limit.noarch 0:0.141-3.el6 will be installed
---> Package perl-SQL-Translator.noarch 0:0.11007-1.el6.rf will be installed
--> Processing Dependency: perl(Digest::SHA1) >= 2 for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(XML::Writer) >= 0.5 for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(Class::Data::Inheritable) >= 0.02 for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(File::ShareDir) >= 1 for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(Class::Accessor::Fast) for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(Class::Base) for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
--> Processing Dependency: perl(Class::MakeMethods) for package: perl-SQL-Translator-0.11007-1.el6.rf.noarch
---> Package perl-Scope-Guard.noarch 0:0.12-1.el6 will be installed
---> Package perl-Sub-Name.x86_64 0:0.05-1.el6.rf will be installed
---> Package perl-Try-Tiny.noarch 0:0.09-1.el6.rf will be installed
---> Package perl-namespace-autoclean.noarch 0:0.11-1.el6 will be installed
--> Processing Dependency: perl(B::Hooks::EndOfScope) >= 0.07 for package: perl-namespace-autoclean-0.11-1.el6.noarch
--> Processing Dependency: perl(B::Hooks::EndOfScope) for package: perl-namespace-autoclean-0.11-1.el6.noarch
---> Package perl-namespace-clean.noarch 0:0.20-1.el6 will be installed
--> Processing Dependency: perl(Sub::Identify) >= 0.04 for package: perl-namespace-clean-0.20-1.el6.noarch
--> Processing Dependency: perl(Package::Stash) >= 0.22 for package: perl-namespace-clean-0.20-1.el6.noarch
--> Running transaction check
---> Package perl-B-Hooks-EndOfScope.noarch 0:0.08-4.el6 will be installed
--> Processing Dependency: perl(Variable::Magic) for package: perl-B-Hooks-EndOfScope-0.08-4.el6.noarch
---> Package perl-Class-Accessor.noarch 0:0.31-6.1.el6 will be installed
---> Package perl-Class-Accessor-Chained.noarch 0:0.01-9.el6 will be installed
---> Package perl-Class-Base.noarch 0:0.03-7.el6 will be installed
---> Package perl-Class-Data-Inheritable.noarch 0:0.08-3.1.el6 will be installed
---> Package perl-Class-MOP.x86_64 0:1.12-1.el6 will be installed
---> Package perl-Class-MakeMethods.noarch 0:1.01-5.el6 will be installed
---> Package perl-Data-OptList.noarch 0:0.104-4.el6 will be installed
---> Package perl-Devel-GlobalDestruction.x86_64 0:0.02-7.el6 will be installed
---> Package perl-Digest-SHA1.x86_64 0:2.12-2.el6 will be installed
---> Package perl-File-ShareDir.noarch 0:1.01-1.el6.rf will be installed
---> Package perl-IO-stringy.noarch 0:2.110-10.1.el6 will be installed
---> Package perl-JSON-DWIW.x86_64 0:0.39-1.el6.rf will be installed
---> Package perl-JSON-XS.x86_64 1:2.27-2.el6 will be installed
--> Processing Dependency: perl(common::sense) for package: 1:perl-JSON-XS-2.27-2.el6.x86_64
---> Package perl-Package-DeprecationManager.noarch 0:0.11-1.el6 will be installed
---> Package perl-Package-Stash.noarch 0:0.32-1.el6 will be installed
--> Processing Dependency: perl(Package::Stash::XS) >= 0.24 for package: perl-Package-Stash-0.32-1.el6.noarch
---> Package perl-Params-Util.x86_64 0:1.00-3.el6 will be installed
---> Package perl-Sub-Exporter.noarch 0:0.982-4.el6 will be installed
---> Package perl-Sub-Identify.x86_64 0:0.04-6.el6 will be installed
---> Package perl-Sub-Install.noarch 0:0.925-6.el6 will be installed
---> Package perl-Task-Weaken.noarch 0:1.02-7.el6 will be installed
---> Package perl-Test-Exception.noarch 0:0.27-4.1.el6 will be installed
--> Processing Dependency: perl(Sub::Uplevel) for package: perl-Test-Exception-0.27-4.1.el6.noarch
---> Package perl-XML-Writer.noarch 0:0.606-6.el6 will be installed
--> Running transaction check
---> Package perl-Package-Stash-XS.x86_64 0:0.25-1.el6 will be installed
---> Package perl-Sub-Uplevel.noarch 0:0.2002-4.el6 will be installed
---> Package perl-Variable-Magic.x86_64 0:0.46-1.el6.rf will be installed
---> Package perl-common-sense.x86_64 0:3.0-1.el6.rf will be installed
--> Finished Dependency Resolution
Dependencies Resolved
=======================================================================================================================================
Package Arch Version Repository Size
=======================================================================================================================================
Installing:
perl-DBIx-Class noarch 0.08123-2.el6 epel 687 k
Installing for dependencies:
perl-B-Hooks-EndOfScope noarch 0.08-4.el6 epel 9.8 k
perl-Class-Accessor noarch 0.31-6.1.el6 epel 26 k
perl-Class-Accessor-Chained noarch 0.01-9.el6 epel 20 k
perl-Class-Accessor-Grouped noarch 0.09005-1.el6 epel 14 k
perl-Class-Base noarch 0.03-7.el6 epel 24 k
perl-Class-C3 noarch 0.22-4.el6 epel 27 k
perl-Class-C3-Componentised noarch 1.0006-1.el6.rf rpmforge 9.3 k
perl-Class-Data-Inheritable noarch 0.08-3.1.el6 epel 10 k
perl-Class-Inspector noarch 1.24-4.el6 sl 29 k
perl-Class-MOP x86_64 1.12-1.el6 epel 170 k
perl-Class-MakeMethods noarch 1.01-5.el6 epel 351 k
perl-Class-Trigger noarch 0.13-2.1.el6 epel 15 k
perl-Clone x86_64 0.31-3.1.el6 sl 14 k
perl-Context-Preserve noarch 0.01-1.el6.rf rpmforge 9.1 k
perl-DBIx-ContextualFetch noarch 1.03-7.el6 epel 11 k
perl-Data-Dumper-Concise noarch 1.200-2.el6 epel 16 k
perl-Data-OptList noarch 0.104-4.el6 sl 11 k
perl-Data-Page noarch 2.02-1.el6.rf rpmforge 12 k
perl-Devel-GlobalDestruction x86_64 0.02-7.el6 epel 12 k
perl-Digest-SHA1 x86_64 2.12-2.el6 sl 48 k
perl-File-ShareDir noarch 1.01-1.el6.rf rpmforge 20 k
perl-Hash-Merge noarch 0.12-1.el6.rf rpmforge 16 k
perl-IO-stringy noarch 2.110-10.1.el6 sl 67 k
perl-JSON-Any x86_64 1.22-1.el6.rf rpmforge 15 k
perl-JSON-DWIW x86_64 0.39-1.el6.rf rpmforge 157 k
perl-JSON-XS x86_64 1:2.27-2.el6 epel 93 k
perl-MRO-Compat noarch 0.11-2.el6.rf rpmforge 14 k
perl-Module-Find noarch 0.08-3.el6 epel 12 k
perl-Moose x86_64 1.15-1.el6 epel 659 k
perl-MooseX-Types noarch 0.22-1.el6 epel 58 k
perl-MooseX-Types-JSON noarch 0.02-3.el6 epel 8.3 k
perl-MooseX-Types-Path-Class noarch 0.05-8.el6 epel 11 k
perl-Package-DeprecationManager noarch 0.11-1.el6 epel 17 k
perl-Package-Stash noarch 0.32-1.el6 epel 32 k
perl-Package-Stash-XS x86_64 0.25-1.el6 epel 30 k
perl-Params-Util x86_64 1.00-3.el6 sl 35 k
perl-Path-Class noarch 0.18-1.el6.rf rpmforge 33 k
perl-SQL-Abstract noarch 1.67-1.el6 epel 56 k
perl-SQL-Abstract-Limit noarch 0.141-3.el6 epel 22 k
perl-SQL-Translator noarch 0.11007-1.el6.rf rpmforge 454 k
perl-Scope-Guard noarch 0.12-1.el6 epel 10 k
perl-Sub-Exporter noarch 0.982-4.el6 sl 65 k
perl-Sub-Identify x86_64 0.04-6.el6 epel 14 k
perl-Sub-Install noarch 0.925-6.el6 sl 19 k
perl-Sub-Name x86_64 0.05-1.el6.rf rpmforge 31 k
perl-Sub-Uplevel noarch 0.2002-4.el6 sl 20 k
perl-Task-Weaken noarch 1.02-7.el6 sl 16 k
perl-Test-Exception noarch 0.27-4.1.el6 sl 19 k
perl-Try-Tiny noarch 0.09-1.el6.rf rpmforge 18 k
perl-Variable-Magic x86_64 0.46-1.el6.rf rpmforge 78 k
perl-XML-Writer noarch 0.606-6.el6 epel 26 k
perl-common-sense x86_64 3.0-1.el6.rf rpmforge 22 k
perl-namespace-autoclean noarch 0.11-1.el6 epel 18 k
perl-namespace-clean noarch 0.20-1.el6 epel 16 k
Transaction Summary
=======================================================================================================================================
Install 55 Package(s)
Total download size: 3.6 M
Installed size: 9.8 M
Is this ok [y/N]: y
Downloading Packages:
(1/55): perl-B-Hooks-EndOfScope-0.08-4.el6.noarch.rpm | 9.8 kB 00:00
(2/55): perl-Class-Accessor-0.31-6.1.el6.noarch.rpm | 26 kB 00:00
(3/55): perl-Class-Accessor-Chained-0.01-9.el6.noarch.rpm | 20 kB 00:00
(4/55): perl-Class-Accessor-Grouped-0.09005-1.el6.noarch.rpm | 14 kB 00:00
(5/55): perl-Class-Base-0.03-7.el6.noarch.rpm | 24 kB 00:00
(6/55): perl-Class-C3-0.22-4.el6.noarch.rpm | 27 kB 00:00
(7/55): perl-Class-C3-Componentised-1.0006-1.el6.rf.noarch.rpm | 9.3 kB 00:00
(8/55): perl-Class-Data-Inheritable-0.08-3.1.el6.noarch.rpm | 10 kB 00:00
(9/55): perl-Class-Inspector-1.24-4.el6.noarch.rpm | 29 kB 00:00
(10/55): perl-Class-MOP-1.12-1.el6.x86_64.rpm | 170 kB 00:00
(11/55): perl-Class-MakeMethods-1.01-5.el6.noarch.rpm | 351 kB 00:00
(12/55): perl-Class-Trigger-0.13-2.1.el6.noarch.rpm | 15 kB 00:00
(13/55): perl-Clone-0.31-3.1.el6.x86_64.rpm | 14 kB 00:00
(14/55): perl-Context-Preserve-0.01-1.el6.rf.noarch.rpm | 9.1 kB 00:00
(15/55): perl-DBIx-Class-0.08123-2.el6.noarch.rpm | 687 kB 00:00
(16/55): perl-DBIx-ContextualFetch-1.03-7.el6.noarch.rpm | 11 kB 00:00
(17/55): perl-Data-Dumper-Concise-1.200-2.el6.noarch.rpm | 16 kB 00:00
(18/55): perl-Data-OptList-0.104-4.el6.noarch.rpm | 11 kB 00:00
(19/55): perl-Data-Page-2.02-1.el6.rf.noarch.rpm | 12 kB 00:00
(20/55): perl-Devel-GlobalDestruction-0.02-7.el6.x86_64.rpm | 12 kB 00:00
(21/55): perl-Digest-SHA1-2.12-2.el6.x86_64.rpm | 48 kB 00:00
(22/55): perl-File-ShareDir-1.01-1.el6.rf.noarch.rpm | 20 kB 00:00
(23/55): perl-Hash-Merge-0.12-1.el6.rf.noarch.rpm | 16 kB 00:00
(24/55): perl-IO-stringy-2.110-10.1.el6.noarch.rpm | 67 kB 00:00
(25/55): perl-JSON-Any-1.22-1.el6.rf.x86_64.rpm | 15 kB 00:00
(26/55): perl-JSON-DWIW-0.39-1.el6.rf.x86_64.rpm | 157 kB 00:01
(27/55): perl-JSON-XS-2.27-2.el6.x86_64.rpm | 93 kB 00:00
(28/55): perl-MRO-Compat-0.11-2.el6.rf.noarch.rpm | 14 kB 00:00
(29/55): perl-Module-Find-0.08-3.el6.noarch.rpm | 12 kB 00:00
(30/55): perl-Moose-1.15-1.el6.x86_64.rpm | 659 kB 00:00
(31/55): perl-MooseX-Types-0.22-1.el6.noarch.rpm | 58 kB 00:00
(32/55): perl-MooseX-Types-JSON-0.02-3.el6.noarch.rpm | 8.3 kB 00:00
(33/55): perl-MooseX-Types-Path-Class-0.05-8.el6.noarch.rpm | 11 kB 00:00
(34/55): perl-Package-DeprecationManager-0.11-1.el6.noarch.rpm | 17 kB 00:00
(35/55): perl-Package-Stash-0.32-1.el6.noarch.rpm | 32 kB 00:00
(36/55): perl-Package-Stash-XS-0.25-1.el6.x86_64.rpm | 30 kB 00:00
(37/55): perl-Params-Util-1.00-3.el6.x86_64.rpm | 35 kB 00:00
(38/55): perl-Path-Class-0.18-1.el6.rf.noarch.rpm | 33 kB 00:00
(39/55): perl-SQL-Abstract-1.67-1.el6.noarch.rpm | 56 kB 00:00
(40/55): perl-SQL-Abstract-Limit-0.141-3.el6.noarch.rpm | 22 kB 00:00
(41/55): perl-SQL-Translator-0.11007-1.el6.rf.noarch.rpm | 454 kB 00:02
(42/55): perl-Scope-Guard-0.12-1.el6.noarch.rpm | 10 kB 00:00
(43/55): perl-Sub-Exporter-0.982-4.el6.noarch.rpm | 65 kB 00:00
(44/55): perl-Sub-Identify-0.04-6.el6.x86_64.rpm | 14 kB 00:00
(45/55): perl-Sub-Install-0.925-6.el6.noarch.rpm | 19 kB 00:00
(46/55): perl-Sub-Name-0.05-1.el6.rf.x86_64.rpm | 31 kB 00:00
(47/55): perl-Sub-Uplevel-0.2002-4.el6.noarch.rpm | 20 kB 00:00
(48/55): perl-Task-Weaken-1.02-7.el6.noarch.rpm | 16 kB 00:00
(49/55): perl-Test-Exception-0.27-4.1.el6.noarch.rpm | 19 kB 00:00
(50/55): perl-Try-Tiny-0.09-1.el6.rf.noarch.rpm | 18 kB 00:00
(51/55): perl-Variable-Magic-0.46-1.el6.rf.x86_64.rpm | 78 kB 00:00
(52/55): perl-XML-Writer-0.606-6.el6.noarch.rpm | 26 kB 00:00
(53/55): perl-common-sense-3.0-1.el6.rf.x86_64.rpm | 22 kB 00:00
(54/55): perl-namespace-autoclean-0.11-1.el6.noarch.rpm | 18 kB 00:00
(55/55): perl-namespace-clean-0.20-1.el6.noarch.rpm | 16 kB 00:00
---------------------------------------------------------------------------------------------------------------------------------------
Total 173 kB/s | 3.6 MB 00:21
Running rpm_check_debug
Running Transaction Test
Transaction Test Succeeded
Running Transaction
Installing : perl-Sub-Name-0.05-1.el6.rf.x86_64 1/55
Installing : perl-Params-Util-1.00-3.el6.x86_64 2/55
Installing : perl-Class-Inspector-1.24-4.el6.noarch 3/55
Installing : perl-Sub-Install-0.925-6.el6.noarch 4/55
Installing : perl-Data-OptList-0.104-4.el6.noarch 5/55
Installing : perl-Sub-Exporter-0.982-4.el6.noarch 6/55
Installing : perl-Package-DeprecationManager-0.11-1.el6.noarch 7/55
Installing : perl-Class-C3-0.22-4.el6.noarch 8/55
Installing : perl-MRO-Compat-0.11-2.el6.rf.noarch 9/55
Installing : perl-Try-Tiny-0.09-1.el6.rf.noarch 10/55
Installing : perl-Devel-GlobalDestruction-0.02-7.el6.x86_64 11/55
Installing : perl-Task-Weaken-1.02-7.el6.noarch 12/55
Installing : perl-Class-Accessor-0.31-6.1.el6.noarch 13/55
Installing : perl-IO-stringy-2.110-10.1.el6.noarch 14/55
Installing : perl-SQL-Abstract-1.67-1.el6.noarch 15/55
Installing : perl-Path-Class-0.18-1.el6.rf.noarch 16/55
Installing : perl-SQL-Abstract-Limit-0.141-3.el6.noarch 17/55
Installing : perl-Class-Trigger-0.13-2.1.el6.noarch 18/55
Installing : perl-Class-Accessor-Chained-0.01-9.el6.noarch 19/55
Installing : perl-Class-Accessor-Grouped-0.09005-1.el6.noarch 20/55
Installing : perl-File-ShareDir-1.01-1.el6.rf.noarch 21/55
Installing : perl-Sub-Uplevel-0.2002-4.el6.noarch 22/55
Installing : perl-Test-Exception-0.27-4.1.el6.noarch 23/55
Installing : perl-Class-C3-Componentised-1.0006-1.el6.rf.noarch 24/55
Installing : perl-Data-Page-2.02-1.el6.rf.noarch 25/55
Installing : perl-Package-Stash-XS-0.25-1.el6.x86_64 26/55
Installing : perl-Package-Stash-0.32-1.el6.noarch 27/55
Installing : perl-Class-MOP-1.12-1.el6.x86_64 28/55
Installing : perl-Moose-1.15-1.el6.x86_64 29/55
Installing : perl-Class-Data-Inheritable-0.08-3.1.el6.noarch 30/55
Installing : perl-Scope-Guard-0.12-1.el6.noarch 31/55
Installing : perl-Class-Base-0.03-7.el6.noarch 32/55
Installing : perl-Variable-Magic-0.46-1.el6.rf.x86_64 33/55
Installing : perl-B-Hooks-EndOfScope-0.08-4.el6.noarch 34/55
Installing : perl-Class-MakeMethods-1.01-5.el6.noarch 35/55
Installing : perl-Context-Preserve-0.01-1.el6.rf.noarch 36/55
Installing : perl-Clone-0.31-3.1.el6.x86_64 37/55
Installing : perl-Sub-Identify-0.04-6.el6.x86_64 38/55
Installing : perl-namespace-clean-0.20-1.el6.noarch 39/55
Installing : perl-MooseX-Types-0.22-1.el6.noarch 40/55
Installing : perl-MooseX-Types-Path-Class-0.05-8.el6.noarch 41/55
Installing : perl-namespace-autoclean-0.11-1.el6.noarch 42/55
Installing : perl-JSON-DWIW-0.39-1.el6.rf.x86_64 43/55
Installing : perl-JSON-Any-1.22-1.el6.rf.x86_64 44/55
Installing : perl-Hash-Merge-0.12-1.el6.rf.noarch 45/55
Installing : perl-DBIx-ContextualFetch-1.03-7.el6.noarch 46/55
Installing : perl-XML-Writer-0.606-6.el6.noarch 47/55
Installing : perl-Data-Dumper-Concise-1.200-2.el6.noarch 48/55
Installing : perl-Digest-SHA1-2.12-2.el6.x86_64 49/55
Installing : perl-SQL-Translator-0.11007-1.el6.rf.noarch 50/55
Installing : perl-Module-Find-0.08-3.el6.noarch 51/55
Installing : perl-common-sense-3.0-1.el6.rf.x86_64 52/55
Installing : 1:perl-JSON-XS-2.27-2.el6.x86_64 53/55
Installing : perl-MooseX-Types-JSON-0.02-3.el6.noarch 54/55
Installing : perl-DBIx-Class-0.08123-2.el6.noarch 55/55
Installed:
perl-DBIx-Class.noarch 0:0.08123-2.el6
Dependency Installed:
perl-B-Hooks-EndOfScope.noarch 0:0.08-4.el6 perl-Class-Accessor.noarch 0:0.31-6.1.el6
perl-Class-Accessor-Chained.noarch 0:0.01-9.el6 perl-Class-Accessor-Grouped.noarch 0:0.09005-1.el6
perl-Class-Base.noarch 0:0.03-7.el6 perl-Class-C3.noarch 0:0.22-4.el6
perl-Class-C3-Componentised.noarch 0:1.0006-1.el6.rf perl-Class-Data-Inheritable.noarch 0:0.08-3.1.el6
perl-Class-Inspector.noarch 0:1.24-4.el6 perl-Class-MOP.x86_64 0:1.12-1.el6
perl-Class-MakeMethods.noarch 0:1.01-5.el6 perl-Class-Trigger.noarch 0:0.13-2.1.el6
perl-Clone.x86_64 0:0.31-3.1.el6 perl-Context-Preserve.noarch 0:0.01-1.el6.rf
perl-DBIx-ContextualFetch.noarch 0:1.03-7.el6 perl-Data-Dumper-Concise.noarch 0:1.200-2.el6
perl-Data-OptList.noarch 0:0.104-4.el6 perl-Data-Page.noarch 0:2.02-1.el6.rf
perl-Devel-GlobalDestruction.x86_64 0:0.02-7.el6 perl-Digest-SHA1.x86_64 0:2.12-2.el6
perl-File-ShareDir.noarch 0:1.01-1.el6.rf perl-Hash-Merge.noarch 0:0.12-1.el6.rf
perl-IO-stringy.noarch 0:2.110-10.1.el6 perl-JSON-Any.x86_64 0:1.22-1.el6.rf
perl-JSON-DWIW.x86_64 0:0.39-1.el6.rf perl-JSON-XS.x86_64 1:2.27-2.el6
perl-MRO-Compat.noarch 0:0.11-2.el6.rf perl-Module-Find.noarch 0:0.08-3.el6
perl-Moose.x86_64 0:1.15-1.el6 perl-MooseX-Types.noarch 0:0.22-1.el6
perl-MooseX-Types-JSON.noarch 0:0.02-3.el6 perl-MooseX-Types-Path-Class.noarch 0:0.05-8.el6
perl-Package-DeprecationManager.noarch 0:0.11-1.el6 perl-Package-Stash.noarch 0:0.32-1.el6
perl-Package-Stash-XS.x86_64 0:0.25-1.el6 perl-Params-Util.x86_64 0:1.00-3.el6
perl-Path-Class.noarch 0:0.18-1.el6.rf perl-SQL-Abstract.noarch 0:1.67-1.el6
perl-SQL-Abstract-Limit.noarch 0:0.141-3.el6 perl-SQL-Translator.noarch 0:0.11007-1.el6.rf
perl-Scope-Guard.noarch 0:0.12-1.el6 perl-Sub-Exporter.noarch 0:0.982-4.el6
perl-Sub-Identify.x86_64 0:0.04-6.el6 perl-Sub-Install.noarch 0:0.925-6.el6
perl-Sub-Name.x86_64 0:0.05-1.el6.rf perl-Sub-Uplevel.noarch 0:0.2002-4.el6
perl-Task-Weaken.noarch 0:1.02-7.el6 perl-Test-Exception.noarch 0:0.27-4.1.el6
perl-Try-Tiny.noarch 0:0.09-1.el6.rf perl-Variable-Magic.x86_64 0:0.46-1.el6.rf
perl-XML-Writer.noarch 0:0.606-6.el6 perl-common-sense.x86_64 0:3.0-1.el6.rf
perl-namespace-autoclean.noarch 0:0.11-1.el6 perl-namespace-clean.noarch 0:0.20-1.el6
Complete!
# yum install perl-DBIx-Class-Schema-Loader
Loaded plugins: refresh-packagekit
Setting up Install Process
Resolving Dependencies
--> Running transaction check
---> Package perl-DBIx-Class-Schema-Loader.noarch 0:0.05003-2.el6.1 will be installed
--> Processing Dependency: perl(Lingua::EN::Inflect::Number) >= 1.1 for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Processing Dependency: perl(Data::Dump) >= 1.06 for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Processing Dependency: perl(File::Slurp) >= 9999.13 for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Processing Dependency: perl(Class::Unload) for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Processing Dependency: perl(Data::Dump) for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Processing Dependency: perl(Lingua::EN::Inflect::Number) for package: perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch
--> Running transaction check
---> Package perl-Class-Unload.noarch 0:0.06-1.el6 will be installed
---> Package perl-Data-Dump.noarch 0:1.15-1.el6.rf will be installed
---> Package perl-File-Slurp.noarch 0:9999.13-7.el6 will be installed
---> Package perl-Lingua-EN-Inflect-Number.noarch 0:1.1-11.el6 will be installed
--> Processing Dependency: perl(Lingua::EN::Inflect) for package: perl-Lingua-EN-Inflect-Number-1.1-11.el6.noarch
--> Running transaction check
---> Package perl-Lingua-EN-Inflect.noarch 0:1.892-1.el6 will be installed
--> Finished Dependency Resolution
Dependencies Resolved
=======================================================================================================================================
Package Arch Version Repository Size
=======================================================================================================================================
Installing:
perl-DBIx-Class-Schema-Loader noarch 0.05003-2.el6.1 epel 109 k
Installing for dependencies:
perl-Class-Unload noarch 0.06-1.el6 epel 8.5 k
perl-Data-Dump noarch 1.15-1.el6.rf rpmforge 23 k
perl-File-Slurp noarch 9999.13-7.el6 sl 30 k
perl-Lingua-EN-Inflect noarch 1.892-1.el6 epel 52 k
perl-Lingua-EN-Inflect-Number noarch 1.1-11.el6 epel 9.8 k
Transaction Summary
=======================================================================================================================================
Install 6 Package(s)
Total download size: 233 k
Installed size: 446 k
Is this ok [y/N]: y
Downloading Packages:
(1/6): perl-Class-Unload-0.06-1.el6.noarch.rpm | 8.5 kB 00:00
(2/6): perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch.rpm | 109 kB 00:00
(3/6): perl-Data-Dump-1.15-1.el6.rf.noarch.rpm | 23 kB 00:00
(4/6): perl-File-Slurp-9999.13-7.el6.noarch.rpm | 30 kB 00:00
(5/6): perl-Lingua-EN-Inflect-1.892-1.el6.noarch.rpm | 52 kB 00:00
(6/6): perl-Lingua-EN-Inflect-Number-1.1-11.el6.noarch.rpm | 9.8 kB 00:00
---------------------------------------------------------------------------------------------------------------------------------------
Total 73 kB/s | 233 kB 00:03
Running rpm_check_debug
Running Transaction Test
Transaction Test Succeeded
Running Transaction
Installing : perl-File-Slurp-9999.13-7.el6.noarch 1/6
Installing : perl-Data-Dump-1.15-1.el6.rf.noarch 2/6
Installing : perl-Lingua-EN-Inflect-1.892-1.el6.noarch 3/6
Installing : perl-Lingua-EN-Inflect-Number-1.1-11.el6.noarch 4/6
Installing : perl-Class-Unload-0.06-1.el6.noarch 5/6
Installing : perl-DBIx-Class-Schema-Loader-0.05003-2.el6.1.noarch 6/6
Installed:
perl-DBIx-Class-Schema-Loader.noarch 0:0.05003-2.el6.1
Dependency Installed:
perl-Class-Unload.noarch 0:0.06-1.el6 perl-Data-Dump.noarch 0:1.15-1.el6.rf perl-File-Slurp.noarch 0:9999.13-7.el6
perl-Lingua-EN-Inflect.noarch 0:1.892-1.el6 perl-Lingua-EN-Inflect-Number.noarch 0:1.1-11.el6
Complete!
で、静的にSchemaクラスを生成
↓
# perl -MDBIx::Class::Schema::Loader=make_schema_at,dump_to_dir:./ -e 'make_schema_at "HOGE::Schema", {relationships => 1}, ["dbi:Oracle:接続識別子","ユーザ","パスワード"]'
こうするとカレントディレクトリにHOGEディレクトリができて、その中にSchemaクラスが生成される。
主キーがないテーブルに関しては
DBIx::Class::Schema::Loader::make_schema_at(): hogehoge_tbl has no primary key at -e line 1
のようなメッセージが出る。
これで準備完了。
あとは、例えばhogehoge_mstsテーブルでカラムidの値が1であるレコードを抽出してカラムhoge_columnを表示する、なんてのを書く場合は、
#!/usr/bin/perl
use strict;
use lib "CURRENTDIR/HOGE";
use HOGE::Schema;
my $schema = HOGE::Schema->connect("dbi:Oracle:接続識別子", "ユーザ", "パスワード");
my $rs = $schema->resultset('HogehogeMst')->search_rs({id => '1'});
while(my $r = $rs->next){
print $r->hoge_column;
}
スポンサーサイト
WDK(Windows Driver Kit)のアンインストール
アンインストールがすんなり終わらなかったのでメモ。
WDKのインストールイメージ（iso）をDAEMON Toolsでマウントして、KitSetup.exeを起動してチェックボックスのチェックを全部外してOKをクリック。
The configuration of one or more Microsoft windows Driver Kit Release 6001.081017 kit components has been invalidated by the removal of required subcomponents (The affected components are indicated by triangular warning icons in the kit selection treeview).
In order to proceed, KitSetup must repair the damaged configuration(s) and return the computer to a known good configuration state
Please review the information KitSetup has gathered fo you to determine how best to proceed.
とか出るようだったら
HKLM\Software\Microsoft\Msdn\9.0\
に「Help」というキーを新規作成する。
再度KitSetup.exeを起動してチェックボックスのチェックを全部外してOKをクリック。
途中で止まって、
Unused Microsoft WDK Subcomponent Installation Detected!
KitSetup has detected installed subcomponents that are not needed by any of your configured kit components. This can occur when a configuration transaction is aborted due to error or user cancelation.
Please review the information KitSetup has gathered for you to determine how best to proceed.
とか出るようだったら
HLKM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
で「WDK」で検索。ひっかかったキーのうちWDK関連と判断できればエクスポートでバックアップした上で削除。
再々度KitSetup.exeを起動。何かエラーが出るけどOKをクリック。それでUninstallが終わったことになった。
あとはC:\WinDDK、C:\Program Files\Common Files\Microsoft KitSetup、スタートメニュー→プログラムの中にある関連ショートなどを削除して終わり（HKLM\SOFTWARE\Microsoft\KitSetupとかも消したかも）。
多少のゴミは残ってるかもしれないけど、とりあえずこれでOKだろうと。
WDKのインストールイメージ（iso）をDAEMON Toolsでマウントして、KitSetup.exeを起動してチェックボックスのチェックを全部外してOKをクリック。
The configuration of one or more Microsoft windows Driver Kit Release 6001.081017 kit components has been invalidated by the removal of required subcomponents (The affected components are indicated by triangular warning icons in the kit selection treeview).
In order to proceed, KitSetup must repair the damaged configuration(s) and return the computer to a known good configuration state
Please review the information KitSetup has gathered fo you to determine how best to proceed.
とか出るようだったら
HKLM\Software\Microsoft\Msdn\9.0\
に「Help」というキーを新規作成する。
再度KitSetup.exeを起動してチェックボックスのチェックを全部外してOKをクリック。
途中で止まって、
Unused Microsoft WDK Subcomponent Installation Detected!
KitSetup has detected installed subcomponents that are not needed by any of your configured kit components. This can occur when a configuration transaction is aborted due to error or user cancelation.
Please review the information KitSetup has gathered for you to determine how best to proceed.
とか出るようだったら
HLKM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
で「WDK」で検索。ひっかかったキーのうちWDK関連と判断できればエクスポートでバックアップした上で削除。
再々度KitSetup.exeを起動。何かエラーが出るけどOKをクリック。それでUninstallが終わったことになった。
あとはC:\WinDDK、C:\Program Files\Common Files\Microsoft KitSetup、スタートメニュー→プログラムの中にある関連ショートなどを削除して終わり（HKLM\SOFTWARE\Microsoft\KitSetupとかも消したかも）。
多少のゴミは残ってるかもしれないけど、とりあえずこれでOKだろうと。
SSIと引数
SSIで呼び出すhoge.cgiに引数を渡したい場合、下記2パターン。
・include virtualの場合
SSI呼び出しタグのところで引数を渡す。↓こんな感じ。
<!--#include virtual="/cgi-bin/hoge.cgi?arg1=val1&arg2=val2" -->
・exec cgiの場合
呼び出し元のURL自体に引数を渡す。↓こんな感じ。
http://hoge.com/hoge.shtml?arg1=val1&arg2=val2
hoge.shtml中のSSI呼び出しタグは↓。
<!--#exec cgi="/cgi-bin/hoge.cgi" -->
・include virtualの場合
SSI呼び出しタグのところで引数を渡す。↓こんな感じ。
<!--#include virtual="/cgi-bin/hoge.cgi?arg1=val1&arg2=val2" -->
・exec cgiの場合
呼び出し元のURL自体に引数を渡す。↓こんな感じ。
http://hoge.com/hoge.shtml?arg1=val1&arg2=val2
hoge.shtml中のSSI呼び出しタグは↓。
<!--#exec cgi="/cgi-bin/hoge.cgi" -->
CGI::SessionのセッションIDの重複
CGI::SessionのセッションIDの重複については大丈夫なのかと気になって調べたところ、ここに複数サーバでの運用の場合重複の可能性があるということと、その解決法があった。
セッションIDの生成にはMD5を使ってて、その種が
$$ -> プロセスID
time() -> 1970年1月1日からの経過秒数
rand(time) -> 乱数
だから、単一サーバでは問題ないけど、複数サーバでは重複するかもしれないということ。
で、解決法では種にホスト名を追加してるみたい。
自分の環境では
/usr/lib/perl5/site_perl/5.8.5/CGI/Session/ID/md5.pm
なので、これを
/usr/lib/perl5/site_perl/5.8.5/CGI/Session/ID/md5_for_multi_server.pm
にコピーする。
で、↓みたいに変更する。
セッションIDを生成する時は、今まで例えば
my $session = CGI::Session->new(undef, undef, {Directory => '/hogeDir'});
みたいにしてたのを
my $session = CGI::Session->new('driver:file;serializer:default;id:md5_for_multi_server', undef, {Directory => '/hogeDir'});
に変更する。
第一引数がundefだと、デフォルトの
driver:file;serializer:default;id:md5
になるから
driver:file;serializer:default;id:md5_for_multi_server
に変更するわけだ。
セッションIDの生成にはMD5を使ってて、その種が
$$ -> プロセスID
time() -> 1970年1月1日からの経過秒数
rand(time) -> 乱数
だから、単一サーバでは問題ないけど、複数サーバでは重複するかもしれないということ。
で、解決法では種にホスト名を追加してるみたい。
自分の環境では
/usr/lib/perl5/site_perl/5.8.5/CGI/Session/ID/md5.pm
なので、これを
/usr/lib/perl5/site_perl/5.8.5/CGI/Session/ID/md5_for_multi_server.pm
にコピーする。
で、↓みたいに変更する。
package CGI::Session::ID::md5_for_multi_server; ← md5をmd5_for_multi_serverに変更。
use strict;
use Digest::MD5;
use Sys::Hostname; ← 追加。
use CGI::Session::ErrorHandler;
$CGI::Session::ID::md5_for_multi_server::VERSION = '1.00'; ← md5をmd5_for_multi_serverに変更。バージョンは適当に。
@CGI::Session::ID::md5_for_multi_server::ISA = qw( CGI::Session::ErrorHandler ); ← md5をmd5_for_multi_serverに変更。
*generate = \&generate_id;
sub generate_id {
my $md5 = new Digest::MD5();
$md5->add($$ , time() , rand(time) , hostname()); ← hostname()を追加。
return $md5->hexdigest();
}
1;
セッションIDを生成する時は、今まで例えば
my $session = CGI::Session->new(undef, undef, {Directory => '/hogeDir'});
みたいにしてたのを
my $session = CGI::Session->new('driver:file;serializer:default;id:md5_for_multi_server', undef, {Directory => '/hogeDir'});
に変更する。
第一引数がundefだと、デフォルトの
driver:file;serializer:default;id:md5
になるから
driver:file;serializer:default;id:md5_for_multi_server
に変更するわけだ。
インストールされているPHPのモジュール一覧
# php -m
