Mark, It is a very large record. I placed it at http://remedy.cns.ufl.edu/arsperl Any help greatly appreciated.
Brad On Jan 19, 2008, at 12:03 PM, Mark Vaughan wrote: > What's the record look like? > Please send an ARX file with the header, one good record, and the > record > that does not process. > > Thanks, > Mark Vaughan > 303.471.9987 (home) > 303.601.4434 (mobile) > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On Behalf Of Brad O'Hara > Sent: Friday, January 18, 2008 8:29 AM > To: ARSperl User Discussion > Subject: Re: [Arsperl-users] Parse arx file > > Thilo, > > I've come upon a record the causes the following code to seg > fault. Do > you have any interest > in taking a look? > > Thanks, > Brad > > On Tuesday 13 November 2007 4:35 pm, Brad O'Hara wrote: >> Thanks! Certainly something I can work with! >> >> Brad >> >> On Tuesday 13 November 2007 3:01 pm, Thilo Stapff wrote: >>> Here's a subroutine that splits a line in ARX format to an array of >>> values. It works for the basic data types such as character, integer > etc. >>> More complicated data like attachments, diary and currency would of >>> course need some further processing. >>> >>> >>> use Text::Balanced qw( extract_delimited ); >>> >>> >>> sub splitArxLine { >>> my( $line ) = @_; >>> my @ret; >>> my $val; >>> >>> print "--------------------\n"; >>> while( length($line) ){ >>> if( substr($line,0,1) eq '"' ){ >>> ( $val, $line ) = extract_delimited( $line, '"' ); >>> last if defined($line) && !defined($val); >>> $val =~ s/^"//; >>> $val =~ s/"$//; >>> >>> $val =~ s/\\\\/\\/g; >>> $val =~ s/\\r//g; >>> $val =~ s/\\n/\n/g; >>> $val =~ s/\\"/"/g; >>> >>> print "<$val>\n"; >>> >>> }else{ >>> $line =~ s/(\S+)//; >>> $val = $1; >>> } >>> push @ret, $val; >>> $line =~ s/\s*//; >>> } >>> >>> return @ret; >>> } >>> >>> >>> >>> Regards, >>> Thilo >>> >>> >>> >>> Brad O'Hara wrote: >>>> Hi all, >>>> >>>> Anyone written a routine to parse a .arx file? >>>> >>>> Thanks, >>>> Brad >>> >>> >>> > ------------------------------------------------------------------------- >>> This SF.net email is sponsored by: Splunk Inc. >>> Still grepping through log files to find problems? Stop. >>> Now Search log events and configuration files using AJAX and a >>> browser. >>> Download your FREE copy of Splunk now >> http://get.splunk.com/ >>> _______________________________________________ >>> Arsperl-users mailing list >>> Arsperl-users@arsperl.org >>> https://lists.sourceforge.net/lists/listinfo/arsperl-users >>> >>> >> > > -- > Brad O'Hara E-mail: [EMAIL PROTECTED] > IT Expert Voice: (352)392-2061 > Computing and Networking Services Suncom: 622-2061 > University of Florida Fax: (352)392-9440 > > ------------------------------------------------------------------------- > This SF.net email is sponsored by: Microsoft > Defy all challenges. Microsoft(R) Visual Studio 2008. > http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ > _______________________________________________ > Arsperl-users mailing list > Arsperl-users@arsperl.org > https://lists.sourceforge.net/lists/listinfo/arsperl-users > > > ------------------------------------------------------------------------- > This SF.net email is sponsored by: Microsoft > Defy all challenges. Microsoft(R) Visual Studio 2008. > http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ > _______________________________________________ > Arsperl-users mailing list > Arsperl-users@arsperl.org > https://lists.sourceforge.net/lists/listinfo/arsperl-users > ------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2008. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ _______________________________________________ Arsperl-users mailing list Arsperl-users@arsperl.org https://lists.sourceforge.net/lists/listinfo/arsperl-users
