in reply to insert filename into multiple tab delimited files


Hi

Just a thought, rather than adding the filename
to each line, why not just open the file to append and
add something like '<FileName> Name_Of_File' to the end.
It should be easy to extract, and you are not messing
about with the original data.

As I say just a thought.

J.C.

  • Comment on Re: insert filename into multiple tab delimited files

Replies are listed 'Best First'.
Re^2: insert filename into multiple tab delimited files
by eagleroy (Initiate) on Jul 06, 2006 at 03:39 UTC
    Brilliant simplicity! - wish I had thought of it.
Re^2: insert filename into multiple tab delimited files
by eagleroy (Initiate) on Jul 06, 2006 at 13:26 UTC
    Well, I tried it and I got unreadable characters appended to the end of the file. I then tried to use binmode, but that didn't resolve it.
Re^2: insert filename into multiple tab delimited files
by Anonymous Monk on Jul 08, 2006 at 00:25 UTC

    Hi,

    I don't have Excel so I boshed together a Works Spreadsheet
    and saved it as a Tab delimited file

    a b c d e f 2a 2b 2c 2d 2e 2f 3a 3b 3c 3d 3e 3f


    Then I ran the following :

    use strict; use warnings; open JIM, ">>c:/perl/testa.txt" or die "Rats : $!"; print JIM "<FileName>\ttesta.txt\t4c\t4d\t4e\t4f\n"; close JIM;


    When I opened the file in Works again I got :

    a b c d e f 2a 2b 2c 2d 2e 2f 3a 3b 3c 3d 3e 3f <FileName> testa.txt 4c 4d 4e 4f


    Does this help at all?

    J.C.