在Perl中進行面向對象編程需要先定義一個類，然后創建對象并調用類的方法。下面是一個簡單的示例：
# 定義一個類
package Person;
sub new {
my $class = shift;
my $self = {
name => shift,
age => shift,
};
bless $self, $class;
return $self;
}
sub get_name {
my $self = shift;
return $self->{name};
}
sub get_age {
my $self = shift;
return $self->{age};
}
1;
# 創建對象并調用方法
my $person = Person->new("Alice", 25);
print "Name: " . $person->get_name() . "\n";
print "Age: " . $person->get_age() . "\n";
在上面的示例中，首先定義了一個名為Person的類，包含了一個構造方法new以及兩個實例方法get_name和get_age。然后通過調用Person類的new方法創建了一個Person對象，并調用get_name和get_age方法獲取對象的屬性值。
需要注意的是，在Perl中使用bless函數將一個哈希引用綁定到一個類名上，以創建一個對象。然后可以通過箭頭運算符->來調用對象的方法。
