perl -i -e 'truncate <>,0; print "HELLO";' mytest [download]
In reply to Re: perl one-liner by Transient in thread perl one-liner by mojobo