how to erase contents in a file in perl

john83reuben · 04-04-2008, 07:24 AM

IN perl, is there a way to to erase the contents of a text file after reading it.

cmnorton · 04-04-2008, 08:19 AM

What about closing the file, and then opening it for write with no append?

matthewg42 · 04-04-2008, 09:53 AM

Code:

perldoc -f truncate

prad77 · 04-04-2008, 02:57 PM

if we open the file with > symbol then it will Truncate (erase) the contents before writing.

open( FILEHANDLE, ">filename.txt" ) or die "filename.txt: $!";

Otherwise,
If you are using BASH as a shell, run this:
echo -n > file

Other shells will use:
echo 'c' > file

Gentoo