Re: How do I search and output results to HTML from a CSV database file?

nice soultions everyone, but sadly not for this problem. You are all parsing space-seperated data, but Sasquires data ist in fixed-width fields.

If you've got just a few fixed-width fields, you might want to try substr. If you have many fields, I would recommend unpack, like so:

while(<DATA>)
        @data = unpack("A8A10A2",$_);
        print join(",", @data), "\n";
}

__DATA__
12345678123456789012
longone evenlongerha
a       b         c
[download]

the template string "A8A10A2" tells unpack to look for 8 Ascii Characters, then 10 Ascii Characters, then 2 Ascii Characters. unpack is also used a lot in handling binary data (which I don't understand). I just stick to this usage.

--
Brigitte    'I never met a chocolate I didnt like'    Jellinek
http://www.horus.com/~bjelli/         http://perlwelt.horus.at

Comment on Re: How do I search and output results to HTML from a CSV database file? Download Code

Replies are listed 'Best First'.
Re: Re: How do I search and output results to HTML from a CSV database file? by larryk (Friar) on May 15, 2001 at 16:59 UTC
which in turn can be shortened to `print join(",",unpack("A8A10A2",$_)),"\n" while <DATA>;` [download] and run from the command line as `perl -i.bak -l -ne "print join(',',unpack('A8A10A2',$_));" filename` [download] this will do the conversion for you. I'm sure there's a module out there which parses comma delimited files into html tables. hope this helps larryk ---------------------------------------------------- $less->{'chars'} = `"time in the pub" \| more`; # :-D [download]	[reply] [d/l] [select]
Re: Re: Re: How do I search and output results to HTML from a CSV database file? by buckaduck (Chaplain) on May 15, 2001 at 18:52 UTC
The module you're thinking of is Data::Table. From the docs: `$t = Data::Table::fromCSV("aaa.csv"); # Read a csv file into a table +oject print $t->html; # Display a 'portrait' HTML TAB +LE on web.` [download] buckaduck	[reply] [d/l]