1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
|
package Net::FTP;
our @ISA = qw();
sub DESTROY() {}
sub _ABOR { my ($_o_response) = @_ }
sub _ACCT { my ($_self, @_more_paras) = @_ }
sub _ALLO { my ($_self, @_more_paras) = @_ }
sub _APPE { my ($_self, @_more_paras) = @_ }
sub _AUTH { my ($_self, @_more_paras) = @_ }
sub _CDUP { my ($_o_response) = @_ }
sub _CWD { my ($_self, @_more_paras) = @_ }
sub _DELE { my ($_self, @_more_paras) = @_ }
sub _FEAT { my ($_self, @_more_paras) = @_ }
sub _HELP { my ($_self, @_more_paras) = @_ }
sub _LIST { my ($_self, @_more_paras) = @_ }
sub _MDTM { my ($_self, @_more_paras) = @_ }
sub _MKD { my ($_self, @_more_paras) = @_ }
sub _MODE { my ($_self, @_more_paras) = @_ }
sub _NLST { my ($_self, @_more_paras) = @_ }
sub _NOOP { my ($_o_response) = @_ }
sub _PASS { my ($_self, @_more_paras) = @_ }
sub _PASV { my ($_o_response) = @_ }
sub _PORT { my ($_self, @_more_paras) = @_ }
sub _PWD { my ($_self, @_more_paras) = @_ }
sub _QUIT { my ($_o_response) = @_ }
sub _REIN { my ($_self, @_more_paras) = @_ }
sub _RESP { my ($_self, @_more_paras) = @_ }
sub _REST { my ($_self, @_more_paras) = @_ }
sub _RETR { my ($_self, @_more_paras) = @_ }
sub _RMD { my ($_self, @_more_paras) = @_ }
sub _RNFR { my ($_self, @_more_paras) = @_ }
sub _RNTO { my ($_self, @_more_paras) = @_ }
sub _SIZE { my ($_self, @_more_paras) = @_ }
sub _SMNT { my ($_self, @_more_paras) = @_ }
sub _STAT { my ($_self, @_more_paras) = @_ }
sub _STOR { my ($_self, @_more_paras) = @_ }
sub _STOU { my ($_self, @_more_paras) = @_ }
sub _STRU { my ($_self, @_more_paras) = @_ }
sub _SYST { my ($_self, @_more_paras) = @_ }
sub _TYPE { my ($_self, @_more_paras) = @_ }
sub _USER() {}
sub _auth_id { my ($_ftp, $_auth, $_o_resp) = @_ }
sub _data_cmd() {}
sub _dataconn() {}
sub _extract_path { my ($_ftp, $_o_path) = @_ }
sub _list_cmd() {}
sub _store_cmd { my ($_ftp, $_cmd, $_local, $_o_remote) = @_ }
sub abort() {}
sub account() {}
sub alloc() {}
sub appe { my ($_self, @_more_paras) = @_ }
sub append { my ($_self, @_more_paras) = @_ }
sub ascii { my ($_self, @_more_paras) = @_ }
sub authorise() {}
sub authorize() {}
sub binary { my ($_self, @_more_paras) = @_ }
sub byte() {}
sub cdup() {}
sub cmd { my ($_self, @_more_paras) = @_ }
sub command() {}
sub cwd { my ($_ftp, $_o_dir) = @_ }
sub debug_text() {}
sub delete() {}
sub dir { my ($_self, @_more_paras) = @_ }
sub ebcdic() {}
sub feature { my ($_ftp, $_o_feat) = @_ }
sub get { my ($_ftp, $_remote, $_local, $_o_where) = @_ }
sub hash { my ($_h, $_o_b) = @_ }
sub host() {}
sub list { my ($_self, @_more_paras) = @_ }
sub login { my ($_ftp, $_user, $_pass, $_o_acct) = @_ }
sub ls { my ($_self, @_more_paras) = @_ }
sub lsl() {}
sub mdtm() {}
sub mkdir { my ($_ftp, $_dir, $_o_recurse) = @_ }
sub new { my (@_more_paras) = @_ }
sub nlst { my ($_self, @_more_paras) = @_ }
sub parse_response() {}
sub pasv() {}
sub pasv_wait { my ($_ftp, $_o_non_pasv) = @_ }
sub pasv_xfer { my ($_sftp, $_sfile, $_dftp, $_dfile, $_o_unique) = @_ }
sub pasv_xfer_unique { my ($_sftp, $_sfile, $_dftp, $_o_dfile) = @_ }
sub port { my ($_ftp, $_o_port) = @_ }
sub put { my ($_self, @_more_paras) = @_ }
sub put_unique { my ($_self, @_more_paras) = @_ }
sub pwd() {}
sub quit() {}
sub quot() {}
sub rename { my ($_ftp, $_from, $_o_to) = @_ }
sub response() {}
sub restart { my ($_ftp, $_o_where) = @_ }
sub retr { my ($_self, @_more_paras) = @_ }
sub rmdir { my ($_ftp, $_dir, $_o_recurse) = @_ }
sub site() {}
sub size { my ($_ftp, $_o_file) = @_ }
sub stor { my ($_self, @_more_paras) = @_ }
sub stou { my ($_self, @_more_paras) = @_ }
sub supported() {}
sub type() {}
sub unique_name() {}
|