如何生成虚方法

如何生成虚方法
小弟想在perl的Person Object中生成abstract method, 即
sub save{
my($self) = $_[0];
my($flagBoolean) = $self->{"flag"};
if ($flagBoolean eq "1")
{
update();
}else{
insert();
}
}

sub update{
}

sub insert{
}

希望update和insert都是abstract method,调用时自动根据继承的Female.pm中的实际update和insert方法来实现功能.
小弟是java delveloper,不了解如何在Perl中实现abstract method.希望大侠给一段code让我参考.

不了解java的说 [CCB]10[/.
不了解java的说 [CCB]10[/CCB]

如果你在问如何在 perl 里.
如果你在问如何在 perl 里实现继承，
[quote]
package Employee;
use Person;
@ISA = ("Person");
1;
[/quote]

不管怎么样，你都可以阅读 perl OO 文档 , 讲的非常清楚。
http://perldoc.perl.org/perltoot.html#Inheritance

或者，使用--package Pe.
或者，使用
package Person;
use base Female;

同时希望楼主不要在同个论.
同时希望楼主不要在同个论坛的二个栏目发表同样一个问题.