C++などでは
class hito{
public:
void atama(){ ・・・}
}
void hanasu(hito taro){
・・・
}
main(){
hito sakaki;
hanasu(sakaki);
}

このように関数間でインスタンスを渡すことができますが、perlではどのように
すればよいのでしょうか？

$test=hito->new();
hanasu($test);

これでは失敗しました…。