Problem using Net::FTP module

HI all,

i need to transfer some files from my local machine onto the server using Net::FTP module of perl. i used the following code..

$ftp = Net::FTP->new("flame", Debug => 0)
or die "Cannot connect to some.host.name: $@";

$ftp->login($v_user,$v_pwd)
or die "Cannot login ", $ftp->message;

$ftp->cwd("/perlscripts")
or die "Cannot change working directory ", $ftp->message;

$ftp->get("$v_file_name")
or die "get failed ", $ftp->message;

$ftp->quit;

this works fine when i run this on my local machine...but i want to use the code in a perl cgi file and run it on the server... in that case i need to specify the directory where the files are placed on my system. so what should i do..can some one help me with some code..

i'm in need of help.some one help me please...

thanks,
sumana