Home > Archives > 2009-02

2009-02

エンパイア・ステート・ビル

ドコモタワーのことを調べてたらでてきた。
ニューヨークにある。

エンパイア・ステート・ビルには展望ロビーがあるが、ドコモタワーには展望台がない。

ドコモタワーの落成直後はエンパイア・ステート・ビルと同様に展望台があると勘違いした
観光客がたくさんきたので、「展望台はない」と書かれた紙が張られたらしい。

エンパイア・ステート・ビルにいつかは行ってみたいな。

WikiPedia参考

都庁展望台

夜に新宿にある都庁の展望台へ行った。
45階に上がると、中は結構明るい感じ。

ただ、外を見たとき窓に中の様子が反射してしまったのは微妙な感じだった。

BAR T.R.N La TERRAZZA SABATINIというバーがあったけど、
さすがに一人だと気が引けたので今度誰かといきたいっす。

[#1 東京タワー]


[#2 ドコモタワー]


[#3 どこでしょう?]


[#4 モード学園コクーンタワー]


[#5 モード学園コクーンタワー②]



4と5を比べたら4のほうが立体感がでてる気がする。
写真って奥が深いな。

@INC

■モジュールを検索するディレクトリ
perlでモジュールを使用する場合にデフォルトで読み込むディレクトリは@INCに保存されている。

こうすれば見れる。

# perl -e “print @INC”;

■モジュールの検索場所追加
“use lib”を使用すると、モジュールの検索場所を追加することができる。

sample
—–
#!/usr/bin/perl

use strict;
use warnings;
use lib ‘/home/user/module/’;
use MyModule;

—–

以上のようにすることで、’/home/user/module/’ディレクトリ以下も検索するようになる。

File::Spec

■OSに依存しないファイル名を作成する
File::Specを使うとOSに依存しないファイル名を使用することができる。
Windows系だと¥, Unix系だと\と解釈されるらしい。

sample
—–
#!/usr/bin/perl

use strict;
use warnings;
use File::Spec;

my $x = File::Spec->catfile(‘a’, ‘b’, ‘c’);

print “file_path:$x\n”;

—–

file_path:a/b/c

参考
“http://d.hatena.ne.jp/minesouta/20071009/p1″

File::Basename

■ファイル名取得
cpanのFile::Basenameを使ってファイル名・ディレクトリ名・拡張子の取得ができる。

sample
—–
#!/usr/bin/perl

use strict;
use warnings;
use File::Basename;

my $fullname = “/home/user/src/practice/glob.pl”; # sample①
my $fullname = “/home/user/src/practice/”; # sample②
my @suffixlist = “.pl”;

my ($name, $path, $suffix) = fileparse($fullname, @suffixlist);
$name = fileparse($fullname,@suffixlist);

my $basename = basename($fullname,@suffixlist);
my $dirname = dirname($fullname);

my $filename = basename($fullname);

print “name: $name\n”;
print “path: $path\n”;
print “suffix: $suffix\n”;
print “basename: $basename\n”;
print “dirname: $dirname\n”;
print “filename: $filename\n”;

—–
sample①
  name: glob
  path: /home/user/src/practice/
  suffix: .pl
  basename: glob
  dirname: /home/user/src/practice
  filename: glob.pl

sample②
  name:
  path: /home/user/src/practice/
  suffix:
  basename: practice
  dirname: /home/user/src
  filename: practice

Home > Archives > 2009-02

Search
Feeds
Meta

Return to page top