Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re:x3 Cleaning up your hard disk

by grinder (Bishop)
on Jan 26, 2004 at 14:11 UTC ( [id://324141]=note: print w/replies, xml ) Need Help??


in reply to Re: Re: Cleaning up your hard disk
in thread Cleaning up your hard disk

No, not a good idea.

This will use all the bit patterns between 100_0001 and 101_0101. Of interest is that the upper 3 bit are always set to 010. This flaw might be sufficient to allow a sufficiently motivated person to extract something useful.

This would be better written as

1 while print F chr(rand(256));

As an added bonus, when the file system is full, the print wil fail, the call will return 0 and bingo! you fall out of the while. At least I believe that that is what should happen. You'll forgive me if I don't try this out on my own filesystem...

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2024-04-25 13:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found