ChangeLog 最新ページ

Perl - KazLog ChangeLog

最終更新時間: 2009-05-28 23:58

2009-02-11 Wed

Install modules via cpan [Linux][Perl]


# cpan

> o conf urllist push [URL]

> o conf urllist pop [URL]

> o conf commit

2008-05-17 Sat

undef [Perl]

undefは未定義化する宣言であり、初期化ではない。

初期化は,

@array = ();

2008-03-26 Wed

2007-12-17 Mon

system [Perl]

it's highly recommended for efficiency and safety reasons that you use an array to pass arguments to system()

1: http://www.perlhowto.com/executing_external_commands

2: http://www2.denshi.numazu-ct.ac.jp/unix/perl/gaibu.shtml

2007-12-17 Mon

array [Perl]

@moremusic = ("organ", @music, "harp");

http://www.comp.leeds.ac.uk/Perl/arrays.html

2007-09-30 Sun

2007-09-30 Sun

system [Perl]

it's highly recommended for efficiency and safety reasons that you use an array to pass arguments to system()

重要1: http://www.perlhowto.com/executing_external_commands

重要2: http://www2.denshi.numazu-ct.ac.jp/unix/perl/gaibu.shtml

たとえば、wgetなどのときarrayに楊祚を格納するときは、--header="header data"をそのまま格納せず、

  • -headerと "header data"を別々の要素として配列に格納する.

2007-09-30 Sun

array [Perl]

配列についての情報

@moremusic = ("organ", @music, "harp");

との表記が、許される。push使う必要ないじゃないか。

http://www.comp.leeds.ac.uk/Perl/arrays.html

2007-09-03 Mon

a.pl Perl Tips [Perl]

#!/usr/bin/env -perl


my $temp="http://a.com http://b.com http://c.com";

my $flag=5;


#while($temp=~s/(http:\/\/[-_.!~*'()a-zA-Z0-9;\/?:\@&=+\$,%#]+)/$1/){ # case1

while($temp=~s/(http:\/\/[-_.!~*'()a-zA-Z0-9;\/?:\@&=+\$,%#]+)//){ # case2(理想)

print "$1\n";

$flag--;

exit unless($flag);

}


# case 1

# http://a.com/

# http://a.com/

# http://a.com/

# http://a.com/

# http://a.com/

#

# case2

# http://a.com/

# http://b.com/

# http://c.com/

2007-09-01 Sat

0001.pl (main{) [Windows][Cygwin][Perl][MySQL]

  • Perl on Cygwin から MySQL にアクセスするときは、DBI/DBDではなく(ソースからのコンパイルは通らない)、Net::MySQLを使うこと。

http://sonic64.com/2004-10-11.html

  • Digest::SHA1 がないとエラーになるので、以下のrpmからインストールする。(ソースからのコンパイルは通らない)

http://d.hatena.ne.jp/Bayside/20070806/p1