#perl - Tue 27 Mar 2007 between 00:39 and 00:47



Woosta1997 mod time scares me first ..
cfeddescrottie: what are you running this on? some 100Mhz 486?
scrottiecfedde: I wish... Sparc 10. 36mhz.
sovereignDrForr: Well the name doesn't necessarily have to be all correct for the app I'm buliding
Patternerscrottie: how old?
scrottieBut it should be as fast as a 100mhz 486, actually...
sovereignDrForr: It's for internal data gathering
scrottiePatterner: early/mid 1990s
cfeddeit's realy sad how fast computer hardware ages.
Patterner1982 Apple ][ 1MHz :)
scrottieIt's really how sad how fast computer hardware breaks.
WoostaAhh .. Chris62vw .. it does one line at a time
Chris62vwit seems that P4's have held their own for a while, relative to P1's
Woosta, I dont know what you mean man
cfeddep1's were pretty crummy cpu. 586 90s?
p2 pros were a big improvement.
Chris62vwoh yeah
WoostaChris62vw: a CSV is a file of multiple lines .. why treat each line as it's own object?
Chris62vwfor sure
DrForrReplace line 139 with something like C<if ($column =~/\p{Control}/) {>...
Chris62vwWoosta, well, why not? they usually are, aren't they?
scrottieThe 180mhz PowerPC 604ev won't reboot cleanly and I'm tired of it crashing so I thought I'd build a new slowass.net... the Sparc 10 is *fine* except for Perl... just cannot run Perl...
Used to write Perl on a 486SX25 and I swear it was faster than this...
WoostaChris62vw: Sure, but you have to run ->parse and then ->fields on each object to get the data
I just want a simple way to convert from AoA to CSV and back
DrForrsovereign: Replace line 139 of Text/CSV.pm with something like C<if ($column =~/\p{Control}/) {>...
cfeddeWoosta: unforrtunately everyone that approached that problem whas having a love afair with OO when they built the api
Chris62vwWoosta, you ever mess with Tie::handle::CSV? it looks kinda cool...
Woostacfedde: that's what I mean .. OO is good .. but not for EVERY bloody thing
cfeddeDrForr: that code has not been updated since 1997.
WoostaChris62vw: nah, haven't looked at that ..
cfeddeWoosta: I'm not sure that the syntax is realy OO. More OOesque.
Aankhen``(Regexp::Common)++ # I just realized how awesome it is.
WoostaAhhhh
Chris62vw: that actually looks USEFUL
cfeddeit seems not to take any advantage of any oo principles.
DrForrIt also doesn't work correctly, even with that fix. It's not dealing properly with the case where $column has a ',' in it already.
Patternerhmm... Devel::Command hates me
cfeddeDrForr: you're working too hard. Stop! unless you're having fun fixing bronze age technology.
DrForrBut of course you're better off just doing something like C<join ",", map { qq{"$_"} },@rows;>.

Page: 5 12 19 26 33 40 47 54 61 68 75 82 89 96 103 110 117 

IrcArchive