Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^5: Empty File Contents before writing

by RichardK (Vicar)
on Feb 19, 2013 at 11:41 UTC ( #1019529=note: print w/ replies, xml ) Need Help??


in reply to Re^4: Empty File Contents before writing
in thread Empty File Contnts before writing

The help for truncate says

The position in the file of FILEHANDLE is left unchanged. You may want + to call seek before writing to the file.

So, any ideas why your code works without needing a seek 0?


Comment on Re^5: Empty File Contents before writing
Download Code
Re^6: Empty File Contents before writing
by johngg (Abbot) on Feb 19, 2013 at 14:37 UTC

    You are right. I hadn't read the documentation carefully enough and hadn't spotted that. Running hexdump -C shows that a seek is indeed necessary.

    $ perl -Mstrict -Mwarnings -e ' > open my $fh, q{>}, q{rubbish} or die $!; > print $fh qq{A longish line of text\n}; > truncate $fh, 0 or die $!; > print $fh qq{Short\n}; > close $fh or die $!;' $ cat rubbish Short $ hexdump -C rubbish 00000000 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |......... +.......| 00000010 00 00 00 00 00 00 00 53 68 6f 72 74 0a |.......Sh +ort.| 0000001d $

    Thank you for the correction.

    Cheers,

    JohnGG

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1019529]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2015-07-02 01:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (25 votes), past polls