empty a file's contents in perl

crmpicco · #1 (**permalink**) November 10th, 2006, 01:03 PM

Code:

open (FILE, '>>crmpicco.csv') or die "Cannot open file 'crmpicco.csv'\n";    
    # write to file
    print FILE "$csvstr\n";
close (FILE)

does anyone know of a way to empty the file's contents before I write the csvstr to it? i dont want to append to what is already there.

Picco

www.crmpicco.co.uk
www.ie7.com

crmpicco · #2 (**permalink**) November 13th, 2006, 08:39 AM

found out that you change the '>>' to '>'
eg.

Code:

open (FILE, '>crmpicco.csv') or die "Cannot open file 'crmpicco.csv'\n";    
    # write to file    
    print FILE "$csvstr\n";
close (FILE);

www.crmpicco.co.uk
www.ie7.com

Need to download code?

Navigation