I am sorry, but this is not what I have meant.
Somebody (not me, I immediatly fell on my knees and sweared that that I will look at my fingers while I am root) removed a big portion of the entire filesystem by entering
rm -r /some_path/ *
The white space causes rm to remove all files recursivly under the current directory tree. If there were only one or two files I could do it from the command line by modifying the inodes. This would be a a better (forgive me, gods of perl!) way, because the files would be undeleted as they are (I am not to good in reading binary files).
Unfortunatly we are talking about 4000 files. Finding borders takes more time than removing the deletion time of inodes.
So the question was:
Is there any way to manipulate inode-information with perl?
I am looking for something like
use CodeFromTheGodsofExt2fs; my %inode = getInode($InodeNumber); $inode{"DeletionTime"}=0; $inode{"Link"}=1; writeInode(%Inode);
This could be done several (4000) times to recover all files that were deleted until that guy (not me I swear it) realized that Control-C would be a good idea.
The harddisk stayed untouched, so the last command which accessed the hdd was the rm -r - command.

Regards ...

P.S.: I wrote my previous posting anonymous NOT because I am that guy (nope, it was not me - I have aliased rm to rm -i on my machines) but because the enemy-machine did not accept cookies at all.

In reply to Re: Re: restoring files in ext2fs by very empty
in thread restoring files in ext2fs by Anonymous Monk

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.