On 06/30/2010 04:34 PM, Chanoch (Ken) Bloom wrote:
>> -rw------- 1 auser auser 3.7K Apr 12 10:11 auser/folder/new/127109228.file
>> -rw------- 1 auser auser 16K Apr 12 12:32 auser/folder/new/127110076.file
>>
>> I would like to write either single-line perl command or a nano search and
>> replace to substitute the directory info and replace it with a file delete
>> so it would look like this:
>>
>> rm -f auser/folder/new/127109228.file
>> rm -f auser/folder/new/127110076.file
For us old folk we would have used awk for this. It is a simple
awk '{printf("rm -f %s\n", $9)}' text_file > rm_file
sh -x ./rm_file
Tony
_______________________________________________
vox-tech mailing list
vox-tech@lists.lugod.org
http://lists.lugod.org/mailman/listinfo/vox-tech
