Help for this page

Select Code to Download


  1. or download this
    sub AUTOLOAD {
   my $method = substr($AUTOLOAD, rindex($AUTOLOAD, '::')+2);
...

   goto($stub);
}
  2. or download this
    sub AUTOLOAD {
   my $method = substr($AUTOLOAD, rindex($AUTOLOAD, '::')+2);
...
   
   goto($code_ref);
}
  3. or download this
    sub can {
   my $p = shift(@_);
   return UNVERSAL::can($p, @_) || File::Samba->can(@_);
}