I would suggest using the File::ReadBackwards module, then reversing each line.  That 
will avoid situations where your program slows down when a file is too big for 
available memory.  Assuming $_ is the current line, something like :
 
chomp $_;
print OUTFILE reverse(split //,$_);
print OUTFILE "\n";
 
Remember that "split //,$_", returns an array with each individual character of $_, 
since you are essentially splitting on null, and reverse() returns the array backwards.

        -----Original Message----- 
        From: news on behalf of Norman Zhang 
        Sent: Thu 1/1/2004 11:49 PM 
        To: [EMAIL PROTECTED] 
        Cc: 
        Subject: Re: create file
        
        

        
        I want to list each character of the file backwards.
        
        

Reply via email to