Recent content by himagauri

Hello, I've a process which is supposed to do the following: 1.A Parent process has to fork to create fixed number of child processes. (This fixed number changes each time my code runs.) 2. Each child computes certain values and writes these values on to a pipe. 3. The parent should read...

>>Which OS and Perl version are you using? OS is Suse Linux and Perl version is 5.8.3. But i have to work on a file that is 16 GB. or bigger. >>Thats probably where the problem is. Sounds like your >>script is doing too much. Most likely you are running out >>of memory. is there some other...

My perl script is a very big script and performs a lot of complex tasks. One of the tasks within the script is to calulate the size of a file as follows: $size = -s $filename; $size = -1 unless defined($size); When the file size is larger than 1GB for example 16376862124 bytes or 16 GB, the...

Hi, I would also like to know how to capture the STDERR messages in a text file. My Perl script is a daemon and uses fork(). -Thanks, Regards, Himagauri

Thanks a lot, cjasmeet. Your solution hellped.

Hi, I'm running an automated FTP job using Perl script. After each ftp command I have used $ftp->message command. This helps me log only one message issued by FTP server. for e.g: Here is a code snippet $ftp->get(file1,file2); $s = $ftp->message; mylog($s); FTP SERVER returns the following...

Hey cdlvj, I tried the solution you suggested-but I still get a zero byte file... Could you suggest something more? -Thanks,

could you give me an example of the quote command and how it is used in this context? -Thanks, Gauri

I'm trying to do an FTP GET a file from mainframe to Linux. I have a perl daemon on Linux which issues the follwing commands- my $ftp=Net::FTP->new($MVSADDR,Timeout=>1800,Debug=>1); my $olddir = getcwd(); chdir(makedir()) or $ftp=0; $ftp->login($MVSUSER,$MVSPASS); $ftp->binary...

I'm trying to do an FTP GET a file from mainframe to Linux. I have a perl daemon on Linux which issues the follwing commands- my $ftp=Net::FTP->new($MVSADDR,Timeout=>1800,Debug=>1); my $olddir = getcwd(); chdir(makedir()) or $ftp=0; $ftp->login($MVSUSER,$MVSPASS); $ftp->binary...