perl 类 对象 方法

<pre name="code" class="sql">NAME  
       Net::FTP - FTP Client class  
  
SYNOPSIS  
           use Net::FTP;  
  
           $ftp = Net::FTP->new("some.host.name", Debug => 0)  
             or die "Cannot connect to some.host.name: $@";  ---创建对象  
  
           $ftp->login("anonymous",'-anonymous@')  ---调用对象的login方法  
             or die "Cannot login ", $ftp->message;  
  
           $ftp->cwd("/pub")  --调用对象的cmd方法  
             or die "Cannot change working directory ", $ftp->message;  
  
           $ftp->get("that.file")  
             or die "get failed ", $ftp->message;  
  
           $ftp->quit;  
  
DESCRIPTION  
       "Net::FTP" is a class implementing a simple FTP client in Perl as described in RFC959.  It provides wrappers for a subset of the RFC959 commands.  
         
          
Net::FTP 是一个类 实现一个简单的FTP客户端在Perl里  


oaapp01:/root/test# cat a2.pl 
use Net::FTP;  
use Data::Dumper; 
$ftp = Net::FTP->new("115.236.x.x",Port=>1029, Debug => 0)  or die;
print Dumper($ftp); 

oaapp01:/root/test# perl a2.pl 
$VAR1 = bless( *Symbol::GEN0, 'Net::FTP' );


首先让我们来看看有关 Perl 面向对象编程的三个基本定义：
    1.  一个“对象”是指一个“有办法知道它是属于哪个类”的简单引用。(对象就是引用变量)
    2.  一个“类”是指一个“有办法给属于它的对象提供一些方法”的简单的包。（类就是包）
    3.  一个“方法”是指一个“接受一个对象或者类名称作为第一个参数”的简单的子程序。（类的方法就是第一个参数为类名或对象的方法）

所有对象都是引用，但不是所有引用都是对象。一个引用不会作为对象运转，除非引用它的
东西有特殊标记告诉 Perl 它属于哪个包。

把一个引用和一个包名字标记起来（因此也和包
中的类标记起来了，因为一个类就是一个包）的动作被称作赐福（blessing），

你可以把
赐福（bless）看作把一个引用转换成一个对象，尽管更准确地说是它把该引用转换成一个
对象引用。



 类的方法是静态方法 是不需要实例化对象就可以调用的方法
你这个当然是对象的方法


           $ftp = Net::FTP->new("some.host.name", Debug => 0)  
             or die "Cannot connect to some.host.name: $@";  ---创建对象  
  
           $ftp->login("anonymous",'-anonymous@')  ---调用对象的login方法 




直接使用类提供的方法:

 use LWP::Simple;  
        @content = head("http://www.zjcap.cn/");  
        die "Couldn't get it!" unless defined @content;  
        print "@content is @content
";