なぜperlが悪いのですか？

オブジェクトの継承はありません。

パッケージSomeClass;
 SomeOtherClassを使用します。

 @ISA = 'SomeOtherClass';

 sub new {
	私の$ class = shift;

	 ＃新しいSomeOtherClassオブジェクトを作成します。
	私の$ self = $ class-> SUPER :: new;

	 ＃それを台無しに：
	 $ self-> {'_ something'} = 1;
	 $ self-> {'_ something_else'} = 2;

	 ＃今、それをSomeClassに祝福します：
	 bless（$ self、$ class）;
	 $ selfを返します。
 }

 1;

参照カウンター。

直感的なAPIではありません。

スカラーコンテキストでの配列/リストの非直感的な動作。

 my（$ first_field）= split（/ \ t /、$ tab_delimited_fields）; 

私の$ email_address = $ input =〜/（\ S + \ @ \ S +）/; 

書式

「書き込みは*「読み取り」の反対ではないことに注意してください。 残念ながら。」

定数やマクロはありません。

定数PORT => 80を使用します。

型情報はありません。

 「数字じゃない！」  （$ thing =〜/ ^ \ d + $ /）; 

Autovivification。

 my％hash =（key1 => 'value1'、key2 => 'value2'）;

 $ hash {autovived} = 1;

 $ self = {
	名前=> undef、
        年齢=> undef

 ...

サブネーム{
 	私の$ self = shift;

 	 $ self-> {Name} = @_の場合にシフト;

 	 return $ self-> {name};
 }

 static my $ self = {
 	名前=> undef、
 	年齢=> undef

 ...

 $ self-> {Name} = shift;  ＃致命的エラー