FreeStyleWiki

Perlの覚え書き

[Perl]

Perlの覚え書き

  Net::SSLeay

  @INC

perl -e 'foreach $path (@INC) { print "$path\n"; }' 

  OOP

問題点

  • Perlのオブジェクト指向は他の言語と比べていびつ
    • どこからどこまでがクラスなのかわかりにくい
    • blessとか面倒
    • sub function_name の引数が shift で宣言しているのがわかりにくい
      • ついでに言うと $self が必ず宣言されるが使われないことも多い
package plugin::access::AccessDays;
use strict;
#==============================================================================
# コンストラクタ
#==============================================================================
sub new {
	my $class = shift;
	my $self = {};
	return bless $self,$class;
}

#==============================================================================
# パラグラフ関数
#==============================================================================
sub paragraph {
	my $self    = shift;
	my $wiki    = shift;
	my $maxrank = shift;
	my $maxdays = shift;

...

1;

解決策