perl登录FTP问题

open FTP,"|ftp 10.172.238.14";
sleep 3;
print "user\n";
sleep 3;
print "password\n";
print "dir > c:\\perl\\test.txt\n";
print "by\n";
close FTP;
为什么这样登录不了FTP？总是在print出所有后才出现Password:的提示，造成登录失败

use Net::FTP;
或者用 ftp -n 而不是 ftp

用ftp -n还是不行呀，我以前试过用句柄方式打开FTP可以成功的，是不是我代码有哪里错了呢？

好像有点印象是
open (FTP,"|ftp 10.172.238.14");
sleep 2;
print FTP "username\n";
sleep 2;
print FTP "password\n";
sleep 2;
print FTP "dir > c:\\perl\\test.txt\n";
sleep 2;
print FTP "by\n";
close FTP;
但是现在这样还是不行，到底哪里错了呢？以前写过与sqlplus交互的是成功的呀！